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Sect ion 1 
INTRODUCTION 

The N0ZL3D computer program performs an implicit numerical solution to the 
spatially parabolized form of the three-dimensional unsteady Navier-Stokes equa- 
tions in general curvilinear coordinates to predict the flowfield in and about an 
isolated three-dimensional jet exhaust nozzle. The equations, boundary conditions, 
numerical solution technique, and class of nozzle configurations addressed are 
presented in Reference 1, and it is assumed here that the reader is familiar with 
that reference. Associated with the NOZL3D code are two auxiliary codes, RORIDD 
and NOZLIC. The former constructs a boundary -conforming curvilinear coordinate 
system and computational grid for complicated three-dimensional nozzle confi- 
gurations (See Section 3 of Ref.l). NOZLIC is structured to construct the coor- 
dinate system and grid for relatively simple two-dimensional and axisymmetric 
converging-diverging nozzles or for external flat plate boundary layer problems, 
and to generate initial conditions for the NOZL3D code. The latter reads the grid 
and initial conditions from a file prepared by NOZLIC, 

For more complicated three-dimensional nozzle configurations, the coordinate 
system and grid must be constructed by the RORIDD code and stored on a disk file. 
NOZLIC then merely reads these grid data, generates a set of crude flowfield ini- 
tial conditions, and prepares for NOZL3D a disk file containing both the grid and 
the initial flow conditions. 

The aforementioned three programs have been designed specifically to operate 
on the NASA-Langley Research Center’s CDC CYBER 173 computer system, which has less 
than llOK decimal words of fast core memory available for data and instructions. A 
three-dimensional flow solution carried out on a grid of 32 x 32 x 32 mesh points 
requires nearly SOOK decimal words of memory for data and instructions. Hence, 
auxiliary disk files are used for primary data storage. This is accomplished as 
follows. 

The three-dimensional flow region is represented by a computational space 
that consists of a rectangular parallelepiped (see Section 2.1). This computa- 
tional space is covered by a rectangular grid of nodal points that are equally 
spaced in each of the three coordinate directions in the space. Finite-difference 
analogs of the unsteady Navier-Stokes equations are solved on this grid by an 
implicit numerical method (Ref. 1) that advances the solution over a sequence of 
time steps, each of which involves the following. For each of the three coordinate 
directions, the numerical method requires solving a block-tridiagonal system of 
linear equations involving all grid points that lie along a single grid line in 
that direction. This is termed the "sweep" for that line. All such lines running 
in that direction are so treated. The same process is repeated for all lines in 
the second coordiqate direction, and again for the third direction. The flowfield 
data are stored by planes in an auxiliary disk file, and sufficient core memory is 
available to accomodate all the data required to perform the two-dimensional 
sweeps along all lines in one plane. This is done one plane at a time, reading in 
pre- sweep data from disk to core, and the reverse for post-sweep data. However, 
the latter data must be re-ordered to perform the third sweep that runs along the 
grid lines normal to the data plane. 

The two data transfer operations between disk and core, each in a different 
order, are accomplished by an efficient Input/Output Manager routine called DMOASP 
(Ref. 2). Both programs, NOZLIC and NOZL3D, use the disk files for primary data 
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storage and employ the IHfOASP software. These basic programs also have been 
operated successfully on the UNIVAC 1110 computer system as well as on the CYBER 
175. 

Core memory*based versions of the NOZLIC and NOZL3D programs also exist, and 
have been exercised extensively on a CDC 7600 computer system haying BOOK decimal 
words of large core memory. The internal program structure of this version is 
drastically different from that of the disk file-based version. The listings, 
etc., presented in this User’s Guide apply only to the latter yersion as imple- 
mented on the CDC CYBER 175 computer. 

The present User’s Guide contains a description of NOi^LBD and NOZLIC, 
listings of the codes, and sufficient information to guide the user in preparing 
input and in interpreting output for several test cases that do not require the 
use of RGRIDD to generate the computational grid. A complete listing of RGRIDD is 
included here in Appendix C. The listing contains comment statements in subroutine 
INPUT that give complete instructions for preparing input and for running the 
RGRIDD code. The code itself is so simple and easy to use that We shall not deal 
with it further in the present User’s Guide. A detailed exposition of the grid 
generation technique employed in RGRIDD is given in Section ^ of Reference 1. 
Recent improvements to the technique that have been implemented in RGRIDD are 
described in subsection 2.5 of Reference 3. 

Sections 2 and 3 below describe the NOZL3D and NOZLIC codes, respectively, and 
their input and output. Samples of the input and output are given for several test 
cases . A complete copy of the NOZL3D printed output f^r each test case is given 
in Appendix D. Complete listings of the two codes are given in Appendices A and B, 
respectively. 
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Section 2 

THE N0ZL3D PROORAlf 

2.1 Specification of Configuration Geometry and Character of Boundary Surfaces 

The geometry of the nozzle configuration and of the flow regions internal and 
external to the nozzle are specified in Cartesian coordinates, x,y,z, where x is 
oriented in the general streamwise direction. The entire flow region is mapped 
onto a computational space consisting of a rectangular paral lelpiped (see 
Reference 1, Sections 2.4.1 and 3). The configuration geometry and the character 
of the various boundary surfaces of the computational space are specified in the 
code by a set of integer variables that act as option selectors. The function of 
each option selector is summarized briefly in comment statements that are 
contained in the listing of subroutine INITIA (see Appendix Y). An introductory 
description of these functions is presented below. 

Figure 2-1 illustrates the structure of the computational space for the 
general nozzle configuration shown in Fig. 1-1 of Ref. 1. Grid points in the 
computational space are denoted by the triplet of indices J, K, L, where J is 
associated with the streamwise Cartesian coordinate x, and the other indices are 
associated with curvi I inear coordinates in cross-sectional planes x=const. The 
surface J=1 represents the upstream inflow boundary and JpJMAX represents the 
downstream outflow boundary. The surface K^l represents the symmetry half-plane 
ysO, z^O, and K=KMAX represents a lateral outer boundary of the flow region. For 
the nozzle configuration shown, the surface L=1 is also a symmetry half-plane z=0, 
y^O, and L=LMAX represents the upper peripheral boundary of the flow region. The 
inner surfaces of the nozzle wall map onto the plane surfaces L=LW, l^J^JLW and 
K=KW, 1:^J^JKW. The outer surfaces of the nozzle wall map onto the surfaces L^LW+l, 
ISJgJLW and K=KW+1, IgJgJKW. 

The wedge-plug maps onto the plane surface segment L=l, JLIWL^J^JLIWU, l^^W. 
The remainder of the surface L=1 is the image in the computational space of the 
horizontal symmetry plane z=0. The wedge-plug may be omitted merely by specifying 
JL1WL=JL1WU=0 . If KW=0 and JKW=0, the vertical nozzle wall is not present: the 
horizontal wall L=LW and L=LW+1 then extend all the way from Ksl to K=KMAX, and 
the wedge-plug also extends across the full range of K. The horizontal wall may be 
omitted by specifying LV=0, JLW=0. 

Complete symmetry exists in the way the R and L directions are treated in the 
code, and the preceding paragraph applies to the K direction if one substitutes K 
for L and L for K in that paragraph. 

The current program logic is subject to the following restrictions: (1) For 
3D internal nozzle flow cases where the surfaces L=LlfAX and K=KMAX are walls as 
specified by LMAXBC-KMAXBC= 1 (see below), an internal wedge-plug is not allowed. 
(2) For the general nozzle configuration that has a wedge-plug bounded by a 
side-plate at K=KW, the wedge-plug may not extend beyond the side-plate in the 
streamwise direction, and may not be shorter than the upper nozzle wall L^LW. That 
is, whenever 3]L1WU>0. KW>0, and LW>0, the following inequality must hold: 
JLW^JLIWU^JKW. (3)The turbulence models contained in subroutine MUTUR for the jet 
mixing region aft of the nozzle exit are valid only when the maximum velocity in 
the exhaust jet exceeds the external freestream velocity. This subroutine is not 
valid for jet wakes that exhibit a global momentum defect relative to the external 
flow. This statement does not apply to local features such as the wake behind the 
trailing edge of a nozzle wall, sideplate, or wedge-plug (Ref. 3). 
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Fig® 2-1 Sketch of Computational Space Shov/ing Ii 








The character of the six peripheral faces of the coaputat ional space is spe- 
cified by a set of six option selectors, one for each face. The option selectors 
JIBC, KIBC, LIBC determine the character of the faces Lsl, respectively; 
whereas the selectors JMAXBC, KMAXBC, lilAXBC determine the na^re of the boundary 
faces JMAX, KMAX, LMAX, respectively. If any of the selectors |s set to zero, then 
all flow variables at the corresponding face are held fixed at their initial 
values for the duration of the computer run. The other available options for the 
various boundary faces are as follows. | 

Inflow Boundary J»l. The only additional option for this boundary is J1BC*I, which 
specifies that the inflow boundary conditions are to be computed implicitly as 
described in Section 4.2.2 of Ref. 1. 

Outflow Boundary J=JMAX. There are two additional options for this boundary. For 
JMAXBCsl, all flow variables at the boundary are computed implicitly from the flow 
conservation equations as described in Section 4.2.2 of Ref. I. The other option, 
JMAXBC=2 is similar, except that one of the flow conservation equations is 
replaced by an algebraic boundary condition which specifies that the pressure at 
the outflow boundary is equal to the freestream pressure. Th4 listing of subrou- 
tine BCJMAT in Appendix A contains comment statements that explain in detail how 
the algebraic boundary condition on pressure is applied at ^he outflow boundary 
under this option. As indicated in Sections 2.4.6, 4.2, atid S of Ref. 1, we 
recommend that this option be used only for problems in which the outflow boundary 
coincides with the nozzle exit plane, the nozzle is unchoked (i.e. the x-component 
of velocity, u, is subsonic over the entire outflow boundary), and the computation 
concerns only the flow region interior to the nozzle (i.e. the computational 
boundaries LMAX and KMAX coincide with the interior of the nozzle walls). 

Lower Boundary L=l. The upper surface of the wedge-plug occupies a part of this 
surface L=l. Under the option L1BC= ! , the implicit no-slip viscous wall boundary 
conditions are always applied on this part of the boundary*, (Ref. 1, Section 
4.2.2) and the remainder of the surface L«1 is treated as a symmetry plane that 
coincides with the plane x= 0 of the base Cartesian coordinate system. 

Upper Boundary L-LMAX. There are five additional options for this boundary face. 
For LMAXBC=1, the face is treated as an impermeable wall at which implicit no-slip 
boundary conditions are applied. For LMAXBC=2, implicit freestream boundary 
conditions are applied as described in Section 4.2.2 of Ref. 1. For LMAXBC=3, the 
entire boundary is treated as a symmetry plane that is parallel to the Cartesian 
coordinate plane y=0. For LMAXBC=4, the boundary again is a symmetry plane, but 
one that is parallel to the Cartesian coordinate plane z=0. For LMAXBCaS, the 
boundary face L=LMAX is treated as an outflow boundary at which the viscous 
stresses and heat conduction terms in the Navier-Stokes equations vanish, and all 
flow variables are computed implicitly from the full set of equations. 


* The same boundary conditions are always applied on nozzle walls 
that are interior to the computational space (LW>0 and JLW>0, 
or KW>0 and JKW>0). 
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Observe that the designations LMAXBC=3, 4 that select symmetry boundary 
conditions at L=LMAX are defined mnemon i ca 1 1 y . For example, when the surface 
L=LMAX is selected to be a symmetry plane that i s paral lei to the Cartesian 
coordinate plane y=0, the velocity component v in the y direction must vanish at 
the symmetry plane. The velocity component v is proportional to the third 
component of the flow variable vector q defined in Section 2.1 of Ref. I, and the 
selection of LMAXBC=3 specifies that this third component of q vanishes at the 
plane of symmetry L=LMAX. Similarly, LMAXBC=4 specifies that the symmetry plane 
L=LMAX is parallel to the Cartesian coordinate plane z=0, whence the fourth 
component of q (proport ional to the w-component of ve Ipc i ty ) must vanish at the 
symmetry plane. Thus, in general, when the surface L=LMAX is to represent a 
symmetry plane at which the i’th component of q vanishes, the option selector 
LMAXBC should be set equal to the integer i. 

Lower Boundary K=1 and Upper Boundary K=KMAX. As stated earlier, complete Symmetry 
exists in the way the K and L directions are treated in the code. The preceding 
paragraphs that describe the function of the opt ion sel ectors LIBC and LMAXBC 
apply directly to KIBC and LMAXBC i f one replaces the letter L by the letter K 
throughout those paragraphs. 

The described option selectors and geometry delimiters provide great flex- 
ibility in the types of nozzle geometry and boundary conditions that can be 
accommodated by the code. For example, axially symmetric configurations can be 
treated as follows. The symmetry axis is taken to coincide withFtheCartesian X 
axis, and the latter is mapped onto the entire surface L=1 of the computational 
space by a singular transformation. By setting KW=0, JKW=0, LW>0, the inner and 
outer surfaces of the nozzle wall are mapped onto the planes iiv=LW and L^LW-fl, 
respectively. The option KMAXBC=4 selects the surface K=KMAX to represent the 
horizontal symmetry plane z=0, at which appropriate symmetry boundary conditions 
are applied automatically by the code . The compu t a t i ona I space then represents the 
first quadrant y^O, z^O of the Cartesian coordinate system in which the flow 
computation is to be carried out. 

The NOZL3D code employs a Cartesian base coordinate system. Axisymmetric 
flows must be treated as any other fully three-dimensional flow; that is, by using 
a full three-dimensional grid. The flow computation region covers the first qua- 
drant of the Cartesian space y^O, z^O as stated in the preceding paragraph, and 
the planes y=0 and z=0 are symmetry planes. The described quadrant (in each 
cross-sectional plane x=con$t.) is mapped onto a rectangle 
in the computational space as follows: | represents the axial coordinate 
X, { represents a stretched radial coordinate, and t) represents the 
meridional coordinate. The computational coordinates |(J), t)(K) , {(L) 
thus resemble those of a cylindrical coordinate system in which the surface 
(=0 (L=l) represents the singular axis of symmetry, the surfaces L=LW 
and L=LW+1 represent the inner and outer surfaces of the nozzle 
wall, respectively, and the surface L=LMAX represents the lateral 
outer computational boundary. 

The user is cautioned that whenever the NOZL3D code is used to compute 
an axisymmetric flow, the curvilinear coordinate transformation must be defined as 
described in the preceding paragraph. Grid points on the singular axis are handled 
in a special manner in the code, and must be situated at the index L=I for the 
code to function properly. That is, the coordinate that is associated with the 
index L must represent the radial coordinate direction in a cross-sectional plane 
x=constant, the symmetry axis must coincide with the Cartesian x axis, and the 
surfaces K=1 and K=KMAX must represent symmetry planes that coincide with the 
plane y=0, z§0 and with the plane z=0, ySO , respectively. The code tests internal- 
ly for this type of axial symmetry and automatically limits the printed output to 
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the vertical symmetry plane y=0 (K=l). 

Configurations that possess only bilateral symmetry about the Cartesian 
coordinate plane y=0 can be accommodated in analogous fashion by se t t i ng KMAXBC=3 , 
in which case the surface K=KMAX represents the lower half of the symmetry plane 
y=0, zgO, and the computational space represents the Cartesian half-space y^O . 

In addition to the three-dimensional flows for which the code is primarily 
intended, two-dimensional flows can be compu t ed e f f i c i en 1 1 y by spec i fy i ng the 
input option KPLANE=1 . The flow then is computed only in the plane K=l, which 
coincides with the Cartesian coordinate plane y=0; the f 1 ow va r i ab 1 es are presumed 
to possess no gradients in the y direction, end the v-component of velocity is 
presumed to vanish. 

2.2 Input/Output Description and Test Cases 

The input data required to run the code are discussed below, along with a 
description of the printed output. The discussion is centered about the 
input/output for several test cases that involve simple ext e rna 1 f 1 ow, simple 
i n t e rna I f I ow , and combined internal and external flow in and about a nozzle. The 
grids and initial conditions for these test cases are obtained from initial data 
files generated by the NOZLIC code (see Section 3). 

2.2.1 Test Case No. 1: Flat Plate Boundary Layer 

Aside from the body geometry, which is either computed within the NOZLIC code 
or generated by the RGRIDD code, the only physical input parameters that must be 
specified for an external flow are the dimensionless freestream Mach and Reynolds 
numbers, the gas specific heat ratio and Prantdl number, and the freestream 
temperature in degrees Kelvin. The latter is required as a reference temperature 
in evaluating the molecular viscosity coefficient from the Sutherland law. 

The input/output description and running instructions for the code are 
described below and illustrated for a test case consisting of laminar external 
flow over a finite flat plate. The freestream Mach number is 3, the freestream 
Reynolds number 100,000, the Prandtl number is unity, and viscosity is propor- 
tional to temperature. Graphical results for this test case are presented in 
Sec t i on 5 . 2 o f Re f . 1 . 

2 . 2 . 1 . 1 Input Data 

In order to perform a flowfield computation, the code requires data on the 
Cartesian coordinates of the point in physical space that corresponds under the 
coordinate mapping to each of the grid points (j,k,l) of the computational space. 
The code also requires initial conditions on all physical flow variables at each 
grid point. These data vary from problem to problem, hence the pode is designed to 
operate only in a "restart" mode in order to keep the code free of ad hoc 
instructions that apply only to individual problems. In the "restart" mode, the 
punched card input data is restricted to a relatively small set of general 
parameters. The prob I em- dependen t grid point coordinates and initial flow variable 
data are read from a data file. For a new run, the latter file is prepared by an 
auxiliary code, NOZLIC (See Section 3). An equivalent restart file also is 
generated by the NOZL3D code itself at the conclusion of a run, so that the 
computation can be continued in a subsequent restart run from the point at which 
the initial run terminated. Restart files can also be generated at u s e r - s e 1 ec t ed 
intervals during the course of a run. 

The punched card input data include the geometry options selectors, the phy- 
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sical parameters of the problem, an4 various selectors that govern file input, 
output, running mode, and number and size of time steps. These *re contained on 
five cards. Card images with the proper inputs for the test case are shown in Fig. 
2-2. The first two cards contain integer data in 16IS format, and the final three 
cards contain real number data in 8F10.0 format. 

The first page of printed output displays and identifies the input data items 
in the exact sequential order of their appearance on the input cards. This output 
page for the test case is shown in Fig. 2-3. Those items not already described in 
Section 2.1 are ident i f ied below. 

NllAX • Number of time steps to be taken during the run. 

JMAX,KIIAX,U{AX - Number of grid points in J, K, L directions, respectively. 

LAMIN - Laminar/turbulent flow option selector, 1 for laminar flow, 0 for 
turbulent flow. 

KPLANE • Planar symmetry option selector. Use 0 for three-dimensional prob- 
lems. Use 1 to conserve computer time for two-dimensional problems 
where gradients occur only in the J, L, directions , I and the flow is 
invariant with respect to K. 

IWRIT - IWRITsl produces a printout of all initial data for the current run, 
as read for an initial start run from the f i le ; prepared by the 

NOZLIC code, or as read for a restart run from the restart data 
file. The initial data are not printed if IWRIT=0 is input. 

NRST - Time step index at which the current run is initiated. For the initial 
run that obtains the initial data from the file prepared by the 
NOZLIC code, input the value NRST^O. For a restart run that obtains 
the initial data from a restart file generated during a previous 
run, NRST must agree with the time step index NC of the data on the 
restart file 

KVIS, LVIS, KLVIS - Switches that allow the user to select whether the viscous 
terms associated with a given coordinate direction are to be compu- 
ted or omitted. For example, KVIS^l specifies that the viscous terms 
associated with the K coordinate direction are to be computed, 

whereas those terms are omitted from the computation if KVIS^O. The 
switch LVIS=1(0) acts similarly for the L coordinate direction. 
KLVISsl(O) similarly controls the viscous cross-derivative terms 

that involve both the K and L coordinate directions. For 

two-dimensional plane flows where KPLANEsl is input, default values 
KVIS-KLVISsO, LVISsl are selected automatically by the code. 

ISUTH - Option selector for computing the molecular viscosity coefficient RMUE 
either from the Sutherland law when ISUTHa:! is input, or as a power 
of temperature when ISUTH-O is input. The viscosity coefficient is 
computed in subroutine VISGOF. 

NROUT - Number of time steps interval between points at which a restart file 
is generated; i.e., a restart file is generated on unit 4 every 
NROUT time steps. The entire flowfied is printed out each time a new 
restart file is created. 

DT - Time stepsize to be use initially (see DTFAC below). 

FSIIACH - Freestream Mach number for external flow problems or for problems 
involving both external flow about the nozzle and internal flow in 
the nozzle. 

RMACH - Reference Mach number. For external flow problems, this is the free- 
stream Mach number FSMACH. For purely internal flow in a nozzle or 
for combined internal and external flow, use RMACHsl.O. 
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RE - Reference Reynolds number. For external flow problems, this is the 
freestream Reynolds number. For purely internal flow in a nozzle, or 
for problems where both the internal flow and the external flow 
about the nozzle are to be computed simultaneously in a single run, 
use the Reynolds number based on internal flow stagnation conditions 
with the stagnation sound speed as the characteristic velocity. 

PR - Prandtl number. 

RTDEOK - Reference temperature in degrees Kelvin that is used in evaluating 
the molecular viscosity coefficient from the Sutherland law when 
ISUTHsl is input. It should be equal to the reference temperature at 
which the Reynolds number is defined. 

FSP,FST - Dimensionless freestream static pressure and temperature. For purely 
external flows, use FSP^FST^l. For combined internal and external 
flows,these are defined as the dimensional free stream values 
normalized by the dimensional reference pressure and temperature, 
respectively (i.e., the internal flow stagnation chamber 
conditions). Note that FSP is defined in the same fashion for purely 
internal nozzle flow under unchoked conditions where the freestream 
pressure is imposed as a boundary condition at the nozzle exit plane 
J=JMAX (see Ref, 1, Section 2.2 and Ref. 3, Section 2.3.2). 

OAMliA - Oas specific heat ratio 

RIfUEXP - Exponent of temperature in power law expression for the 

molecular viscosity coefficient (used only when ISUTHsO is input). 

TW - Dimensionless wall temperature boundary condition (normalized by the 
reference temperature). To invoke adiabatic wall boundary condi- 
tions, input the value TW=0.0. 

DTFAC, OMEGA, DTMAX - These quantities enable the user to vary the time step 
during the course of a run. The inputs DTFACsl.O, OMEOAsO.O force 
the code to use the input value of the time step, DT, for the entire 
run. When DTFAC>1.0 , OMEGA>0.0 are input, the code will automati- 
cally increase the time step as follows. Upon completing a step of 
stepsize DT, the code determines the maximum (in absolute value) 
relative change in any flow variable q at any grid point that took 
place over the step. If the change is less than the input value 
OMEGA, then the time stepsize for the subsequent step is increased 
by the factor DTFAC. DTMAX simply is a user - se 1 ec t ed upper bound on 
the t ime step. 

RM - Coefficient of artificial implicit dissipation operator (Ref. 3). No 
dissipation is applied when RM=0.0 is input. 

SMU- Coefficient of explicit fourth-order smoothing operator (Ref. 1, Section 
4.3 and Ref. 3, Section 5.3). Must be less than unity. Larger values 
will cause numerical instabilities. 

INFLT - Option selector for automatic filtering of the computed flow variables 
at the inflow plane (Ref. 3, Section 2.4). The filter is applied 
when INFLT=1, and is omitted when INFLT=0. 

The remaining input data items INVISC, NGRI, NP, and CNBR, have internal 
significance in the code and must be given the values shown in Fig. 2-3. 

The DMGASP routine uses macros from the system file. This file is named 
OOM4 30 /MASTER. In order to compile, the following control commands should be 
included in the deck; 

ATTACH ( OPL/UN=L I BRARY ) 

FTN(I=COMPILE,X=OPL,OPT=2, . . . ) 
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2.2. 1.2 Printed Output of Computed Results 

The complete printed output for the test case is given in Appendix D. The 
output that follows the display of input data consists of two sections that have 
the same format. The first section is given only when IWRIT^l is input, and lists 
the starting data that were read from unit 2; these data include the Cartesian 
coordinates of grid points and the initial values of physical flow variables at 
each grid point. The first few lines display several input items that are redun- 
dant with the punched card input described in Section 2 . 2 . 1 . 2 . These items are 
obtained from the initial data file prepared by the NOZLIC code, and are displayed 
for reference purposes only. They do not affect the NOZL3D code run, which is 
governed solely by the input data described in Section 2. 2. 1.1. 

The tabular output that follows the described lines lists by column the grid 
point indices, the grid point coordinates , x , y , z ; the dimensionless density R; 
Cartesian velocity components U,V,W; and the dimensionless temperature T, pressure 
P, and entropy function ENT. The non-dimens iona 1 i za t ion is as described in Section 

2.1.1 of Reference 1. Velocities are normalized by the sound speed at the 
reference conditions and distances are normalized by the refeirence length. All 
other variables are normalized by the corresponding variables at the reference 
state. For external flows, as in Test Case No.l, the reference conditions are 
taken as the freestream conditions. For purely internal nozzle flows or for 
combined internal and external flow, the variables are referenced to the isentro- 
pic stagnation conditions of the internal nozzle flow. 

The final section of printed output lists the values of the same quantities 
after NMAX time steps, Note that for two-dimensional flow (KPLANEsl), the full 
printed output is given only for the plane K=l. 

Between the described major sections of output, three lines of intermediate 
data are printed at the end of each time step that enable the user to monitor the 
progress of the run. The first line gives the time step index NC, the current 
value of the L2 residual, the maximum residual, and the grid point indices J,K,L 
of the point at which the maximum occurred. The L2 residual is defined as the 
root -mean- square , taken over all interior grid points, of the spatially 
differentiated terms in the Navier-Stokes equations, including the fourth-order 
smoothing operators. These spatially differentiated terms are those that appear in 
braces on the right hand side of Eq. (4,17) of Reference 1. 

The second line of intermediate output repeats the time step index and gives 
the time stepsize PT, the cumulative time TAU, the maximum relative change over 
the time step that occurred in any of the five components Q(N), N=l,2,...,3 of the 
flow variable vector q at any grid point. The indices J,K,L of the grid point 
where the maximum occurred are also printed, along with the index N that identi- 
fies which component of q experienced the greatest relative change. 

The third line of printed output lists the five components of the generalized 
force vector OF(N), Nsl,2,..,S, and the current value of the nozzle discharge 
coefficient CW. For Test Case No. 1, the second component OF(2) of the generalized 
force vector represents the dimensionless drag coefficient CD of the plate. A 
general discussion of the meaning of the generalized force vector is given in 
Section 3 of Reference 3. 

2.2.2 Test Case No.2: Two-Dimensional Internal Flow 

Test case No, 2 is a computation of laminar flow in a so-called 
"two-dimens ional" nozzle that has straight sidewalls and a rectangular cross 
section of constant width. The inlet section is of constant height. This is 
followed by a s t rai ght -wa 1 1 ed converging section that is connected to a straight 
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diverging section by a circular arc that forms the geometric throat region. The 
nozzle configuration is described in Section 6.1 of Ref. 3, which also presents a 
discussion of the numerical results. We note only that the nozzle width is 4 in. 
between sidewalls, and the throat half-height is O.S388 inches. The latter is the 
reference length by which all dimensions are normalized in the NOZL3D computation. 
For this test case, only the two dimensional flow in the vertical plane of symme- 
try of the nozzle is considered. See section 2.2.3 for the three-dimensional flow 
test case for this nozzle (Test Case No, 3). 

The two-dimensional flow test case is for nozzle operating conditions 
corresponding to the nozzle design condition with a stagnation pressure of 1 atm. 
and a stagnation temperature of 29S Kelvin. The Reynolds number based on stagna- 
tion chamber conditions and throat half-height is 940,000. Although one would 
expect turbulent flow at this large a Reynolds Number, the test case assumes 
laminar flow with a Sutherland viscosity law, a Prandtl number of 0.72, and 
adiabatic wall boundary conditions. The flow is computed in the upper half of the 
vertical plane of symmetry y=0, z^O, which is covered by a 23xIS grid in the x(j) 
and z(l) directions, respectively. The vertical (z) grid is stretched exponential- 
ly to resolve the nozzle wall boundary layer. 

The computation is performed in two stages: an initial run of constant time 
stepsize DT=0.0S with J!B€«0 (inflow conditions held fixed at their initial 
values), and a restart run with JIBC=:1 (computed inflow conditions) using a 
variable time stepsize. 

The input data card images for the initial start are shown in Fig. 2-4 and 
the first printed output page is displayed in Fig. 2-S. The remainder of the 
printed output for both runs is contained in Appendix D. The output format is as 
described in Section 2 . 2 . 1 . 2 . 

Aside from JIBC, the other inputs for the restart run that differ from those 
of the initial start are: NMAX=400, NRST=100, IWRIT=0, NROUT=400, DTFAC=1.1, 

(MfEOA=0.01, and DTMAX=:0.3. 

For internal flows as in test case no. 2, the generalized forces GF(N) 
have the following physical meaning (Ref. 3, Section 3): 

OF(l) is the net mass flux through the computational space 

GF(2), OF(3), and GF(4) represent the global momentum defect in 
the Cartesian x,y, and z directions, respectively, for the 
entire computational space. At steady state, these are equal 
to the x,y, and z components of the force exerted on the 
nozzle walls. 

GF(S) is the net energy flux through the computational space. 

The printed values of the generalized forces are dimensionless, with mass flux 
normalized by the product of the reference density, the reference sound speed, and 

the square of the reference length; momentum fluxes are normalized by one-half the 

product of the described reference mass flux and the reference sound speed; the 

energy flux is normalized by the product of the described reference momentum flux 
and the reference sound speed. Recall that the reference density for purely 
external flows is the freestream density, and for either internal or combined 
internal and external flow is the stagnation chamber density of the internal 
nozzle flow. The reference velocity is defined similarly as either the freestream 
or stagnation chamber sound speed. 
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2.2.3 Test Case No. 3: ThreerDimens ional Internal Flow 

Test Case No. 3 is a three-diaiensionalMow computation for the same 
nozzle configuration dealt with in the two-diaiensional flow computation Of Test 
Case No. 2. The vertical (z) and streamwise(x) grids are the same for both cases. 
For the 3-D case, 10 grid points are distributed between the vertical symmetry 
plane y»0 and the nozzle sidewall with an exponential stretching to resolve the 
sidewall boundary layer. The nozzle operating conditions are identical to those 
fpr Case No. 2. However, the initial time step is smaller. 

The input data card images and the firit output page are shown in Figs. 
2-6 and 2-7, respectively. To familiarize the reader with the restart feature of 
the code, two restarts are performed. The initial start is for 100 steps with the 
boundary condition option selector J1BC=0 ( inflow boundary conditions are held 
fixed at their initial values). The first restart continues the computation for 
200 more steps using the same stepsize at which the initial start terminated at 
step 100. The other inputs for the restart run which differ from those of the 
initial start run are: J1BC=1, NRST^lOO, OMEGA=0.03, and DTMAX=0.3, 

The second restart continues the calculation for 200 more steps with 
J1BC=I (implicit computed inflow boundary conditions). The input data for the 
restart run which differs from that for the initial start run are: NMAX=200, 
J1BC=1, NRST:=300, SMU:=0.8, DT=0.0S, (MBGA »0.05, and DTMAXr:0.3. 

Note that the explicit smoothing coefficient is set to 0.8 for the restart. As 
part of the feature that automatically raises the time step by the factor DTFAC 
whenever the maximum change in any flow variable over the preceding step is less 
than the input constant (MEGA, the explicit smoothing coefficient is also 
increased by the same factor until an upper bound value of SMUsO.8 is reached. The 
smoothing coefficient is raised in this fashion along with the time stepsize in 
order to preserve the same relative magnitudes between the smoothing terms and the 
spatially differentiated terms in the Navier-Stokes equations. The value of SMU is 
limited by the linear stability boundary of the set of smoothing terms, which is 
unity. An upper bound of 0.8 is currently used in the code for conservatism to 
avoid potential nonl inear i ty- induced instabilities that are not accounted for in 
the linear stability analysis. A discussion of the meaning of the coefficient SMU 
is given in Section 3.3 of Reference 3. 

The full printed output for the initial start and the final restart runs is 
contained in Appendix D. 
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2.2.4 Test Case No. 4 : Internal and External Flow for an Axisyaunetr ic 
Nozzle 

A detailed description of the nozzle configuration is presented in Section 6.2 
of Ref. 3, along with graphical results of the computation. We note here only that 
the nozzle interior wall has an inlet section of constant radius, a convergent 
section, and an exit section of constant radius. The external wall of the nozzle 
consists of an initial section of constant radius, followed by a circular arc 
boattail. The lateral outer boundary of the computational space, L=liiAX, is a 
cylinder in the Cartesian space x,y,z. The downstream outflow boundary is located 
about one exit diameter aft of the nozzle exit so as to include the near-field 
exhaust jet and the wake of the nozzle wall in the flow computation. The grid 
consists of KMAX=5 meridional planes equally spaced at intervals of 22. S degrees, 
JMAX=28 cross-sectional planes along the x direction, of which the last five are 
downstream of the nozzle exit (JLW=23), LW=1S grid points exponentially distribu- 
ted across the interior of the nozzle in the radial direction, and another 13 
points exponentially distributed in the radial direction between the outer nozzle 
wall and the lateral outer "freestream” computational boundary (LMAXs28). 

The calculation is for turbulent flow with a Sutherland molecular viscosity, 
PrsO.72, Res: 1 , 100,000, and a freestream Mach number of 0.8. The internal flow 
stagnation temperature and pressure are 300 Kelvin and 1.32 atm., the freestream 
stagnation temperature is 273 Kelvin, and the freestream pressure is one-half the 
internal flow stagnation chamber pressure. 

The test computation consists of a 100-step initial start run with J1BC=0, 
followed by four restart runs which employ J1BC=1. Figures 2-8 and 2-9 show the 
input data card images and the first page of printed output for the initial start. 
The remainder of the printed output for the initial start and final restart are 
given in Appendix D. Note that the code tests internally for axial symmetry, and 
automatically limits the printed output to cover only the vertical plane y=0, z^O. 

For each restart run, the input data which differ from the input data shown 
above for the initial start are as follows. All restarts employ J1BC=1. For the 
first restart, NRSTslOO, OMEOA=0.02. For the second restart, NRSTs200, DTsO.13, 
SMU»0.8, (HfEOA=0.03, and DTMAX»0.2S. For the third restart, NRST=300, DT= 0.2196, 
SMU=0.8, (HfEGAs0.03, and DTMAX=0.23. For the fourth restart, NRSTs400, DTs0.2S, 
(H4EOA=0.0, DTMAX:=0.2S, and SMU=0.8. 
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Section 3 


THE NOZLIC PROGRAM 


NOZLIC constructs the curvilinear coordinate system and grid for two- dimen- 
sional or axisymmetric flow configurations, and generates initial conditions for 
NOZL3D. For general three-dimensional nozzle configurations, NOZLIC merely reads 
the coordinate system and grid from a file prepared by the RORIDD grid generator 
code, and sets up crude initial flowfield conditions. 

Section 3.1 describes in general terms the input data required to operate the 
NOZLIC code. The major subroutines and their functions are outlined briefly in 
section 3.2. Sections 3,3 to 3.6 present the specific input data for a variety of 
two dimensional and axisymmetric test cases that do not require the use of the 
RORIDD code to generate the grid. The latter sections discuss in detail how the 
grid and flowfield initial conditions are constructed by NOZLIC for each class of 
flow problem. The test cases are those for which the NOZL3D cocfe input, output, 
and running instructions have been given in Section 2. The grid and initial 
conditions produced by NOZLIC for each test case are written bn a disk file on 
unit 4. An optional printout of these data can also be obtained from a NOZLIC run. 
For the test cases presented in Sections 3.3 to 3.6, this printe(| output is omit- 
ted because it is identical to the initial output provided by the NOZL3D code 
under the option IWRIT^l (see Section 2.2. 1.2 and Appendix D) . 

No test case is given for the general nozzle configuration whose image in the 
computational space is as depicted in Fig. 2.1 and that employs the RORIDD code to 
generate the grid. However, the manner in which the RORIDD output is used by 
NOZLIC and the manner in which the flowfield initial conditions are constructed on 
this grid are described in detail in Sections 3.1 and 3.2. 

3 . 1 INPUT DATA 

Many of the input data items required by the NOZLIC and NOZL3D codes are the 
same. To avoid confusion, the first four cards of input data for the NOZLIC code 
are identical to those for NOZL3D. The last of the five NOZL3D data cards is 
omitted from the input data card set of NOZLIC because it contains only one item 
that is irrelevant to NOZLIC. Further input data are required by NOZLIC and are to 
be supplied on additional cards as described below. 

The fifth and sixth cards are in 1615 and 8F10.0 formats, respectively, and 
contain the following items: 

NOPT - Option selector for type of flow configuration. Use NOPT«0 for external 
flat plate boundary layer flow, NOPT^l for two-dimensional internal 
nozzle flow (including so-called “two-dimensional" nozzles that 
really are three-dimensional, but have a rectangular cross section 
and flat sidewalls), NOPT=2 for axisymmetric flow, and NOPTs3 for 
general three-dimensional nozzle configurations. 

JREADX - Option selector that governs the automatic construction of a grid 
x(j) in the Cartesian x direction when the grid is not read in from 
a file (see IRORID below). JR£ADX=0 produces a uniformly spaced 
x-grid of JMAX points in the region XZERO^x^XMAX . If a nonuniform 
grid x(j) is desired, JREADX specifies the number of values x(j) 
that are to be read in, starting on input data card 7. If JREADX is 
non-zero, its value must agree with the input number JMAX, which 
specifies the total number of grid points in the x direction. 

IGEOM - An option selector for the geometric configuration of two- dimensional 
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nozzles. It is used only when NOPT=l, and specifies which of the 
nozzle geometries is to be selected from among those programmed into 
subroutine OECMf, The latter subroutine currently contains the 
following geometries: (i)Cosine nozzle (I0E0M>:1) configuration 

described in Section 3.1, Ref. 3, ( i i )Two-dimens iona I 

converging-diverging nozzle (I0E01ie2) configuration described in 
Section 6.1, Ref. 3. Each of these nozzle geometries is specified in 
subroutine OE(Ri by the functions z(x) and A(x), where z(x) is the 
wail contour and A(x) is the cross-sectional area. 

KREADY - Option selector that governs the automatic construction of a grid 
y(k) in the Cartesian y direction for two-dimensional nozzle 
configurations or for simple three-dimensional configurations having 
a rectangular cross section and flat sidewalls. This option, like 
JREADX, is used only when the grid is not read from a file (i.e., 
when IRORIDsO). The option KREADY=0 produces a uniformly spaced y(k) 
grid of RMAX points in the region O^y^YMAX. If a nonuniform grid is 
desired, KREADY specifies the number of values of y(k) that are to 
be read in following the array x(j) that specifies the grid for the 
X direction. If the input data satisfy the inequality 0< KREADY <KMAX, 
the the code automatically constructs the remainder of the y grid by 
distributing the additional points exponentially between the last 
input value y(KREADY) and the input YMAX described below. The 
exponential stretching is controlled by the input quantity FN 
described below. For axisymmetric flow (NOPT=2), KREADY=0 must be 
input. 

IRGRID - Specifies whether the grid is to be constructed by the NOZLIC code 
(IRORID=0) or is to be read in from a file contained on unit 3 

(IRGRIDsl). Note that the RGRIDD code writes this file to unit 2. 

ICRUDE - Specifies whether the initial conditions are to be computed by 
subroutine INITQ or by subroutine CRUDIC. The functions of these 
subroutines is discussed later in Section 3.2. 

ITOT, INWALL - These inputs are used only for axisymmetric flows (NOPT ^2) and 
should be set to zero for other cases. ITOT and INWALL are integers 
associated with the specification of boundary conditions at the 
inflow plane. For 1TOT>0, the inflow boundary conditions are read in 
from the last set of data cards (8F10.0 format). The latter data 
specify the radial distributions of total pressure, of total 
temperature, and of the ratio between the radial and axial velocity 
components. These data are to be supplied in sets that specify in 
order the radial location RI and the non-dimensional boundary 
conditions at that location: total pressure PTI , total temperature 
HTI , and velocity component ratio VROUI . ITOT is the total number of 
such sets to be read in, and INWALL is the index of the set that 
corresponds to the interior surface of the nozzle wall. The inflow 
boundary conditions at actual grid points are obtained from this 
input array by linear interpolation once the grid is constructed. If 
ITOT=INWALLsO, ICRUDE=1 are input with the axisymmetric flow option 
NOPT=2,the described boundary condition array is not read in as part 
of the input data, but is computed in subroutine INFLOW from the 
initial flowfield conditions that are set up by subroutine CRUDIC. 

The sixth input data card specifies the following information in 
8F10 . 0 format . 


PAGE 23 


XZi^O,XllAX • These specify, respectively, the Cartesian coordinates x(jsl) and 
x( j =J¥AX) of the inflow and outflow planes. 

FN - Coordinate stretching parameter. For external flat plate boundary layer 
flow (NOPTsO), FN specifies the location of the upper computational 
boundary OfAX in units of the estimated boundary layer thickness. 
For example, FN-10 specifies that the boundary is located a distance 
of 10 boundary layer thicknesses above the plate. The boundary layer 
thickness is estimated automatically in terms of the f rees t ream Mach 
number FSMACH. An exponential stretching function automatically 
tailors the vertical (z) grid to place half the grid points between 
the plate surface and the estimated boundary layer edge. For either 
two-dimensional internal flow in a nozzle or for three-dimensional 
internal flow in a so-called "two-dimensional” nozzle with flat 
sidewalls and a rectangular cross section (NOPT=l), the input FN<1 
controls the exponentially stretched grid point distribution in the 
vertical z(l) direction so that, at each streams^ise station x(j), 
half the grid points lie in the region z/zmax(x)^FN, where zmax(x) 
is the local height of the nozzle wall at station x. The nozzle wall 
shape zmax(x) is specified by a function statement in subroutine 
OEOM. For the case of a three-dimensional nozzle with flat side- 
walls, the remainder of the transverse y grid tiiat is not read in 
under the KREADY>0 option is stretched automatically so that 
the transverse grid spacing Ay at the sidewall y=ymax is the same 
at each x station as the vertical grid spacing Az at the upper 
nozzle wall z=zmax(x). 

YMAX - This input is used only for options NOPT=0,1, and specifies the Carte- 
sian coordinate y(K=KMAX). For the flat plate boundary layer, 
NOPT=0, YMAX is the half-width of the plate. For a "two-dimensional" 
nozzle with flat sidewalls and a rectangular cross section (NOPT=l), 
YMAX is the half-width of the nozzle, i.e., the distance from the 
vertical symmetry plane y=0 to the nozzle sidewall. 

For complicated nozzle configurations (NOPT=:3) where the grid is read in 
(IRORIDsI) and the initial conditions are computed by subroutine CRUDIC (see 
Section 3.2), the inflow boundary conditions must be supplied on a final set of 
input data cards that follow all other input cards. This final card set specifies 
the boundary conditions on the total pressure PTOT, total temperature HTOT, and 
the ratios YOU (v/u) and WOU (w/u) of the transverse Cartesian velocity components 
v,w to the normal component u at each grid point K,L of the inflow plane. These 
data, one set per card, must appear in the following order: L, K, PTOT, HTOT, YOU, 
WOU. The first two items on each card are in 215 format, and the last four are in 
4F10.0 format. The total number of data sets (cards) must be equal to the product 
of the input integers KMAX and LMAX that are contained on the first NOZLIC input 
card, since the product represents the total number of grid points that lie in the 
inflow plane. 

The DMGASP routine uses macros from the system file. This file is named 
COM4 30 /MASTER. In order to compile, the following control (Commands should be 
included in the deck; 

ATTACH (OPL/UN=L I BRARY ) 

FTN(I=COMPILE,X=OPL,OPT=2, . . . ) 
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3.2 MAJOR SUBROUTINES 


The major .subroutines of the NOZLIC code and the functions performed by 
each are outlined below. 

MA I N . This routine controls the logical flow and calls the principal 
subroutines. 

I NPUT This subroutine reads the input data. It also prints out all the 
inputs, as well as the other derived data such as the inflow boundary conditions 
that are computed automatically under NOPT=2 when ITOT=INWALL=0 , ICRUDE=1. 

NDLPTS . This subroutine either reads the curvilinear coordinate system and 
grid for complicated nozzle configurations (IRGRID=1, NOPT=3) or constructs the 
grid for simpler problems (I RGRID=0 , NOPT=0 ,1,2). The fashion in which the grid is 
constructed under each of the latter options is described in subsequent sections 
of this user’s guide that deal with individual test cases. 

IN.niQ.: This subroutine sets up the flowfield initial conditions for relatively 
simple configurations (NOPTr.;0 , 1 , 2 ) . The manner in which the initial conditions are 
computed under each of the latter options is described in subsequent sections of 
this user’s guide that deal with individual test cases. 

This subroutine sets up crude initial conditions, and must be used 
(ICRUDE^l) for complicated nozzle configurations (NOPT--3) where the grid is read 
in (IRGRID=1). Because the present user’s guide does not include a test case that 
exercises subroutine CRUDIC, we shall outline briefly below how the latter 
computes crude initial conditions for the interior and exterior flow regions of a 
general nozzle whose configuration in the computational space is as illustrated in 
Fig. 2-1. 

The reader is reminded that, for such combined interior and exterior flows, 
the non-dimensional variables used in both the NOZLIC and NOZ1.3D codes are defined 
so that variables such as pressure, density, and temperature are normalized by the 
corresponding internal flow stagnation chamber conditions, whereas velocities are 
normalized by the stagnation chamber sound speed. The initial conditions are 
specified in terms of the non-dimensional f i v e - c ompon e n t flow variable vector q at 
each grid point (see Ref. 1 , Section 2.1). 

The boundary conditions on total pressure, total temperature, and velocity 
vector direction cosines at all grid points (J,K,L) of the inflow plane J = 1 are 
read in as input data. At all other grid points (J,K,L), J > 1, the velocity 
vector is forced to be tangent to the grid lines K,L = constant along which J 
alone varies. The total pressure and total temperature along each such grid line 
is taken to be constant and equal to its value at the inflow plane J = 1. This 
allows all flow variables to be computed at any grid point if the local static 
pressure is specified at the point. At points outside the nozzle, K S KW + I , L S 
LW + 1, the static pressure is set equal to the freestream pressure ESP. The 
latter pressure also is used at points Kg KW, Lg LW that lie in the region J S 
min(JKW,JLW) downstream of the nozzle exit. Inside the nozzle L g LW, K g KW, J < 
min(JKW.JLW) the static pressure is computed from the one -d imens i ona 1 , inviscid, 
isentropic flow relations using the actual nozzle internal area variation under 
the assumption that the flow is choked at the geometric throat X = 0. This inter- 
nal pressure is taken to be uniform over the nozzle cross section at each stream- 
wise station x(J). 
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3,3 TEST CASE NO. 1: FLAT PLATE BOUNDARY LAYER 


The flow conditions for this test case already have been described in 
Section 2.2.1. 


3 . 3 . 1 De s c r i p t i on o f Gr i d and 1 n i t i a 1 Cond i t i on s 

The plate occupies the portion of the Cartesian coordinate plane z=0 that lies 
in the region O^XZERO^XMAX , -l/2^y^l/2. The inflow and outflow boundaries are 
placed at X=XZERO and XMAX , respectively. For given input values of the freestream 
Mach and Reynolds numbers, the viscous boundary layer thickness its estimated as a 
parabolic function of X from existing laminar boundary layer solutions. The upper 
boundary of the flow region z=zmax (x) is placed at a distance of FN boundary 
layer thicknesses away from the plate in the z direction, where FN is an input 
constant. The image of this upper boundary in the compu t a t i opa 1 space is the 
surface L=LMAX. The grid points are equally spaced in the direction along the 
plate between XZERO and XMAX. At each x station, the grid points are distributed 
exponentially as a function of z to provide a fine grid near the surface of the 
plate and a coarse grid outside the viscous layer. The exponential is tailored to 
place half the grid points inside the viscous layer and half between the boundary 
layer edge and the upper computational boundary z=zmax(x). The grid points are 
equally spaced in the y coordinate direction. These calculations, are performed in 
subroutine NDLPTS . 

The initial conditions on the flow variables at grid points are computed in 
subroutine INITQ. Pressure is taken as uniform and equal to its freestream value. 
Velocity is determined from the Blasius boundary solution for incompressible flow. 
Temperature is computed from the velocity through the Ciocco relation, and density 
follows from the equation of state. 

: ( 

3.3.2 Input Data and Output 

Card images of the input data for this test case are given in Fig. 3-1. The 
first page of printed output is displayed in Fig. 3-2 and merely reproduces the 
input data. A printout of the grid and initial flow field also is given when the 
input option IWRIT=1 is selected. This output is not shown here because it is 
identical to the initial flowfield output given by the NOZL3D code under the 
option IWRIT=1 The latter output for the test case is reproduced in Appendix D. 

3.4 TEST CASE NO. 2: TWO-DIMENSIONAL INTERNAL FLOW 

Test case No. 2 is for a so-called "two-dimensional" nozzle that has straight 
sidewalls and a rectangular cross section of constant width. For this test case, 
only the two dimensional flow in the vertical plane of symmetry of the nozzle is 
considered. The nozzle configuration and operating conditions already have been 
described in Section 2.2.2. 
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3.4.1 Description of Grid and Initial Conditions 

The nozzle is bilaterally symmetric. The x axis of the Cartesian base coor- 
dinate system coincides with the intersection of the vertical and horizontal 
symmetry planes. The latter planes coincide with the Cartesian planes y=0 and z^O, 
respectively, and the origin of the coordinate system is positioned at the geome- 
tric center of the throat. The test case considers the flow in the upper part of 
the vertical symmetry plane y=0, z^O between an upstream inflow boundary and the 
outflow boundary, which coincides with the nozzle exit plane. The described region 
interior to the nozzle is covered by a 23x15 grid in the x(j) and z(l) directions, 
respectively. The streamwise (x) grid is nonuni form wi th a relatively fine spacing 
near the throat. The vertical (z) grid is stretched exponentially to resolve the 
wall boundary layer. Along each vertical grid line, half the grid points lie in 
the region 0 . 99^z/zmax(x)^l . The physical coordinates of the x(j) grid are read in 
(JREADX=23). A function specifying the nozzle wall shape in dimensional units 
(inches) is contained in subroutine GE(M (IGEOM=l option). Before the final grid 
is constructed by subroutine NDLPTS, all inputted dimensions, including the nozzle 
wall shape function, are automatically normalized by the throat half-height. The 
code assumes the throat always to be located at the position x=0. The nozzle wall 
height zmax(x=0) at this position thus forms the reference length by which all 
dimensions are normalized in both the NOZLIC code run and the subsequent NOZL3D 
code run. Note that a similar normalization of dimensions is employed for all 
nozzle configurations, regardless of the option NOPT=l,2, or 3. For general 
three-dimensional nozzle configurations, the reference length always is selected 
as the z foordinate of the internal surface of the nozzle wall at the position 
x*0, y»0. 

The initial flowfield conditions are computed in subroutine INITQ as follows. 
The nozzle is assumed to be choked at the throat. The pressure, density, 
temperature, and streamwise velocity (averaged over the cross section) are compu- 
ted from one-dimensional inviscid isentropic flow theory for the nozzle area 
variation. These inviscid core flow conditions are applied over the lower half of 
the grid O^L^LMAX/2 , assuming that the streamlines are parallel to the grid lines 
Lsconstant. The velocity components at the nozzle wall L=LMAX are set to zero to 
satisfy the no-slip viscous wall boundary conditions. The velocity components at 
the remaining grid points are linearly interpolated in L between LMAX/2 and LMAX. 
The Crocco relation is used to compute temperature from velocity in this region. 
Density follows from the equation of state by taking the pressure as uniform over 
the nozzle cross section at each x station. 

The inflow boundary conditions on total pressure, total temperature, and on 
the ratios of the transverse velocity components to the streamwise component are 
simply computed from the described initial flow conditions at the inflow plane 
J=l. 

3.4.2 Input Data and Output 

Card images of the input data for this test case are given in Fig. 3-3. The 
first page of printed output is displayed in Fig. 3-4 and merely reproduces the 
input data. A printout of the grid and initial flowfield also is given when the 
input option IWRIT=1 is selected. This output is not shown here because it is 
identical to the initial flowfield output given by the NOZL3D code under the 
option IWRIT=1. The latter output for the test case is reproduced in Appendix D. 
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3.5 TEST CASE NO. 3: THIUBE-DIMBNSI(»4AL INTERNAL FLOW 

Test Case No. 3 is a three-dimensional flow computation for the same 
nozzle configuration dealt with in the two-dimensional flow computation of Test 
Case No. 2. The nozzle operating conditions are identical to those for Case No. 2. 

3.5.1 Description of Grid and Initial Conditions 

The vertical (z) and streamwise (x) grid is the same as for the 2-D flow 
computation of Test Case No. 2. For the 3-D case, 10 grid points are distributed 
in the y direction between the vertical symmetry plane y«=0 and the nozzle sidewall 
with an exponential stretching to resolve the sidewall boundary layer. The first 
three of these grid point locations are read in (KREADY=3). The remainder of the y 
grid is computed automatically as described under the input item KREADY in Section 
3.1. The dimensions are normalized by a reference length (the thjroat half -height) 
as described in Section 3.4.1. 

The flowfield initial conditions and the inflow boundary conditions are 
computed by subroutine INITQ in the same general fashion as outlined in Section 
3. 4. Ifor Test Case No. 2. 

3.5.2 Input Data and Output 

Card images of the input data for this test case are given in Fig. 3-5. The 
first page of printed output is displayed in Fig. 3-6 and merely reproduces the 
input data. A printout of the grid and initial flowfield also is given when the 
input option IWRIT^l is selected. This output is not shown here because it is 
identical to the initial flowfield output given by the N0ZL3D code under the 
option IWRITsl. The latter output for the test case is reproduced in Appendix D. 

3.6 TEST CASE NO. 4: INTERNAL AND EXTERNAL FLOW FOR AN AXISYMMETRIC NOZZLE 

The nozzle configuration and operating conditions already have been described 
in Section 2.2.4, which deals with the NOZL3D code running instructions for this 
test case . 

3.6.1 Description of Grid and Initial Conditions 

The X axis of the Cartesian coordinate system is chosen to coincide with the 
axis of symmetry of the nozzle. The flowfield region for the computation occupies 
the region between inflow and outflow planes normal to the axis, between the 
vertical and horizontal symmetry planes y=0 and z^O, and inside a cylindrical 
outer ”f reestream” boundary that is concentric with the nozzle. That is, the flow 
region occupies only a portion of the quarter-space y^O, z^O. 

The grid consists of KMAX=5 meridional planes equally spaced at intervals of 
22.5 degrees, JMAX=28 cross-sectional planes along the x direction, of which the 
last five are downstream of the nozzle exit (JLWs23), LWsl5 grid points exponen- 
tially distributed across the interior of the nozzle in the radial direction, and 
another 13 points exponentially distributed in the radial direction between the 
outer nozzle wall and the lateral outer computational boundary (LMAX=28). The 
nonuniform axial grid x(j) is read in (JREADX s 28). The equally- spaced meri- 
dional grid is constructed automatically by the code under the option NOPT=2. The 
meridional plane K=1 coincides with the Cartesian coordinate plane y=0. The x-z 
grid is constructed first in this plane and then rotated to obtain the grid in 
each of the remaining planes. 
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The grid is constructed by subroutine NDLPTS, using information about the 
nozzle geometry that is contained in three function subroutines: RWFUNC(X) , 
RWOUT(X), and RMAX(X) . The latter specify, respectively, the radii of the interior 
and exterior surfaces of the nozzle wall and the radius of the lateral outer 
"freestream" computational boundary, all as functions of the axial coordinate x. 
Note that RMAX(X) is a constant for the present test case. As mentioned earlier, 
the axial grid is read in. The radial grid i.e., the z*grid for the meridional 
plane X=:l under discussion, is stretched exponentially with separate stretching 
functions in the interior of the nozzle and in the exterior flow region. Within 
each of these regions, the exponential is tailored to place half the grid points 
allotted to the region within a specified distance of the wall. For each region, 
the latter distance, which may vary with axial position, x, is specified by a 
function subroutine: DELT(X) for the nozzle interior, and DELOUT(X) for the 
exterior flow region. These function subroutines, as well as those described 
earlier that specify the nozzle wall and freestream boundary geometries, can be 
reprogrammed easily for other nozzle configurations. 

The inflow boundary conditions on total pressure, total temperature, and 
radial to axial velocity component ratio are not read in as input data for this 
particular test case. Rather, they are computed in a special subroutine, INFLOW, 
which is called from subroutine INITQ. The latter computes initial conditions for 
the flow region inside the nozzle in the same general way as for the internal 
flows dealt with in test cases 2 and 3. This defines the flow variables in the 
region L^LW, J^JLW. For the corresponding region downstream of the nozzle exit, 
J^JLW, L^LW, the exit plane conditions are used at each J. Outside the nozzle, the 
transverse velocity components v,w are set to zero, the static pressure and total 
temperature are set equal to their freestream values, and the total pressure at 
the inflow plane is computed from a formula given in subroutine INFLOW. 

The initial flow variables at points of the external flow region that lie 
downstream of the inflow plane are obtained as follows. Along each streamwise mesh 
line K,L=const., the total pressure is assumed constant and equal to its value at 
the inflow plane. The velocity , u, and static temperature T then are computed 
from the known total pressure, total temperature, and static pressure. The initial 
conditions at stations x=const. downstream of the nozzle exit plane simply are set 
equal to those at the exit plane itself. 

3.6.2 Input Data and Output 

Card images of the input data for this test case are given in Fig. 3-7. The 
first page of printed output is displayed in Fig. 3-8 and merely reproduces the 
input data. A printout of the grid and initial flowfield also is given when the 
input option IWRIT=1 is selected. This output is not shown here because it is 
identical to the initial flowfield output given by the NOZL3D code under the 
option IWRIT=1. The latter output for the test case is reproduced in Appendix D. 
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1.00000400 

.00000 


Rl .PTI .HTI .VROUI- 


10 

6.37944400 

1.00000400 

1.00000400 

.00000 


Rl .PTI .HTI .VROUI- 


II 

6.40241400 

9.95461-01 

1.00000400 

.00000 


Rl .PTI .HTI .VROUI« 


12 

6.41596400 

9.91034-01 

1.00000400 

.00000 


Rl .PTI .HTI .VROUI- 


13 

6.42398400 

9.86641-01 

1.00000400 

.00000 


Rl .PTI .HTI .VROUI- 


14 

6.42871400 

9.82375-01 

1.00000400 

.00000 


Rl .PTI .HTI .VROUI» 


15 

6.43150400 

9.68690-01 

1.00000400 

.00000 


Rl ,PTI .HTI .VROUI- 


16 

7.62000400 

5.02094-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUI- 


17 

7.62012400 

5.15349-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUI- 


18 

7.62042400 

5.22160-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUI- 


19 

7.62118400 

5.30015-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUU 


20 

7.62308400 

5.39975-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VfiOUl* 


21 

7.62785400 

5.53055-01 

1 . 10544400 

.00000 


Rl ,PTI .HTI .VROUI- 


22 

7.63983400 

5.70564-01 

1 . 10544400 

.00000 


Rl .PTI .HTI , VROUU 


23 

7.66992400 

5.94359-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUU 


24 

7.74552400 

6.27224-01 

1 . 10544400 

.00000 


Rt .PTI .HTI .VROUU 


25 

7.93540400 

6.73547-01 

1 . 10544400 

.00000 


Rl .PTI ,HTi .VROUU 


26 

8.41238400 

7.40606-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUU 


27 

9.61049400 

7.62170-01 

1 . 10544400 

.00000 


Rl .PTI .HTI .VROUU 


28 

1.26200401 

7.62170-01 

1 . 10544400 

.00000 


Output Page for Test Case No. 4 - NOZLIC 
FIG. 3-8 
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APPENDIX A 


LISTING OF THE NOZL3D PROGRAM 




N0ZL30 - COMDECKS 

1 •COMDECK BASE 

2 CX)MMON/BASE/NMAX,JMAX,KMAX,LMAX,JM,KM,LM,DT, GAMMA, OAMI .SMU.FSMACH 

3 1 ,OXl,OYl,OZl,ND,NDa,EV(5).FD(5).HD.ALP,GO,OMEGA,HOX,HOY,HDZ 

t a,RM,CfCR,PI,ITR.lNVISC.LAMIN,NP.INTl.INTe,INT3 

5 3.KPLANE,ITW,TW,WMD0T,L1BC.LMAX8C,LU,U,JWL1.KU,WTFAC.JMAXBC 

6 ‘♦.JlBC,JB.HrOT(3e.32),PTOT(32,3a).VOU(32,3e),WOO(32,32),KMAXBC,KAL. 

7 5K1BC.0TFAC.R£SID.M<,AREF,LM,KM.JLIM..X1MU,JKIM.,JKIMU.JLM,JKM 

8 6,SMO,XLSKM2,XLS22.ZLSKM2,ZLSe2.ENTGO«32) .ENTGOl (32,5) ,SIGJMX,JTJ, 

9 7KTJ,LTJ,IGNCAL,NRES,NC,NC1,TAU,NSTEP,JT,KT,LT,SIGMAX,GF(5),RESIDS 

10 B,NKLP,NLRCM,NLSKIP,KL2, INXBC,RMA(X,OTMAX,KVIS,LVtS,KLVIS 

11 (XMM0N/GE0/NBl,N82,RFR0NT.BMAX,X«.XMAX,DRAD,DXC 

12 COMMON/REAO/NRST,lWRIT,NGfll,NTOUT 

13 COMMON/VIS/RE, PR 

14 oCOMDECK BTRIO 

15 C0MM0N/BTR1D/A(32,5,5) ,9(32,5,5) ,C(32,5,5) ,0(32,5,5) ,F(32,5) 

16 ‘COMDECK GLOB 

17 COMMON/GLOB/CWFAC,CW, JTT,AT,D1NJMX(5) ,D1NJ1 (5) ,ENTB(32,5,2) 

19 1 ,QBL1,Q6LMAX,1GFSUR,ENTD(32) 

19 ‘COMOECK RHS8CC 

20 (XIMMON/RHSBCC/ I W , KLXIRLU ,LORKMX ,KORLMX ,LMORKM , LLORKL , LUORKU ,LKMXBC 

21 1 ,KLMXBC,LKlBC,KLlBC,LORKM,KORLM,JLKIWL,JLKlWU,JKLlWL,JKt.lWU,JLKW 

22 l,JKLW,OZOROY,GKPfi,PRTR,l.J,KLORLL 

23 •COMOECK SHOCKC 

24 C0MM0N/SH0CKC/XST(32,32) ,YST(32,32) ,ZST(32,32) ,ZET(32,32) , 

25 1 03(32,321 ,SHKWT 

26 "COMDECK VARSl 

27 C-OMMON/VARS/OCSB, 16,32) ,06(32,32) ,X(32) ,XX(32, 4) ,YY(32,4) 

28 1,ZZ(32,4) 

29 "COMDECK VARS2 

30 DIMENSION TURMU(32, 16,32) ,Y(32, 16,32) ,Z(32, 16,32) ,S(32, 16,32) , 

31 IXXI (32,16,32) ,YXI (32, 16,32) ,ZXI (32, 16,32) ,DXIDX(32, 16,32) , 

32 20XI0Y(32, 16,32) ,DXIDZ(32, 16,32) 

33 EOUIVALENCE (0,T1;RMU,Y,Z.S,XXI ,YXI ,ZXI ,DXIDX,DXIDY,DXIDZ) 

34 C 

35 C THE 0 ARRAY IS USED AS FaUOWS, WHERE JK IS EITHER J OR K: 

36 C 


37 

C 

0(L, 1,JK) 

Q(L, l.JK) 

RHO 


38 

C 

Q(L, 2,JK) 

OIL, 2,JK) 

RHO"U 


39 

C 

Q(L, 3,JK) 

Q(L, 3.JK) 

RHO"V 


40 

C 

Q(L, 4,JK) 

Q(L, 4.JK) 

RHO"W 


41 

C 

0(L, 5,JK) 

OIL, 5,JK) 

E 


42 

C 

0(L, 6,JK)TURMU(L, 6,JK) 

TURMU 


43 

C 

Q(L, 7,JK) 

Y(L, 7,JK) 

Y 


44 

C 

OIL, 8,JK) 

Z(L, 8,JKI 
S(L, 9,JK) 

Z 


45 

C 

0(L, 9,JK) 

SI 


46 

C 

O(L,I0,JK) 

S(L,I0,JK) 

S2 


47 

C 

0(L,11,JK) 

S(L,11,JK) 

S3 


48 

C 

Q(L,12,JK) 

S(L,12,JK) 

S4 


49 

C 

Q(L,13,JK) 

S(L,I3,JK) 

S5 


50 

C 

Q(L,14,JK) 

XXI(L,14,JK) OR 0XI0X(L,14,JK) 

DXOXI 

OR DXIDX 

51 

C 

Q(L,15,JK) 

YXI(L,15,JK) OR 0XI0Y(L,15,JK) 

DYDXI 

OR OXIDY 

52 

C 

0(L,16,JK) 

ZXI(L,16,JK) OR DXIDZ(L,16,JK) 

DZDXI 

OF DXIDZ 


53 C 

54 C THE JACOBIAN IS STOREO IN Q(L,14,J) FOR CONSTANT K 

55 C AND IN OIL, 15, K) FOR CONSTANT J, 

56 C WITHIN SWEEPS IT IS REFERENCED BY Q6(L,JK). 

57 C 

58 "COMDECK VI SC 

59 C0MM0N/VISC/S0(32) ,S1 (32) ,S2(32) ,S3(32) ,54(32) ,S5(32) ,S6(32) ,U(32) 

60 1 ,V(32),W(32),E(32),RR(32),DEU(32,5,5) 

61 "COMOECK VI SCO 

62 COMMON/VISCO/RMUEXP, 1SUTH,TSUTH 
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N0ZL30 - AMATRX 
I ‘DECK AMATRX 

S SUBROUTINE AMATRXIA, JK.L ,R1 ,R2.R3,RH) 

3 ‘CALL BASE 
t *CALL VARS I 

5 ‘CALL VARSE 

6 DIMENSION A(5,5) 

7 GAME » S. -GAMMA 

8 RR » l./Q(L.I,JK) 

9 U =■ Q(L,S,JKI*RR 


10 

V « Q(L, 

3,JK)«RR 

It 

W * Q(L.' 

^.JK)*RR 

IS 

UU * U«R1+V*RS+W*R3 

13 

UT « U“E+V»*E+W“E 

It 

Cl » GAMI*UT‘.5 

IS 

CS * Q(L 

,5,JK)*RR*GAMMA 

16 

A(l,l) 

S 

RH 

17 

Ad, SI 

S 

Rl 

18 

Ad, 31 

= 

RS 

19 

Ad,t) 

3 

R3 

SO 

Ad, 51 

3 

0. 

El 

A(S,II 

= 

Rl*C!-U*UU 

EE 

A(S,S) 


Rif+UU+Rl«GAMa*U 

E3 

A(S,3) 

3 

-Rl*GAHI*V+R2*U 

Et 

A(S,tl 

3 

~RMGAHI*W+R3«U 

E5 

A(S,5) 

= 

RMGAMl 

S6 

A(3,l) 

3 

R2«C1“V«UU 

S7 

A(3,EI 

3 

Rl«V-R2«6AMI*U 

EB 

A(3,3I 

3 

R>++UU+R2*GAMa*V 

E9 

A(3,t) 

3 

-Re*0AMMW+R3«V 

30 

At3,5) 

3 

Ra*GAMI 

31 

A(t,l) 

3 

R3«Cl-W*UU 

3E 

Alt, SI 

3 

R1«W-R3«GAMI*U 

33 

Alt, 3) 

3 

R2«W-R3«GAMMV 

3t 

A(t,t) 

B 

R4'+UU+R3«GAMa*W 

35 

Alt, 5) 

3 

R3«GAMI 

36 

A(5,l) 

3 

(~ca+a. •Cl) «uu 

37 

A(5,S) 

3 

Rl • (C2-C1) -GAMI *U*UU 

36 

A(5,3) 

3 

Ra«(Ce-Cl)-GAMI«V*UU 

39 

A(5,t) 

3 

R3« (ca-cn “GAMI *w*uu 

to 

A(5,5) 

3 

R4+GAMMA*UU 

tl 

RETURN 



ts 

END 




PAGE E 



N0ZL3D - BC 


1 »OECK BC 

2 SUBROUTINE BC(J) 

3 -CALL BASE 

4 *CALL VARSl 

5 *CALL SHOCKC 

6 COMMON/AXISYM/LAXIS 

7 *CALL VARS2 

8 PdL. tK)=GD*(Q(IL,5, JK) - .5» (Q( IL.2, IK) •*2+Q( IL,3, IK)**2 

9 I +Q(IL,4,IK)»*2)/Q<IL,I.IK>) 

10 EAVGdLL.IKL.ILB.IKBlo.S^CQdLL.S.IKU-^^OULB.SdKB)) 

11 E0RAVGdLL.IKL,ILe.IKB)«.5*(QdLL.S.IKU/QdULd.IKL)+QdLB,5,IKB) 

12 1 /QdLBd.IKB)) 

13 J«JJ 

14 C ELIMINATE ROUNDOFF ERROR IN TRANSVERSE VELOCITY V FOR PLANE FLOW 

15 C IN THE XZ PLANE (PLANE«1 ) AND ENFORCE PLANAR SYMMETRY 

16 IFlKMAX.EQ.n GO TO 95 

17 IF(KPLANE.EQ.O) GO TO 95 

18 DO 90 L»1,LMAX 

19 DO 90 K-2.KMAX 

20 DO 85 N-] .5 

21 85 Q(L.N.K)>Q(L.N. 1 ) 

22 Q(L.3.K)«0. 

23 90 CONTINUE 

24 95 CONTINUE 

25 C LAGGED B.C. FOR INTERNAL CORNERS AND SINGULARITIES 

26 C INTERNAL CORNER AT KMAX.LMAX 

27 IFIKPLANE.EQ. 1 ) GO TO 100 

28 IFCKMAXBC.NE.l .OR. LMAXBC.NE.l) GO TO 100 

29 IF(J.LT.JB) GO TO 1000 

30 LLL-LMAX 

31 KLL-KMAX-1 

32 LLB»LMAX“1 

33 KLB-KMAX 

34 L«LMAX 

35 K-KMAX 

36 Q(L.5,K)»EAVG(LLL,KLL,LLS,KLB) 

37 Q(L,l,K)-Q(L.5,K)/EORAVG(LLU,KLL,LLa.KLB) 

38 100 CONTINUE 

39 IF(NC.EQ.O) GO TO 1000 

40 C ELIMINATE ANY OUTFLOW OF COMPUTED INFLOW PLANE J*1 

41 C IF(J.NE. I ) GO TO 600 

42 C IFIJlBC.NE.n GO TO 600 

43 C 00 500 L-LL.LU 

44 C DO 500 K-KAL.KU 

45 C IF(Q(L.2,K) .OE.O) GO TO 500 

46 C Q(L,2,K)»0. 

47 C Q(L,3,K)-0. 

48 C Q(L,4,K)«0. 

49 C Q(L,5,K)-PT0T(L,K)/GD 

50 C Q(L. I .K)-PTOT(L,K)/HTOT(L,K) 

51 C 500 CONTINUE 

52 600 CONTINUE 

53 C B.C. AT SINGULAR AXIS L-1 FOR AXISYMMETRIC FLOW 

54 IF(ABS(Y( 1 ,7,KMAX)-Yd ,7, I n .GT. 1 .E-6 .OR. KPLANE.EQ.l) GO TO 1000 

55 C SET V-W-0 AND EXTRAPOLATE U.RHO.T QUADRAT ICALLY WITH ZERO NORMAL 

56 C GRADIENT AT AXIS 

57 IF(J.LT.JB) GO TO 1000 

58 RHO-0 . 

59 U-0. 

60 TEM-0. 

61 DO 900 K«i ,KMAX 

62 RH0I«Q(2. 1 .K) 

63 RH02«Q(3. 1 ,K) 

64 U1<*Q(2,2.K)/RH01 

65 U2-Q(3,2,K)/RH02 

66 V1«Q(2.3.K)/RH01 

67 V2-Q(3.3,K)/RH02 

68 W1-Q(2.4,K)/RH01 

69 W2-Q(3,4,K)/RH02 

70 Tl«G0»(Q(2,5,K)/RH01-,5»(Ul»*2+VI»*2+WI**2)) 

71 T2-00»<Q(3.5.KJ/RH02-'.5*(U2*»2+V2»*2+W2**2) ) 

72 RHO-RHO+4 . *RHO I -RH02 

73 U-U+4.»UI-U2 

74 900 TEM-TEM+4.»T1-T2 

75 U-U/13.*KMAX) 

76 RHO«RHO/(3.»KMAX) 

77 TEM-TEM/ (3. »KMAX) 

78 IFIJ.NE.n 60 TO 920 

79 IF(JIBC.EQ.O) GO TO 920 

80 TEM-HTOT d , 1 ) • < RHO *HTOT d . D /PTOT d , 1 d • *OAM 1 

81 U«SQRT(2.*(HT0T( I , I )-TEM)/OAMI ) 

82 920 CONTINUE 

83 DO 940 K-l.KMAX 

84 Q(l,l,K)-RHO 

85 Q(1 ,2,K)>RH0*U 

86 Qd.3.K)-0. 
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N0ZL3D - BC 

87 Q( 1 ,4,K)=0. , 

80 940 QU.5.K)*RH0»(TEM/GD+.5»U**a) 

89 C ELIMINATE ROUNDOFF ERROR FOR AXISYMMETRIC FLOW 

90 PI2«2.»ATANU.) 

91 PIP«PI2/(KMAX-1 . ) 

92 DO 950 L»1 ,LMAX 

93 DO 945 K»2,KMAX 

94 THET«(K-1)*PIP 

95 Q(L,l,K)«Q(L,l,n 

96 Q(L,2.K)-Q(L.2. I ) 

97 Q(L,5,K)«Q(L,5,n 

98 Q(L,3,K)«Q(L,H,n»SIN(THET) 

99 945 Q(L,4,K)«Q(L,4,n*C0S(THETI 

100 0(L.4.KHAX)«0. 

101 950 CONTINUE 

102 1000 CONTINUE 

103 C LAGGED B.C. FOR SINGULAR CORNERS AND EDGES 

104 C AXIAL INTERSECTION OF VERTICAL AND HORIZONTAL WALLS IN PLANES 

105 C L»l AND K»1 

106 1F(JLIWU.LE.0 .OR. JKIWU.LE.O) GO TO 150 

107 Jl« MAXO(JLIWL.JKIWL) 

108 J2»M1N0(JL1WU.JK1WU) 

109 IFU.LT.Jl .OR. J.GT.J2) GO TO 150 

110 LLL«1 

1 1 1 KLL=2 

112 LLB«2 

113 KL8»1 

114 Q(1 ,5, 1 l^EAVGCLLL-tKLL.LLB.KLB) 

115 Q( 1 , 1 , 1 )«Q( 1 ,5. 1 )/EORAVG(LLL,KLL.LLB,KLB) 

116 C CORNERS AND EDGES OF INTERMEDIATE WALLS 

117 150 IFIKW.LE.O .AND. LW.LE.O) GO TO 185 

118 IFIKW.GT.O .AND. LW.GT.O) GO TO 170 

119 C TRAILING EDGE OF LONE INTERNAL WALL THAT SPANS ENTIRE WIDTH OF 

120 C COMPUTATIONAL DOMAIN 

121 DO 165 IW«1 ,2 

122 CALL SW 

123 IF(LORKW.LE.O) GO TO 165 

124 IFIJ.NE. JLKW) GO TO 165 

125 I1»0 

126 LORK»LORKW 

127 Ll«-1 

128 KI«0 

129 IFdW.EQ.2) L1»0 

130 IF(IW.EQ.2) Kl»-1 

131 155 DO 160 K-KLORLL.KUORLU 

132 LLL-LORK 

133 KKK-K 

134 IF(IW.EQ.2) LLL“K 

135 IFUW.EQ.2) KKK«LORK 

136 Q(LLL, 1 ,KKK)»Q(LLL+Ll , 1 .KKK+Kl ) 

137 160 Q{LLL.5,KKK)«=P(LLL+L1.KKK+K1)/GD 

130 IF(ll.EQ.l) GO TO 165 

139 Il«t 

140 LORK=LORKW+l 

141 Ll—Ll 

142 K1=-K1 

143 GO TO 155 

144 165 CONTINUE 

145 GO TO 255 

146 C CORNERS AND EDGES OF BOTH INTERMEDIATE WALLS 

147 170 CONTINUE 

148 C AXIAL INTERSECTIONS OF THE TWO WALLS 

149 J2-MIN0(JKW.JLW) 

150 1F(J.6T.J2) GO TO 105 

151 C INTERNAL CORNER 

152 K-KW 

153 L«LW 

154 n«o 

155 175 IFCJ.NE. 11 GO TO 177 

156 IF(NC.EQ.NRST) GO TO 185 

157 Q<L.5,K)-PTOT(L.K)/OD 

158 Q(L,1,K)«PT0T(L,K)/HT0T(L,K) 

159 IFdl.EQ.tl GO TO 185 

160 GO TO 180 

161 177 LLL-L 

162 KLL-K-1 

163 LLB-L-I 

164 KLB-K 

165 Q(L.5,K)-EAV6(LLL,KLL.LLB,KLB) 

166 Q(L, 1 ,K)»Q{L,5.K)/E0RAVG(LLL,KLL,LLB,KLB) 

167 IFd 1 .EQ. 1 1 GO TO 185 

168 C EXTERNAL CORNER 

169 180 ll-l 

170 K-KW+1 

171 L-LW+1 

172 GO TO 175 

173 185 DO 250 1W*1 ,2 
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N0ZL3D - BC 
17H CALL SH 

175 C INTERSECTION OF PLUG AT LORK«I WITH SIDEPLATE AT KORL-KORLW OR KORLMX 

176 IF(JLKIWU.LE.O) GO TO 200 

177 IFCJ.LT.JLKIWL.OR. J.6T.JLK1WU) GO TO 200 

178 LORK-I 

179 IFIKORLW.EQ.OJ KORL«KORLHX 

180 IFCKORL.EQ.n GO TO 200 

181 IF(KORLW.NE.O) KORL«KORLW 

182 IFUW.EQ.2) GO TO 167 

183 L«LORK 

18H K-KORL 

185 LLL»L+1 

106 KLL*K 

187 LLB»L 

188 KLB»K-1 

169 60 TO 190 

190 187 L-KORL 

191 K-LORK 

192 LLL-L 

193 KLL»K+1 

19H LLB-L-1 

195 KLB-K 

196 190 Q(L,5,K}»EAVG{LLL,KLL.LLB.KLB) 

197 Q(L, 1 ,K)«Q(L.5,K)/EORAVG(LLL.KLL.LLB,KLB) 

198 C TRAILING EDGES OF WALL AT U>JLKW 

199 200 IF(J.NE.JLKW) GO TO 215 

200 K2-K0RLW-I 

20 1 LORK-LORKW 

202 II«0 

203 Ll“-1 

20H KI»0 

205 IFnW.EQ.2) Ll-0 

206 IFdW.EQ.B) Kl"-! 

207 205 DO 210 KORL«KLORLL ,K2 

208 L-LORK 

209 K«KORL 

210 1F(1W.EQ.2) L>KORL 

211 IFdW.EQ.2) K-LORK 

212 Q(L.dK)-Q(L‘»-Lld.K‘^KI) 

213 210 Q(L,5.K)-P(L<«‘L1 .K-t>Kl )/60 

214 IFdi.EQ.i) GO TO 215 

215 Il-l 

216 LORK-LORKW+I 

217 LI— LI 

218 Kl— K1 

219 GO TO 205 

220 215 IF(JKLW-JLKW) 250.220,230 

221 C CORNER POINTS AT MUTUAL TRAILING EDGE OF THE TWO WALLS 

222 220 IF(J.NE.JKLW) GO TO 250 

223 LORK-LORKW 

224 KORL-KORLW 

225 1 1-0 

226 LI — 1 

227 Kl — 1 

228 225 K-KORL 

229 L-LORK 

230 IFdW.EQ.2) K-LORK 

231 IFdW.EQ.2) L-KORL 

232 Q(L, 1 ,K)-Q<L-^Lt ,1 .K-^Kl ) 

233 Q(L,5,K)-P(L+L1 .K+KD/GO 

234 IFdi.EQ.i) GO TO 250 

235 Il-l 

236 LORK-LORK41 

237 KORL-KORL+l 

236 LI— LI 

239 Kl— Kl 

240 GO TO 225 

241 C INNER CORNER AND UPPER EDGE OF PROTRUDING SIDEPLATE 

242 C PROTRUDING EDGE POINTS AT LORKW 

243 230 IFIJ.NE.JLKW) GO TO 232 

244 C INNER CORNER 

245 LORK-LORKW 

246 KORL-KORLW 

247 LI — 1 

246 Kl-0 

249 L-LORK 

250 K-KORL 

251 IFdW.EQ.t) GO TO 231 

252 Ll-0 

253 K1«>1 

254 K-LORK 

255 L-KORL / 

256 231 Q(L. 1 .K)-Q(L+Lt , 1 .K’^Kt ) 

257 Q(L,5,K)-P(L+L1 ,K+KI )/60 

256 C PROTRUDING EDGE POINTS AT LORKW 

259 232 IFCJ.NE. JKLW) GO TO 235 

260 LORK-LORKW 
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N0ZL3D - BC 
86 1 kORL-KORLkI 

ese LI— 1 

863 K1«0 

86H Il-O 

265 833 L-LORK 

866 K-KORL 

267 IF( IH.EQ. I ) GO TO 83k 

S69 L 1 >0 

869 Kl — 1 

870 K-LORK 

871 L-kORL 

878 83k a(U,l,k)-Q(L+LI,l,k*kn 

873 Q(L.5.K)»P(U+LI,k+kU/GD 

27k IFUl.EQ.llGO TO 835 

875 kORL«kORL+l 

876 Il-I 

877 GO TO 833 

878 835 CONTINUE 

879 C 

890 C UPPER EDGES 

881 C 

888 IFCJ.LT. JLkW.OR.J.GT. JkLW) GO TO 850 

883 LORk»LORkW+l 

89k kORL-kORLW 

885 1 1-0 

886 837 k-kORL 

887 L-LORk 

888 LI-1 

889 kl-0 

890 IF(IW.EQ.I) GO TO SkO 

891 L-kORL 

898 k-LORk 

893 LI-0 

89k kl-1 

895 8k0 Q(L.l,k)-Q(L+Ll,l,k+kl) 

896 Q(L,5,k)-P(L+Ll,k+kl)/G0 

897 IF(ll.EQ.l) GO TO 850 

898 Il-I 

899 kORL-kORL+1 

300 GO TO 837 

301 850 CONTINUE 

308 855 CONTINUE 

303 C FILTER SOLUTION AT INFLOW 80UNDARY 

30k INFILT-0 

305 IFIRM.EQ.O.) RETURN 

306 IF(INFILT.EQ.O.OR.JlBC.NE.l) RETURN 

307 IF(NC.EQ.O) RETURN 

308 J-1 

309 Ll-1 

310 IF(LAXIS.EQ.O.AND.LIBC.EQ.I.AND.JLIWL.EQ.l) LI-8 

31 1 L8-LM 

318 IFILW.GT.OI L8-LW-I 

313 Kl-1 

3Ik IFCkPLANE.EQ.O.ANO.klBC.EQ. I .AND. JkIWL.EQ. I ) Kl-8 

315 K8-kM 

316 IF(kW.GT.O) k8-KW-l 

317 IF(kPLANE.EQ.l) kS-l 

319 C FILTER DENSITY OVER L 

319 DO 350 k-kl,k8 

380 DO 380 L-L1.L8 

381 IFCL-I 1315, 305, 315 

388 305 S(L,9,k)-.5«(Q(L, I ,k)+Q(L+l , 1 ,k)l 

383 GO TO 380 

38k 315 S(L.9,kl-.85»(QIL-l , 1 ,k)+Q(L+l , I ,kl+e. -OIL, 1 ,kU 

385 380 CONTINUE 

386 00330L-LI,L8 

387 330 Q(L,l,k)-SlL,9,K) 

388 350 CONTINUE 

389 C FILTER DENSITY OVER k 

330 00500L-LI,L8 

331 IFlkl .EQ.K8) GO TO kOO 

338 00 380 k-KI,k8 

333 IFIk-n 365,355,365 

33k 355 S(L,9,KI-.5M0(L,l,kl+Q(L+l,l,k)l 

335 GO TO 380 

336 365 SlL,9,k)-.85»(Q(L-l ,1 ,kl+QIL+l ,1 ,K)+8.»Q(L,I ,k)) 

337 360 CONTINUE 

338 D0390k-kl,k8 

339 390 Q(L, I ,k)-5(L,9,KI 

3k0 C RECOMPUTE MOMENTUM FLUXES AND ENERGY IN TERMS OF FILTERED DENSITY 

3k I C AND OF KNOWN TOTAL PRESSURE, TOTAL TEMPERATURE, AND VELOCITY 

3k8 C VECTOR INCLINATION 

3k3 kOO DO k50 k-kl,K8 

3kk RGMI-(Q(L,l,K)*HTOT(L,kl/PTOT(L,kn*»OAMI 

3k5 VSQ-8 . ‘HTOT ( L , k 1 • ( 1 . -ROM I) /GAM 1 

2k6 QIL,8,k)-Q(L,l ,k) »SQRT(VSQ/ ( I . +VOUCL ,k) “S+WOUIL ,k) ••8) ) 

3k7 Q(L,3,k)-Q(L,S,KI»VOU(L,k) 
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349 

350 

351 
358 
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Q(L,4,K)»Q(L,8,K)»W0U(L.K) 

450 Q(L,5,K)=Q(L, 1 ,K ) »HTOT (L ,K ) • (GAMMA-GAMI *RGMI) /GO 
500 CONTINUE 
RETURN 
END 
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N0ZL3D - BCAUJ 

1 «DECK BCALJ 

2 SUBROUTINE KALJIK.L) 

3 ‘CALL BASE 

>* ‘CALL BHSBCC 

5 COMMWI/AXISYM/LAXIS 

6 C SET UP MATRICES FOR ALGEBRAIC BC AT UPPER t LOWER BOYS It INT WALLS 

7 DO 1500 IW»1,2 

8 CALL SW 

9 KORL-M< 

10 L0RK«L 

11 imW.EQ.I) GO TO 100 

12 KORL»L 

13 L0RK»K 

1>I 100 IF(LORK.LT.LORKMX) GO TO 600 

15 C BC AT K-KMAX OR L*LMAX 

16 IF(LKMXBC.EQ.0.0R.LKMXBC.GE.3) GO TO 600 

17 IF(LKMXBC-2) HOO.BOO.BOO 

18 200 DO 300 J-JB,JMAX 

19 300 CALL BCFMAT(J,K,L,1,J) 

20 GO TO 600 

21 too DO 500 J»JB,JMAX 

22 500 CALL BCWMATU.K.L, 1 , J) 

23 IF1JMAXBC.EQ.2) CALL BCJMATl JMAX.K.L , 1 ) 

2>> C BC AT L-=l OR K«1 

25 600 IRLORK.GT.il GO TO 1100 

26 C TEST FOR INTERMEDIATE WALL NORMAL TO LORK=l SURFACE 

27 IF(KORLW) 700,700,1000 

28 700 JBCMIN=MAX0(JLK1WL,JB1 

29 JBCMAX>XK1WU 

30 BOO IF(JBCMAX.LE.JBCMIN) GO TO 1100 

31 DO 900 J=JBCMIN,,.BCMAX 

32 900 CALL BCWMAT(J,K,L, 1 , J) 

33 GO TO 1100 

3i» 1000 IF1K0 RL.lt. KORLW) GO TO 700 

35 1100 CONTINUE 

36 C BC AT INTERtCDIATE WALLS 

37 IFILORKW.EQ.O) GO TO 1500 

38 IF(LORK.LT.LORKW.OR.LORK.GT.LORKW+n GO TO 1500 

39 IF(KORLW.GT.O.AND.KORL.GT.KORLW+1) GO TO 1500 

40 JBCMIN"J8 

41 JBCMAX»XKW 

42 IFIJBCMAX.LE.JBCMIN) GO TO 1500 

43 DO 1200 J*JBCMIN,JBCMAX 

44 1200 CALL BCWIATIJ.K.L, 1 ,J) 

45 1500 C(»JTINUE 

46 C SET UP MATRIX ELEMENTS FOR USE OF LAGGED B.C. 

47 C SINGULAR AXIS L= FOR AXIAL SYMMETRY lLAXIS-1 1 

48 IF IL.NE.LAXIS) GO TO 80 

49 DO 75 J«I,JMAX 

50 75 CALL ZEROOQIJ) 

51 GO TO 155 

52 C INTERNAL CORI«R AT KMAX.LMAX 

53 80 IF (KMAXBC.NE.l.OR.LMAXaC.NE.l) GO TO 90 

54 IF (K*L.NE.KMAX*LMAX) GO TO 90 

55 DO 85 J-l.JMAX 

56 85 CALL ZEROOQIJ) 

57 GO TO 155 

58 C CORNER AT L-t, K-1 

59 90 IF (K‘L.NE.1) GO TO 101 

60 IF (,A<1WU*X1WU.LE.0) GO TO 101 

61 J2-MIN01JK1WU.X1WU) 

62 J1»MAX0(1,JK1ML,X1WL) 

63 IF (J2.LT.J1) GO TO 101 

64 DO 95 J*J1 . J2 

65 95 CALL ZEROOQIJ) 

66 C TRAILING EDGES AND CORNERS OF INTERMEDIATE WALLS 

67 IFIKW.LE.O .AM3. LW.LE.O) GO TO 155 

68 101 DO 135 IW-1,2 

69 CALL SW 

70 KORL-K 

71 LORK-L 

72 IF (IW.EQ.I) GO TO 105 

73 KORL-L 

74 LIWK-K 

75 105 IF (KORLW. LE.O) GO TO 135 

76 IF ( KORL.LT. KORLW. OR. KORL.GT.KORLW+1) GO TO 135 

77 C TRAILING EDGE OF WALL KORL -KORLW 

78 IF (LORKW) 115,115,110 

79 110 IF (LORK.GT. LORKW) GO TO 125 

80 1 15 CALL ZEROOQC JKLW) 

81 C CORNER OF INTERSECTION WITH PLUG AT LORK-1 

82 IF (LORK.NE. 1. OR. KORL.NE. KORLW) GO TO 125 

83 J2-JLK1WU 

84 J1=MAX0(XK1WL,1I 

85 IF (J2.LT.J1) GO TO 125 

86 DO 120 J-J1.J2 


I 
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87 lao CALL ZERODQU) 

88 C INNER EDOE OE PROTRUDING SIDEPLATE 

89 185 lE(LORKM.EQ.O) GO TO I3S 

80 IF (LORK.NE.LORKUtl.OR.KORL.NE.KORLH) GO TO 135 

91 IF (XKM.OE.JKLH) GO TO 135 

98 DO 130 J-JLKM.JKLH 

93 130 CALL ZERODQU) 

9i» 135 CONTINUE 

95 C CORNERS WHERE THE INTERMEDIATE HALLS INTERSECT 

96 IF (KW*LW.LE.01 GO TO 155 

97 IF IL.NE.LH.OR.K.NE.KH) GO TO IR5 

98 J8>MIN0UKH,JLU) 

99 DO mo J-I.JB 

100 mo CALL ZERODQU) 

101 GO TO 155 

108 195 IF (L.NE.LW+I.OR.K.NE.KH*!) GO TO 155 

103 J8>MAX0UKW,XH) 

109 DO 150 J-I.J8 

105 ISO CALL ZERODQU) 

106 155 CONTINUE 

107 C 

108 C PRESEVE INITIAL DATA AT INFLOW PLANE J-I IN REOION OUTSIDE NOZZLE 

109 IF(LW) 8100,8100,8300 

no 8100 IF(KW.LE.O) GO TO 3000 

III IF(K.LE.KW) CO TO 3000 

118 8800 CALL ZEROOQU) 

113 GO TO 3000 

119 8300 IF(KH) 8900,8900,8500 

115 8900 IF(L.LE.LW) 00 TO 3000 

116 GO TO 8800 

117 8500 IFIK.OT.KW .AND. L.OT.LW) CALL ZEROOQ(I) 

118 3000 CONTINUE 

119 C 

180 C LAGGED B.C. FOR NOZZLE LIP HALL POINTS AT J-JMAX WHEN JMAXBC-8 

181 C (OUTFLOW B.C. P-FSP IMPOSED) 

188 C 

183 IF(JMAXBC.NE.8) 00 TO 9999 

189 IFdTW .EQ. 1) GO TO 9999 

185 J - UMAX 

186 C 

187 C HORIZONTAL WALLS AT L«1 ,LMAX 

188 C 

189 IF(L .EQ. LMAX .AND. LMAXBC .EQ. 1) CALL ZERODQU) 

130 C 

131 C VERTICAL WALLS AT K-1 ,KMAX 

138 C 

133 IFIKPLANE .EQ. 1) GO TO 9999 

139 IF(K .EQ. KMAX .AND. KMAXBC .EQ. 1) CALL ZERODQ(J) 

135 9999 RETURN 

136 END 
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N0ZL30 - BCALKL 
•DECK BCALKL 

SUBROUTINE BCALKL (JJ,LORK, I WW) 

•CALL BASE 
•CALL RHSBCC 

COMMON/ AX I SYM/ L AX 1 S 

ISW*IWH4l 

J-JJ 
CALL SW 

C SET UP MATRICES POR ALGEBRAIC BC AT LOWER. UPPER BDYS AND I NT WALLS 
IF(LORK.LT.LORKMX) GO TO 330 
C BC AT LORK-LORKMX 

IF(LKMXBC.LT.l.OR.LKMXBC.GT.a) 00 TO 830 

iF(LKMXBC-a) aao.aio.aio 

C FREESTREAM BC 

610 DO 815 K-KLORLL.KUORLU 
KR-K 
LR-LORK 

IF(IW.EQ.l) GO TO 815 

KR-LORK 

LR“K 

ai5 CALL BCFMAT(J,KR,LR.ISW,KR) 

GO TO 330 
C WALL BC 

aao DO aas k-klorll,kuorlu 
KR»K 
LR-LORK 

iF(iw.EQ.i) GO TO aas 

KR*LORK 

LR«K 

333 CALL BCWMAT(J.KR,LR,ISW,KR) 

IF(J.EQ.JMAX .AND. JMAXBC.EQ.6) CALL BCJMATl J.KR.LR, ISW) 
aa5 CONTINUE 

C BC AT INTERMEDIATE WALLS 

830 IF(KORLW.LE.O) GO TO 860 
IFIJ.GT. JKLW) GO TO 360 

IF(LORKW.6T.O.AND.LORK.GT.LORKW+I ) GO TO 380 

KR»KORLW 

LR«LORK 

IF(IW.EQ.l) CALL BCWMAT(J.KR+1 .LR. ISW.KR+l) 

IF(IW.EQ.l) GO TO 840 

KR-LORK 

LR»KORLW 

CALL BCWMAT(J.KR,LR+1,ISW,KR) 

340 CALL BCWMAT(J,KR,LR, ISW.KR) 

360 IF(LORKW.LE.O) GO TO 380 
IFU.GT. JLKW) GO TO 380 

IF(LORK.LT.LORKW.OR.LORK.GT.LORKW+l ) GO TO 380 
KBCMAX-KORLMX 

IF(KORLW.GT.O) KBCMAX-KORLW+ 1 
DO 370 K»KLORLL,KBCMAX 
KR-K 
LR-LORK 

IF( IW.EQ. 1 ) GO TO 370 

KR-LORK 

LR-K 

370 CALL BCWMAT(J,KR,LR, ISW.KR) 

C BC AT LORK"*! 

aao IFILORK.NE.I.OR.LKIBC.EQ.O) GO TO 367 
KBCMAX-KORLMX 

IF(KORLW.GT.O) KBCMAX-KORLW 

IFIJ.LT. JLKIWL.OR.J.GT.JLKIWU) GO TO 390 

DO 385 K-KLORLL.KBCMAX 

KR-K 

LR-LORK 

IF< IW.EQ. 1) GO TO 363 
KR-LORK 

863 CALL BCWMAT(J,KR,LR. ISW.KR) 

)F(J.£Q.JMAX .AND. JMAX6C.EQ.8) CALL BCJHATIJ.KR.LR, ISW) 

365 CONTINUE 
C BC AT KORL-1 

887 IF(KLIBC.EQ.O) GO TO 330 
C TEST FOR INTERMEDIATE WALL 

390 IF(LORKW) 300.300.3)0 

300 IFIJ.LT.JKLIWL.OR. J.GT.JKLIWU) GO TO 330 
KR-1 
LR-LORK 

IF( IW.EQ. 1 ) GO TO 305 

KR-LORK 

LR-1 

305 CALL BCWMATtJ.KR.LR, ISW.KR) 

IFlJ.EQ.wlHAX .AND. JMAXBC.EQ.3) CALL 6CUMAT(J,KR.LR. ISW) 

GO TO 330 

310 IF(LORK.LE.LORKW) GO TO 300 
C BC AT KORL-KORLMX 
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320 1F(KLMXBC.LT. I .0R.KLMXBC.GT.2) GO TO 105 
KR«KORLMX 
LR=LORK 

IFdW.EQ.n GO fO 335 

KR=LORK 

LR=K0RLMX 

335 lF(KLMXBC-2) 340.330.330 
FREESTREAM BC 

330 CALL BCFMAKJ.KR.LR.lSW.KRl 
GO TO 105 
WALL BC 

340 CALL BCWMAT(J,KR,LR.ISW.KR1 

. IF(J.EQ,JMAX .AND. JMAXBC.EQ.2) CALL BCJMATC J.KR.LR, ISW) 
105 CONTINUE 

C SET UP MATRIX ELEMENTS FOR USE OF LAGGED B.C. 

C SINGULAR AXIS L»l FOR AXISYMMETRIC FLOW 

IF (IW.NE. I .OR.LORK.NE.LAXIS) GO TO 115 
DO no K»KLORLL,KUORLU 
no CALL ZERODQ(K) 

115 IFdW.EQ.a.AND.LAXIS.EQ.n CALL ZERODQd) 

C 

C NOZZLE LIP WALL POINTS AT J=JMAX FOR JMAXBC*2 

C (OUTFLOW B.C. P=FSP IMPOSED) 

C 

IF(JMAXBC .NE. 2 .OR. J .NE. UMAX) GO TO 700 
IF(KPLANE ,EQ, 1 .AND. ISW .EQ. 2) GO TO 700 
IFdTW .EQ. 1) GO TO 700 
C 

C WALL AT LORK»LORKMX 

C 

630 IFCLORK .NE. LORKMX) GO TO 680 
1F(LKMXBC .NE. 1) GO TO 680 
DO 670 K=KLOROLL.KORLMX 
670 CALL ZERODQ(K) 

680 CONTINUE 
C 

C WALL AT KORL“KORLMX 

C 

IFtKLMXBC .EQ. 1) CALL ZERODQ(KORLMX) 

700 CONTINUE 

C INTERNAL CORNER AT K.L^KMAX.LMAX 

IF (LKMXBC^KLMXBC.NE. n GO TO 120 
IF (LORK.NE. LORKMX) GO TO 120 
CALL ZERODQ(KORLMX) 

C CORNERS IN PLANE LORK=l 

120 IF (LORK.NE. n GO TO 125 
C CORNER AT (K,L) = d,l) 

1F(U.GE.MAX0(JLKIWL.JKL1WL) .AND. J.LE.MIN0( JLKIWU. JKLIWU) ) 
1 CALL ZERODQd) 

C CORNER WHERE PLUG INTERSECTS SIDEWALL 

IF (KORLW.LE.O) GO TO 125 

1F(J. GE.JLKIWL. AND. J.LE. JLKIWU) CALL ZERODQ(KORLW) 

C TRAILING EDGES OF LONE INTERMEDIATE WALLS 
125 IF (KORLW.GT.O) GO TO 135 
C TRAILING EDGE OF LONE HORIZONTAL WALL 

IF (LORKW.LE.O.OR. J.NE. JLKW) GO TO 175 
IF (LORK.NE.LORKW.AND.LORK.NE.LORKW+1 ) GO TO 175 
DO 130 K=KLORLL,KUORLU 
130 CALL ZERODQ(K) 

GO TO 175 

C TRAILING EDGE OF LONE VERTICAL WALL 
135 IF (LORKW.GT.O) GO TO 140 
IF (J.NE JKLW) GO TO 175 
CALL ZERODQ(KORLW) 

CALL ZERODQ(KORLW+l) 

GO TO 175 

C EDGES AND CORNERS OF COEXISTENT INTERMEDIATE WALLS 
140 IF (LORK.GT.LORKW) GO TO 160 
IF (J.NE. JKLW) GO TO 145 
C TRAIllMJ EDGE OF VERTICAL SIDEPLATE 
CALL ZEROOQ(KORLW) 

CALL ZERODQ(KORLW+l ) 

C CORNERS AND EDGES ON LOWER SURFACE OF HORIZONTAL WALL 
145 IF (LORK.NE. LORKW) GO TO 175 
C INTERSECTION OF HORIZONTAL WALL AND SIDEPLATE 
IF(J.LE.MINO(JKLW,JLKW) ) CALL ZERODQ(KORLW) 

C INTERSECTION OF HORIZONTAL WALL AND VERTICAL PLUG 
IFIJKLIWL.LE.J. AND. J.LE. JKLIWU) CALL ZERODQd) 

C TRAILING EDGE OF HORIZONTAL WALL 

IF (J.NE. JLKW) GO TO 155 
K2=K0RLW 

IF(JLKW.GT. JKLW) K2«K0RLW+l 
DO 150 K=l ,K2 
150 CALL ZERODQ(K) 

C INSIDE OF PROTRUDING SIDEPLATE 

155 IF(JKLW.LE.J. AND. J.LE. JLKW) CALL ZERODQ(KORLW+l ) 

GO TO 175 
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174 160 ir (LORK.GT.LORKW+n GO TO 175 

175 C CORNERS AND EDGES ON UPPER SURFACE OF HORIZONTAL WALL 

176 C INTERSECTION WITH VERTICAL WALL 

177 lF(J.LE.MAXO(JKLW,JLKWnCALL ZERODQ(KORLW+n 

178 C TRAILING EDGE 

179 IF (J.NE.JLKW) GO TO 170 

100 DO 165 K=l,KORLW 

191 165 CALL ZERODQ(K) 

182 C INSIDE EDGE OF PROTRUDING SIDEPLATE 

183 170 IF(JLKW.LE.U.AND.J.LE.JKLW) CALL ZERODQ(KORLW) 

18H 175 CONTINUE 

185 C PRESERVE INITIAL DATA AT INFLOW PLANE J»1 IN REGION OUTSIDE NOZZLE 

186 inj.NE. 1 ) 00 TO BOO 

187 IF(LORKW) 755.755.775 

188 755 IF(KORLW.L.E.O) GO TO 800 

189 760 Kl«KORLW+l 

190 765 DO 770 K«Kl.KORLMX 

191 770 CALL ZERODQ(K) 

192 GO TO 800 

193 775 IF(LORK-LORKW) 780.780,785 

19H 780 IF(KORLW.LE.O) GO TO 800 

195 GO TO 760 

196 785 Kl=l 

197 GO TO 765 

198 800 CONTINUE 

199 RETURN 

200 END 
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1 ‘DECK BCFMAT 

S SUBROUTINE BCFMAT(J,K,L. ISM, JK) 

3 ‘CALL BASE 

■t ‘CALL VARSI 

5 ‘CALL BTRIO 

6 ‘CALL VARSa 

7 COMMON/FREESP/FSP.FSRHO 

8 C 

9 C IMPLICIT MATRIX DEFINITIONS FOR ALGEBRAIC FREESTREAM BC AT LORK>LORKMX HHE 

10 C ISM-I.e,3 FOR the ADI SHEEPS IN J.K.L DIRECT I ONS.RESP. THE SHEEPS 

11 C MUST BE PERFORMED IN THE ORDER J.K.L. 
la C 

13 C EM^ORCE FREESTREAM AXIAL VELOCITY U-FSMACH. PRESSURE FSP, 

It C AND DENSITY FSRHO AT J.K.L. 

15 C 

16 RR-1.0/Q(L,1,JK) 

17 U»Q(L,a,JK)*RR 

18 V=0(L,3.JK)*RR 

19 H-QIL.it.JKI'RR 

ao xKE-o.5*(u*«a+v**a+H*«a) 

ai PJAY-GD«(Q(L,5,JK)-XKE«Q(L.1,JK)) 

aa PFSJAY-FSP 

33 RFSJAY*FSRHO 

a^ K 

as IF (isH-ai i5.ao.a5 

36 15 I»J 

37 GO TO as 

as ao i»K 

39 as DO 30 M-1,5 

30 A(I,l,M)-0.0 

31 B(I,1,M)‘0.0 

3a C(I,l,M)-0.0 

33 A(I,a,M)'>0.0 

3H B(I,a,M)*0.0 

35 C(I,a,M)-0.0 

36 A(I,5.M)«0.0 

37 B(I,5,M)-0.0 

38 30 C(I.5,M)>0.0 

39 B(I,l,n-1.0*Q6(L,JKI 

>fO Bd.a.D— FSMACH*Q6(L,JK) 

tl Bn,8,a)»1.0«Q6(L,JK) 

*♦8 B(l,5,n-XK£*Q6(L.JK) 

t3 Bd.S.ai— U*a6(L,JK) 

Bd,5,3)— V«Q6(L,JK) 

>15 Bd.S.t)— H«Q6(L,JK) 

te Bd.5.5)-1.0*Q6(L,JK) 

t7 IF dSH-ai SS.ifO.VO 

>*8 35 Fd.a)»(FSMACH*Q(L,l.JK)-a(L,a.JKn«Q6(L.JK) 

>19 Fd,5)-((PFSJAY-PJAY)/GO)*Q6(L,JK) 

50 Fd.l)-(RFSJAY-Q(L,I,JK))*Q6(L,JK) 

51 RETURN 

Sa to 00 >«S N«t,t 

53 IS Fd,5)»Fd,5)+Bd,5,N)«Fd.N)/C6(L.JK) 

5t Fd.e)-(Bd.a,i)‘Fd,n+Bd,a,a)*Fd,an/Q6(L.jK) 

55 Fd,l)»tBd,l,n«Fd.l))/QS(L,JK) 

56 RETURN 

57 END 


fr 
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N0ZL3D - BCJMAT 
•DECK BCJMAT 

SUBROUTINE BCJMAT(J,K,L,1SW) 

•CALL BASE 
•CALL VARSl 
•CALL BTRIO 

C COMMON EREESP CONTAINS FREESTREAM PRESSURE 
COMMON/FREESP/FSP 
•CALL VARSa 

C IMPLICIT MATRIX DEFINITIONS FOR ALGEBRAIC B.C. AT J«1,JMAX. 

C lSW»l.a,3 FOR THE ADI SWEEPS IN J,K,L DIRECTIONS.RESP. THE SHEEPS 
C MUST BE PERFORMED IN THE ORDER J.K,L. 

JK«J 

IFdSW.OT.n JK«K 
RR«l.O/Q(L,l,JK) 

U«Q(L,a,JK)«RR 
V*Q(L,3,JKHRR 
W=Q(L,4,JK)*RR 
XKEsQ .5* tu*^a+v«*a+w**B) 

PJAY»GD«(Q(L,5,JK)“XKE*Q(L, 1 .JKl ) 

PFSJAY«FSP 

l=L 

IF (isw-e) io,i5,ao 
10 I=J 
GO TO ao 
15 1»K 

ao IF (j~i) 50, 50, as 
as IF (JMAXBC.NE.ai GO TO 145 
C ENFORCE FREESTREAM PRESSURE B.C. P=FSP AT OUTFLOW 
C BOUNDARY J=JMAX (INPUT OPTION JMAXBC=S) 

C 

C THIS ALGEBRAIC B.C. IS USED IN PLACE OF THE ENERGY EQUATION TO 
C MAINTAIN CONSISTENCY WITH THE WALL B.C. AT WALL POINTS 
C 

IF(L .EQ. LMAX .AND. LMAXBC .EQ. 1 ) GO TO 86 
IF(K .EQ. KMAX .AND. KMAXBC .EQ. 1) GO TO 36 
GO TO 300 
86 CONTINUE 
DO 30 M»l,5 
A(I,5,M)«0.0 
B(1,5,M)»0.0 
30 C(I,5,M)«0.0 

B( 1 ,5, n=XKE*Q6(L, JK) 

8(1 ,5,a)»-U«QB(L, JK) 

B( I .5,3)=-V^Q6(L,JK) 

B( I .5,4)=-W*Q6(L,JK) 

B( I ,5.5)=1 .0^QS(L,JK) 

IF (ISW-a) 35.40,40 
35 F(l.5)»(PFSJAY-PJAY)/0D*Q6(L.JK) 

GO TO 145 
40 FSVP»0.0 
DO 45 M=l ,5 

45 FSVP»FSVP+B(l,5,M)^F(l,M) 

F(l,5)“FSVP/Q6(L,JK) 

C ENFORCE WALL TEMPERATURE B.C. AT WALL POINTS OF THE OUTFLOW BOUNDARY 
C WHEN TW.GT.O . THE ALGEBRAIC B.C. RHO*TW-GAMMA* (GAMMA-1 .) *EPSLON 
C REPLACES THE CONTINUITY EQUATION IN THIS CASE. 

300 IF(ITW.EQ.O) GO TO 145 
THW«TW/GD 

IF(L-LMAX) 46,47,145 

46 IF(K-KMAX) 145,47,145 

47 DO aOO M«l,5 
A(l,l,M)=0. 

B(I , I ,M)«0. 

aOO C(I,1,M)=0. 

B(1,1,1)=THW*Q6(L,JK) 

B( I . 1 ,5)«-Q6(L, JK) 

F(1.5)=0. 

GO TO 145 

C FOR INPUT OPTION J1BC»1. WE 

C ENFORCE TWO IMPLICIT INFLOW B.C. AT J«l ON VELOCITY VECTOR DIREC- 
C TIQN COSINES V/U,W/U. THESE REPLACE THE V.W MOMENTUM EQ’S.,RESP. 

C FOR OPTION JlBC«a, WE COMPUTE V.W FROM THEIR MOMENTUM EQUATIONS. 
50 IF (JlBC.OT.l) GO TO 70 
DO 55 N«3,4 
DO 55 M«1 ,5 
Ad.N.MUO.O 
B( I ,N,M)*0.0 
Cd,N,M)»0.0 
55 CONTINUE 

Bd ,3,a)«-V0U(L,K)*Q6(L.JK) 

Bd ,3.3)«Q6(L,JK) 

Bd ,4,a)»-W0U(L,K)^Q6(L.JK) 

Bd ,4.4)=Q6(L,JK) 

IF dSW-3) 60,65,65 

60 Fd ,3)»(V0U(L.K)*Q(L,a,JK)-Q(L,3.JK) )*Q6(L,JK) 

Fd ,4)=(WOU(L,K)«Q(L.a, JK)-Q(L,4, JK) )*Q6(L,JK) 
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N0ZL3D - 8CJMAT 
97 GO TO 70 

80 65 F(I ,3) = (0( 1 ,3.2)*F(I ,e)+BU .3.3)«m .3) )/Q6(L, JK) 

89 ■F(l,H)=(Bn,H.8)*F(|,e)tB(l.H,H)*F(l,H))/Q6(L,JK) 

90 C ENFORCE TWO IMPLICIT INFLOW B.C. ON TOTAL ENTHALPY HTOT AND TOTAL 

91 C PRESSURE PTOT. JIBC.LT.O SELECTS AN HOC RELATION TO CLOSE THE 

95 C SYSTEM. FOR JIBC.OT.O THE SYSTEM IS CLOSED WITH EITHER THE CONTINU 

93 C ITY, THE U-MOMENTUM, OR THE ENERGY EQUATION BY DEFINING NX«K5.0R 
9H C 5. RESP. 

95 C FOR JIBC=3 THE U-MOMENTUM EQ. IS REPLACED BY THE IMPLICIT RELATION 

96 C D(U)/D(XI)«0 

97 70 IF (JIBC) 75,80,80 

98 75 NX»1 

99 NPT-5 

too NHT«5 

lOl C MOC RELATION FOR BM , NX, M) , C( I ,NX,M) ,F( I ,NX) GOES HERE 
105 GO TO 105 

103 80 CONTINUE 

104 C DEFINE NX FOR JIBC.GT.O 

105 NX«INXBC 

106 IF (LW.LE.O) GO TO 85 

107 KR=KMAX 

108 IF(KW.GT.O) KR=KW 

109 IF(K.GT.KR) GO TO 85 

no IFIL.EQ.LW .OR, L.EQ.LW+1) NX=2 

111 85 IF (KW.LE.O) GO TO 90 

112 LR=LMAX 

113 IF(LW.GT.O) LR=LW 

114 IF(L.GT.LR) GO TO 90 

115 IF(K.EQ.KW.OR.K.EQ.KW+n NX=5 

116 90 IFIL.EQ.LMAX .AND. LMAXBC.EQ.l) NX=5 

117 IFIK.EQ.KMAX .AND. KMAXBC.EQ.l) NX=2 

118 IFlL.EQ.l .AND. LlBC.EQ.l .AND. JLIWL.LE.J .AND. J.LE.JLIWU) NX«5 

119 1F(K.EQ.1 .AND. KlBC.EQ.l .AND. JKIWL.LE.J .AND. J.LE.JKIWU) NX«2 

120 NPT=2 

121 NHT=5 

122 IF (NX-2) 105,95,100 

123 95 NPT^l 

124 GO TO 105 

125 100 NPT=1 

126 NHT=2 

127 105 DO no M=l ,5 

128 A(1 ,NPT,M)=0.0 

129 B(1 .NPT.M)=0.0 

130 C( 1 ,NPT,M)=0.0 

131 A( 1 ,NHT,M)=0.0 

132 8(1 ,NHT,M)=0.0 

133 no C( I ,NHT,M)=0.0 

135 HG=HTOTCL.K)/GAMI 

136 IF (JIBC.EQ.3) GO TO 115 

137 GCR=HG*(Q(L, 1 . JK) ^HTOT (L ,K ) /PTOT (L ,K ) )*«GAMI 

138 B(1 ,NPT,1)=(XKE-GCR)*Q6(L,JK) 

139 B(l .NPT.2)=-U*Q6(L,JK) 

140 B( I ,NPT,3)=-V*Q6(L,JK) 

141 B( I .NPT,4)=-W*Q6(L.JK) 

142 B( 1 ,NPT,5)=1 .0*Q6(L, JK) 

143 GO TO 125 

144 115 IF (ISW.GE.2) GO TO 120 

145 B( I ,NPT, I )=Q(L.2, JK)/Q(L, 1 , JK)**2 

146 Bd ,NPT,2)=-l .0/Q(L, 1 , JK) 

147 C( I ,NPT, n=-Q(L,2, JK+n/Q(L, I . JK+1)«*2 

148 C( I ,NPT,2)=l .0/Q(L, 1 . JK+l ) 

149 GO TO 125 

150 120 B( I ,NPT,2)=l .0 

151 125 B( I ,NHT, n=(HG-GAMl*XKE)*Q6(L. JK) 

152 B( I ,NHT,2)=GAMMU*Q6(L. JK) 

153 8(1 ,NHT.3)=GAMnV*Q6(L.JK) 

154 B(I ,NHT.4)=GAMMW«Q6(L, JK) 

155 B(I ,NHT.5)«-GAMMA«Q6(L.JK) 

156 IF nCW-2) 130,135.135 

157 130 IF(J1BC.LE.2) F ( I ,NPT ) = ( (XKE+ (GCR/GAMMA ) ' «Q(L , I , JK ) -Q(L ,5 . JK )) 

158 1 *Q6(L,JK) 

159 IF(JlBC.EQ.3)Fn,NPT)«(Q(L.2.JK)/Q(L,l.JK)-Q(L.2,JK+l)/Q(L,l,JK+n 

180 l)«Q6(L,JK) 

161 F( I ,NHT)«(0AMMA*Q(L,5,JK)-Q(L, 1 , JK ) MHG+GAMMXKE)) *06 (L . JK) 

162 GO TO 145 

163 135 FSVP’^O.O 

164 FSVH'0.0 

165 DO 140 M=1 ,5 

166 FSVP=FSVP+B( I ,NPT.M)*F(1 ,M) 

167 140 FSVH=FSVH+B(I,NHT,M)*F(I,M) 

160 F( I ,NPT)=FSVP/Q6(L,JK) 

169 F( I ,NHT)=FSVH/Q6(L. JK) 

170 145 RETURN 

171 END 
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N0ZL3Q - BCLKMX 
I •DEICK BCLKMX 

e subroutine:. BCI.KMX( 1WW,JJ,K) 

3 ^CALL BASE • 

If- ‘CALL VARSl 

5 ‘CALL BTRID . . ' 

6 'CALL RHSBCC 

7 <ALL VARSB 

0 C IMPLICIT OUTFLOW BOUNDARY CONDITIONS (L0RKMXBC»2 OR 5), OR WALL BC 
9 C nKMXBC=3). OP SYMMETRY BC aKMXBC^S.^t; AT GRID POINTS L*L0RKMX. 

10 C IMPLICIT WALL BC INTERMEDIATE WALL LOWER SURFACE L=LORKW, J.LE. JLKW 

11 C FILLS IN LAST ROW OF BLOCK - TRl DIAGONAL COEFFICIENT MATRIX TO 

la C account FOR IMPLICIT PORTION 0^* INVISCIO FLUX VECTOR TERMS, AND 

13 C fills INLAST ROW OF RTCHT NANO SIDE VECTOR AS COMPUTED. IN SUBR. 

14 C RHS, THE IMPLICl T PORTION OF THE VISCOUS TERMS FOR THE ZETA(L) 

15 C OR ETA(K) DIRECTION, ARE. ADDED IN BY SUBROUTINE Vl.SMAT. 

16 IH^^IWW 

;/ •Mjj' 

1 0 CALL SW 

19 LKWR=LORKW+l 

PO Kl.Wt-UKuRLW+1 . . ■ 

Dl !NrWAl.-~0 

IFILORKW.GT.O.AND.J.LE JLKW) INTWAL-1 
P3 ir(KORLW.GT.G.AND.K.GE.KLWR) INTWAL^'O 

94 C BC AT UPPER BOUNDARY LORKMX 

95 L-l.ORKMX 

96 iOO LOPK=L 

97 KORL*K 

90 LMM:--L--) 

99 KMM’--K 

30 IFdW.EO. 'i ) GO TO 900 

31 LORK«K 

3? KORL=*U 

33 LMM«LORK 

34 KMM---KORL-1 .... 

35 900 CONTINUE 

36 RJ*Q6(L0RK,K0RL) 

37 RR « RM * IRJ+Q6fLMM,KMM) ) , • 

30 1F(L',EQ.L0RKMX.AN0. (LKMXBC.EQ.3.0R.LKMXBC.EQ 4)) GO TO 500 

39 DO 400 N»;l.5 

40 DO 300 M«l,5 

41 C(L.N.M)s0,0 

49 A.'L,N,M) ' “9.0«0(L-1 ,N,M) 

43 300 B(L.N,M) = 9.0*DiL,N.M) 

44 A(L,N,N) •“ AtL,N,N) + ( ‘RR+ ( 1 . 0-WTFAC) *RJ) 

45 BiL.N.N) * WTFAC'RJ + RR + B(L,N,N) 

46 400 F(L.N) a S(LORK,Nfa,KOHL) 

47 C SYMMETRY 8C FOR I NV I SC ID TERMS AT UPPER BOUNDARY LORKMX 

48 IF(L-LORKMX) •900,850,850 

49 500 DO 700 N«1 ,5 

50 ,DO 600 M«l,5 

51 C(L.N,M)«0.0 

5? B(L,N,M)»0.0 

53 600 A(L,N.M)«-2.0^O(L“l ,N.M) 

54 8( L . N . N) *Q6 ( LORK , KORL ) +RR 

55 AtL,N,N)»A(L,N.N)”RR 

56 700 FiL ,N)--:=S(L0RK,Nf8.K0RL) 

57 DO 000 M« 1 , 5 

56 AtL,LKMXfciC.M)=O.G 

59 800 F(L.LKMX8C)=n.O 

60 C 8C AT INTERMEDIATE WALL 

61 850 IF ( INTWAL.EQ.O) GO TO 900 

89 l=lor:<w 

63 GO TO 100 

64 900 RETURN 

65 END 
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N0ZL30 - BCLKl 
1 ‘DECK BCLKl 

S SUBROUTINE BCLKl ( INN, JJ,K) 

3 ‘CALL BASE 
H ‘CALL VARSl 

5 ‘CALL BTRID 

6 ‘CALL RHSBCC 

7 ‘CALL VARSB 

8 C IMPLICIT NALL BC AT GRID POINTS LK»1 AND J.GE. JLKINL.OR. J.LE. JLKINU 

9 C AND SYMMETRY BC OUTSIDE THAT J INTERVAL ITPLICIT NALL BC AT 

10 C INTERItDIATE NALL UPPER SURFACE L-LORKN+1 AND J.LE.JLKN. 

11 C FILLS IN FIRST RON OF COEFFICIENT MATRIX TO ACCOUNT FOR IMPLICIT 

le C PORTION OF INVISCID FLUX VECTOR TERMS, AND FILLS IN FIRST RON OF 

13 C RIGHT HAND SIDE VECTOR AS COMPUTED IN SUBROUTINE RHS. FOR 

I*! C ADIABATIC NALL, THE IMPLICIT PORTION OF THE VISCOUS TERMS IN THE 

15 C ENERGY EQ FOR ZETA(L) OR ETA(K) DIRECTION ARE ADDED BY SUBR VISMAT. 

16 C THE EXTRA MATRIX MaTIPLY THAT ACCOUNTS FOR ZERO VELOCITY B.C. 

17 C AND FOR PRESCRIBED HALL TEMP BC UTH-ll IS PERFORMED IN SUBR BCHMAT 

18 IN^INN 

19 J=JJ 

aO CALL SN 

21 LKNR=L0RKN+1 

22 KLNR"K0RLH+1 

23 INTNAL*0 

2t IFILORKH.GT.O. AND. J.LE.JLKN) INTNAL-1 

25 IF(KORLN.GT.O.AND.K.GE.KLNR) INTNAL«0 

26 C BC AT L*1 

27 L=I 

28 50 LORK-L 

29 KORL=K 

30 LP-L+1 

31 KP=K 

33 IF(IN.EQ.l) GO TO 75 

33 LORK=K 

3t KORL«L 

35 LP»LORK 

36 KP-KORL+1 

37 75 RJ«Q6(L0RK,K0RL) 

38 RF-RM‘(RJ+CB(LP,KPn 

39 C BC AT L»1 

■to IF(L.GT.l) GO TO 150 

VI C TEST FOR INTERMEDIATE NALL NORMAL TO L-1 SURFACE 
Va IF(KORLN) 100,100,130 

V3 C TEST FOR NALL AT L»1 

VV 100 IFULKINL.LE.J. AND. J.LE. JLKINU) GO TO 150 
V5 C SYMMETRY 

V6 GO TO 190 

V7 C TEST FOR NALL AT L"1 

48 130 IF(K-KORLN) 100,100,190 

49 150 DO 180 N«l,5 

50 DO 170 M-1,5 

51 A(L,N,M)-0.0 

52 B(L,N,M)»- a.O‘D(L,N,M) 

53 170 C(L,N,M)-e.0‘D(L+l,N,M) 

54 B{L,N,N)-B(L,N,N) + (NTFAC‘RJ+RF) 

55 C(L,N,N)-C(L,N,N) + (-RF+(1.0-NTFAC)‘RJ) 

56 100 F(L,N)«S(LORK,N+0,KORL) 

57 IF(L.EQ.l) GO TO 250 

58 C 

59 C SYM BC J.LT.JLKINL. OR. J.GT, JLKINU FOR INVISCID TERMS AT LNER BOY L-1 

60 C 


61 

190 

IF(L.GT.l) GO TO 300 

62 


DO 210 N«l,5 

63 


DO 200 M>I ,5 

64 


A(L,N,M)»0.0 

65 


B(L,N,M)-0.0 

66 

200 

C(L,N,M)»2.0‘0(L+1,N,M) 

67 


0(L,N,N)»QB(LORK,KORL)+RF 

68 


C(L,N,N)»C(L,N,N)-RF 

69 

210 

F(L,N)»S(L0RK,N+8,K0RL) 

70 


IF(IN.EQ.2) GO TO 230 

71 


DO 220 M«1 ,5 

72 

220 

C(L,4,M)«0.0 

73 


F(L,4)"0.0 

74 


GO TO 250 

75 

230 

DO 240 M-1,5 

76 

240 

C(L,3,M)~0.0 

77 


F(L,3)-0.0 

78 1 

C 

BC AT INTERMEDIATE NALL 

79 

250 

IF(INTNAL.EQ.O) GO TO 300 

80 


L-LKNR 

81 


60 TO 50 

82 

300 

RETURN 

83 


END 
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N0ZL30 - BCWMAT 
1 ‘DCCK BCWMAT 

a SUBROUTINE BCV«AT(J,K.L.ISW.sJK) 

3 ‘CALL BASE 

H ‘CALL VARSl 

5 ‘CALL BTRIO 

6 ‘CALL VARSa 

7 C 

8 C IMPLICIT MATRIX DEFINITIONS FOR ALGEBRAIC WALL BC AT (J,K,L) 

9 C ISW»I,a,3 FOR THE ADI SWEEPS IN J.K.L DIRECTIONS.RESP. THE SHEEPS 

to C MUST BE PERFORMED IN THE ORDER J.K.L. 

u c 

le IF (ITW) 10,10,40 

13 C VELOCITY B.C. FOR ADIABATIC WALL AND ZERO MASS TRANSFER 

14 10 I-L 

15 IF (isw-ai i5,ao.as 

16 15 1-J 

17 GO TO as 

18 ao I*K 

19 as DO 30 N«a,4 

ao DO 30 M*l,5 

at A(I,N,M)>0.0 

aa B(i,N.M)»o.o 

83 C(I,N,M)-0.0 

a4 30 CONTINUE 

as DO 35 N=a,4 

as F(I,N)>0.0 

87 35 B(I,N,N)-Q6(L.JK) 

88 RETURN 

89 C VELOCITY AND TEMPERATURE B.C. FOR PRESCRIBED WALL TEMP. TW AND 

30 C NORMAL MASS INJECTION RATE MCOT 

31 C ZETA(L) DIRECTION IS ASSUMED NORMAL TO WALL 
3a C WMDOT IS ASSUMED ZERO BELOW 

33 C 

34 40 THW-TH/GD 

35 I-L 

36 IF (la^-ai 45,50,55 

37 45 I -J 

38 GO TO 55 

39 50 I>K 

40 55 DO 65 N>a,5 

41 D0 60 M-1.5 

4a An,N,M)>Q.0 

43 B(I,N.M)«0.0 

44 60 C(I,N,M)-0.0 

45 65 B(I,N,N)-Q8(L,JK) 

46 B(I,5,l)-THW«Q6(L,JK) 

47 B(I,5.5)-~ QBIL.JK) 

48 DO 70 N»a,5 

49 70 F(I,N)-0.0 

50 RETURN 

51 END 




N0ZL30 - BCXIN 
I ‘DECK BCXIN 

a SUBROUTINE BCXIN (U 

3 ‘CALL BASE 
't ‘CALL VARSI 

5 *CAUL BTRID 

6 ‘CALL VARS2 

7 C IMPLICIT INFLOW B.C. AT GRID POINTS J«I 

B C FILLS IN FIRST ROW OF COEFFICIENT MATRIX TO ACCOUNT FOR IMPLICIT 
9 C PORTION OF INVISCIO FLUX VECTOR TERMS, AND FILLS IN FIRST ROW OF 

10 C RIGHT HAND SIDE VECTOR AS COMPUTED IN SUBRS. RHS AND VISRHS. 

11 C THE EXTRA MATRIX MULTIPLY THAT ACCOUNTS FOR ALGEBRAIC B.C. 
le C IS PERFORMED IN SUBR. BCJMAT 

13 C 

14 J«1 

15 JF-J+1 

16 RJ=Q6(L,J) 

17 RF»RM » (RJ+Q6(L,JF)) 

18 DO ao N-1,5 

19 DO 15 M=l,5 

ao A(J,N.M)>0.0 

ai BU,N,M)«-a.O*D(J,N,MI 

ea 15 c(j,N,M)-e.o<D(j+i,N,M) 

23 B(J,N,N)»B(J,N,N)+(WTFAC«RJ+RF) 

24 C(J,N,NX(J.N,N) + (-RF+(1.0-WTFAC)*RJ) 

25 20 F(J,N)=S(L,N+8,J1 

26 25 RETURN 

27 END 
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N0ZL30 - BCXOUT 
I «DeCK BCXOUT 
a SUBROUTINE BCXOUT(L) 

3 ‘CALL BASE 

4 ‘CALL VARSl 

5 ‘CALL BTRID 

6 ‘CALL VARS2 

7 C IMPLICIT OUTFLOM BOUNDARY CONDITIONS IN XI DIRECTION 

8 C FILL IN LAST ROW OF BLOCK TRIDIAOONAL COEFF MATRIX WITH 

9 C EQUATION BETWEEN DELTAQIJHAX) AND OELTAQI JM) . 

10 C EQUATION IS FIRST ORDER BACKWARD DIFFERENCING IN XI OF 
lie THE P.D.E. AT J=JMAX. 

la C RIGHT HAND SIDE OF EQUATION IS COMPUTED IN SUBR. RHS 

13 J»JMAX 

14 RJ«Qe<L.J) 

15 RR»RM • (RJ+Q6(L,J-in 

16 DOaON»l,5 

17 DO 15 M=i ,5 

18 AU,N,M)=-a.O"D(J-l,N,M) 

19 , 15 B(J,N,M)=a,0*D(J,N,MI 

ao A(J,N.N1=A(J,N,N)-Rfl ♦ ( 1 .0-WTFAC)»RJ 

ai B(J,N,N) = IWTFAC*RJ+RRH-B(J.N,N) 

aa ao f(j,n)=s(l.n+8,j) 

33 RETURN 

34 END 
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N02L30 - BTRI 

1 'DECK BTRI 

2 SUBROUTINE BTRITIU.TU), 

3 ‘CALL BTRIO 

4 DIMENSION H(5, 51 ■ , , 

5 REAL LI I ,L2I ,Le3,L3l .L32,L33,mi ,L‘*3,L‘t3,LW.L5f ,L53.L53,L5t.L55 

6 IS=IL+1 

7 IE’IU-1 1 

a C INSERT lUDEL 

9 LlI^-I,/B(ILa,ll 

10 L3I=B(IL,3.U 

11 ui3=e: iL, I ,ei*i II 

13 L33=; ./(B(iL,3,3)'-L3l-'Ul3l 

13 U13=B(IL, 1 ,31'«LT1 

Ult = B(IL, 1 ,'t>*Ll T 

15 UI5=-B(1L,1,5)*L'1 

16 L31=B(lL,3.n 

17 L33=e(IL,3,3.)-L3l-J13 

18 U33=(B(IL,3,3)-L3I*U13)'L33 

19 L33--I ./(B(IL,3,3)-UI3*L31-U33»L33) 

30 U34-=(B( lL,3,‘t)-L3l*U14)*LS3 

31 U35=(8(IL,3,5i'L3l'U15)*L33 

33 L41^B(II ,'t,l) 

33 L^3=BnL,H.3l-L'tI*U13 

at L>t3-B( IL,‘t,3)-LHl'>UI3-L43*U?3 

35 U34=(8(.L,3,4i LSMUl'f-LSane^l'LSS 

. 36 L44=l . / (B( II ,4.‘t)-U14*L‘t|-U34<u43-J34'L'+3) 

37 U35=iO(IL.3,5l-L3I<UI5-L3P*U35)‘L33 

35 LSl^BCIL.B.H 

39 L53=B(IL,5,3,-L5I*UI3 

30 L53=B( |L,5,3)-i.51 'U13-L53* J33 

31 L54=eilL,5,4)-L3injlM-L53‘'U34-L53*U3't 

33 U'+5=fS(IL,4,5)-L‘tMU15-L43*U35-L‘i3*U35)*L44 

33 L55»I,/(B(I1 ,5,n'-L5l«UI5-L53«U35-L53*U35-1.54*UM5; 

34 C ' COMPUTE LITTLE R S , 

35 0I=LI1«E(IL,1.) 

36 D3=Le3*(FnL,3)--L3MDr) 

37 D3»L33*(F(IL,3I-L3I'DI-L33*D3) 

38 D'*=L44* (F ( I L , H ) -1.4 1 ‘0 1 ~L43*D3 -L43*D3 ) 

39 D5=1.55‘(F(IL,5)-L51*DI-L53*U3-L53*D3-L54«04l 

40 C COMPUTE BIG R S 

41 F(IL.5)"D5 

43 F(IL,4)=D4-U‘i5*05 

43 F(1L,3)=D3-U34<F(IL,4)-U35<D5 

44 F( IL,3)=D3-U33'F( II ,3T-U34»F( IL ,4)-U35«D5 

45 FtIL. 1 '■■--0I-UI3'F(IL ,3)-U13*F( IL ,3I-U14*F( IL,4I-U1S*D5 

46 C COMPUTE C PRIME FOR FIRST ROW 

47 DO 1 0 M- 1 , 5 

48 D1»L11*C(IL,1,M) 

49 D3“L33*(C(IL,3,M)-L31*D1) 

50 D3=L33<(C(IL,3.M1-L31*D1-L33*D31 

51 D4»L44*rC(IL,4,M)-L41*Dl-L4P«03-L43*D3l 

53 D5^L55*(C( IL ,5,M)-L5I«D1-L53*D3-L53<id3-L54«D41 

53 Bl IL.5,M) --D5 

54 BriL,4,M)=D4-U45*D5 

55 B(IL,3,M) = D3-U34*B(IL,4,M)-U35‘D5 

56 B(1L,3,M) D3-U33*D(II.,3.M)-U34*BML,4,M)-U35<D5 

57 10 BUL.I.MI = Dl-U13*BnL,3,M)-U13'B(IL,3,M)-U14*B(IL,4,M)-U15*D5 

58 DO 30 I--IS.IE 

59 1R=I-1 

60 C COMPUTE B PRIME'BIGR 

61 00 15 N.= l ,5 

63 15 F( I ,N1=F(I ,N)-A(I ,N, n«F(IR, 1 )-A( I ,N,31»F(1R,31-A( I ,N,3)*F(IR,3) 

63 I -AtI,N,4l<F(IR,4)-An,N,5)»F(IR,5) 

64 C COMPUTE B PRIME 

65 DO 30 M^ 1,5 

66 DO 30 N-^l ,5 

67 30 H(N.M1=BU ,N,MI-A(I ,N, 1 l<Bi IR, i ,M)-A( I ,N,3)*B( IR,3,M)-A( 1 ,N,3) 

68 1 *B(IR,3,M)-AII,N,4)*B(IR,4,M)-A(I,N,5)*B(IR,5,M) 

69 C INSERT LUDEC AGAIN 

70 LII = l./Hn.n 

71 L3I=H(3,1) 

73 UI3=H( I ,3) «L 1 1 

73 L33=I ./(H(3,3)-L3l«U13) 

74 U13.^Hi 1 ,3)*LI 1 

75 U14=H(1,4)*L11 

76 UI5=H1 I ,5)<L1I 

77 L3I=H(3,1) 

78 L33=H(3,3)-L31‘UI3 

79 U33=(H(3,3)-L31«U13I*L33 

80 L33=l . /(H(3.3) -U13*L3I-U33<L33) 

81 U34=(HI3,4I-L3I*U14)'L33 

83 U35=(H(3,5)-L3I*U151*L33 

83 L41=H(4,1) 

84 L43=H(4,3)-L41«UI3 

85 L43-H(4,3I-L4I*U13-L43*U33 

86 U34= (H ( 3 , 4 ) -L3 1 * U 1 4-L33* U34 ) 'L33 
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N0ZL3D -BTRl 

L44=l ./(H(4,4)-U14«L41-U24*L42-U34»L43) 

U35=(H(3.5)-L31«U15-L32*LI25)*L33 

L51=H(5,1) 

L52=H(5,2)-L5l«U12 

L53=H(5,3)-L51«U13-L52*U23 

L54=H(5.4)-L5nU14-L52*U24-L53*U34 

U45* (H(4 , 5 ) -L4 1 *U1 5-L42*U25-L43*U35 ) *L44 

L55- 1 .7 (H( 5 , 5 ) -L5 1 *U 1 5-L52*U25-L53*U35-L54*U45 » 

COMPUTE LITTLE R»S 
D1«L1I«F(1,1) 

D2=Lee»(ni,2l-L21*Dl) 

D3<33‘(F(1 .3)-L31*01-L32«D2) 

D4bL44« ( F ( 1 , 4 1 -L4 1 *D1 -L42*D2-L43*03 ) 

D5»L55*(F( 1 ,5)-L51*01-L52*D2-L53*03-L54*D4l 

COMPUTE 810 R»S 

Ftl, 51=05 

Ftl,41=D4-U45‘D5 

F( 1 ,3)=D3-U34*F(1 ,4)-U35«D5 

F ( 1 , 2 1 =D2-U23«F ( 1 , 3l -U24»F ( 1 . 4 1 -U25*D5 

F(1.1)=D1-U12«F(1 ,2)-U13*F(l ,3)-Ul4«F(I ,4)-U15*D5 

COMPUTE C PRIMES 

00 25 M*l,5 
01=L11*C(I,1,M) 

D2=L22*(C(1,2,M)-L21‘D1I 

D3=L33*(C(l,3,M)-L3nDl-L32*D2) 

D4=L44» ( C ( 1 . 4 , Ml -L4 1 *0 1 -L42*D2-L43*D3 1 
D5=L55« ( C ( 1 , 5 , Ml -L51 «0 1 -L52«02-L53*D3-L54*D4 1 
B(1,5,M)=D5 

B(1,4,M)=D4"U45*D5 
8(1, 3, Ml = D3-U34*B(I,4,M)-U35*D5 
8(1, 2, Ml = D2-U23*B(1.3.M)-U24*B(1,4,M)-U25*05 
25 Bd.l.Ml ■= D1-U12‘B(1,2.M)-U13*B(I,3,M)-U14*B(I,4,M)-U15*D5 
30 CONTINUE 

1 = 1U 
IR=M 

COMPUTE B PR1ME*B1G R FOR LAST ROW 
DO 35 N=l,5 

35 Fn,N)«F(I,Nl-A(I,N,l)*F(IR,l)-A(I,N,2)*F(IR,21-A(I,N,3)*niR,3) 
1 -A(1.N.4)*F(IR,4)-A(I,N,5)''F(IR,5I 
COMPUTE B PRIME 

00 40 M»1,5 
DO 40 N»1,5 

40 H(N,M)=B(I,N,M)-A(t,N,ll«B(IR,l,M!-A(I,N,8)*8(IR,2.Ml-A(I,N,3) 

1 *B(lR,3,MI-A(I.N,4)»BnB,4,M)-A(I,N,5MB(IR,5,M) 

Lll»l./H(l.l) 

L21-H(2.1) 

U12=H(1.BML11 

L22»1./(H(2,2)-L21«U12) 

U13"H(1.3)*L11 

UI4=H(1,4)"L11 

UIS-Hd.SMLll 

L31"H(3,1) 

L32=H(3,2)-L31*U12 

U23*(H(2,3)-L21*U13)*L22 

L33= 1 . / (H ( 3 , 3 1 -U1 3*L3 1 -U23*L32 1 

U24»(H(2,4)-L21<'U14)«L22 

U25=(H(2,5)-L2I*U15)*L22 

L41=H(4,1) 

L42«H(4,2)-L41*U12 

L43"H (4 , 3 1 -L4 nU 1 3-L42*U23 

U34- (H ( 3 , 4 ) -L3 1 *U1 4-L32*U24 HL33 

L44- 1 . / (H ( 4 . 4) -U1 4»L4 1 -U24*L42-U34*L43 1 

U35- (H( 3 , 5 1 -L3 1 «U 1 5-L38«U85 1 «L33 

L51-H(5,l) 

L52»H(5.2)-L51*UI2 

L53»H (5 , 3 1 -L5 1 *U 1 3-L52*U23 

LS4»H(5,4)-L51*UI4-L52«U24-L53*U34 

U45"(H(4,5)-L41‘UI5-L42«U25-L43*U35)*L44 

L55= 1 . / ( H ( 5 . 5) -L51 *U1 5-L52«U25-L53*U35-L54*U45 1 

Dl-LIl*Fd,l) 

D2*L22*(Fd,21-L81*Dl) 

D3*L33‘ (F d , 3) -L31 ‘01 -L32*D2) 

D4-L44‘(Fd .4)-L41‘Dl-L42‘D2-L43*D3) 

D5“L55‘ ( F d , 5 1 -L5 1 *0 1 -L52‘D2-L53‘D3-L54‘D4 1 

Fd, 51-05 

Fd,41»D4-U45‘D5 

F d , 3 1 =D3-U34*F d , 4 1 -U35‘D5 

F d , 2 1 ■D2-U23‘F (1,31 -U24‘F (1,41 -U25‘D5 

Fd , I 1-D1-UI2‘F( I ,21-U13‘F( I ,31-U14*F(I ,41-U15*D5 

1 = IU 
45 M-1 

ip-ni 

DO 50 N-1,5 

50 F(I,Nl-F(I,Nl-FdP,ll*Bd,N,ll-F(IP,81‘Bd,N,21-F(IP,31‘Bd,N,31 
1 F(IP,41*B(I,N,41-FdP, 51*8(1, N, 51 
IF d.GT.ILl GO TO 45 
RETURN 
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N0ZL3D - BTRI 




END 
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N0ZL3D - DIFFER 
1 ‘DECK DIFFER 

e SUBROUTINE DIFFER(RD,IMIN,IMAX,ISYMIN.ISYMAX) 

3 ‘CALL BTRID 

t II-IMIN+1 

5 I2«IMAX-I 

6 DO 100 N»I,5 

7 DO 100 I-II.IS 

8 100 F(I,N)*RD*(C(I + I,N,I)-C(I-I.N,U) 

9 IFdSYMIN.GT.O) GO TO 300 

10 DOaOON-1,5 

U eoo F{IMIN.N1»2.0«R01(C(I1.N.I)-C(IMIN,N,II) 

18 GO TO 500 

13 300 DO HOO N«1.5 

14 400 F(1MIN.N)«8.0*R0*CIII,N,1) 

15 F(IMIN,ISYMIN)»0.0 

16 500 IF(ISYMAX.GT.O) GO TO 700 

17 DO 600 N-1,5 

IB 600 F(IMAX,N)“8.0*RD*(C(IMAX,N,1)-CU8,N,1)) 

19 RETURN 

SO 700 DO 800 N-1,5 

81 900 FdMAX.N)— 8.0*BO«C(I8,N.l) 

88 IFdSYHAX.LT.6) FdMAX, ISYMAX)=0.0 

83 fCTURN 

84 END 
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N0ZL30 - DJMET 
•DECK DJMET 

SUBROUTINE DJMETIJ.L.XJ.YJ.ZJ) 
•CALL BASE 
•CALL VARSl 
•CALL VARS8 

DX8 = ,5/DXl 
FAC=1.0 
JP = J+1 
JR = J-1 

IRJ.NE.l) GO TO 100 
C FORWARD DIFFERENCE 
JR«J 
FAC-8.0 
GO TO 800 

100 IF(J.NE.JMAX) GO TO 800 
C BACKWARD DIFFERENCE 
JP-J 
FAC-8.0 

800 XJ = (X(JP)-X(JR)MDX8»FAC 

YJ = (Y(L,7,JP)-Y(L,7.JR))^DX8^FAC 
ZJ = (Z(L.8,JP)-Z(L,8,JRn«DX8«FAC 
RETURN 
END 


\ 
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N0ZL30 - DJMET3 


1 

•DECK 

DJMETS 

a 


SUBROUTlhS; DJMETSig.L.XJ) 

3 

•CALL 

BASE 


•CALL 

VARSl 

5 

•CALL 

VARSS 

6 


DXS = .5/0X1 

7 


FAC=1.0 

8 


JP = J+1 

9 


JR = J-1 

10 


IF(J.NE.l) GO TO 100 

11 

C 

FORWARD DIFFERENCE 

IS 


J^=J 

13 


FAC»e,0 

H 


GO TO SOO 

15 

100 

IF(J.NE.JMAX) GO TO SOO 

16 

C 

BACKWARD DIFFERENCE 

17 


JP=J 

18 


FAC=S.O 

19 

soo 

XJ = (X(JP)-X(JR))^DX5^FAC 

SO 


RETURN 

SI 


END 


I 
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N0ZL3D - DKMET 

1 *DECK DKMET 

2 SUBROUTINE DKMETTJ,K,L,XK,YK,ZK) 

3 *CALL BASE 
H *CALL VARSl 

5 *CALL VARS2 

6 C INTERMEDIATE WALL IN K DIRECTION 

7 IF(KPLANE.EQ.O) GO TO 100 

0 XK=0.0 

9 YK=1.0 

10 ZK^O.O 

1 1 RETURN 

12 100 DY2 * .5/DYl 

13 KP = K+l 

IH KR = K-1 

15 IF(KW.LE.O.OR.K.LT.KW.OR.K.GT.KW+l .OR.U.GT.UKW) GO TO 200 

16 IF(LW,GT.O.AND.L,GT.LW) GO TO 200 

17 IF(K.EQ.KW> GO TO 700 

18 lF(K.EQ.KW+n GO TO 500 

19 200 IF(K.NE.l) GO TO 600 

20 C TEST FOR INTERMEDIATE WALL NORMAL TO K=1 SURFACE 

21 IF(LW) 300,300,450 

22 300 IFUKIWL LE. J.AND. J.LE. JKIWU) GO TO 500 

23 C SYMMETRY 

400 XK=0.0 

25 ZK^n.O 

26 YK=2.0MY(L, / ,KP) -Y(L ,7,K) ) *DY2 

27 RETURN 

28 C TEST FOR WALL NORMAL TO K=l SURFACE 

29 450 IF(L-LW) 300,300.400 

30 C FOWARD DlFfERECNE 

31 500 FAC«2.0 

32 KR=K 

33 GO TO 900 

34 600 IPfK.NE.KMAXI GO TO 800 

3b IFfKMAXeC.LT.3.0R.KMAXBC.GT,4) GO TO 700 

36 C SYMMETRY 

37 XK«0.0 

30 YK=0.0 

39 ZKsQ.O 

40 1F(KMAXBC.EQ.3) YK»2. 0^ ( Y(L .7,K}"Y(L,7.KR)) «DY2 

41 IF(KMAXBC.EQ.4) ZK»2 . 0* f Z (L , 8.K) -Z(L .B.KRl) *DY2 

42 RETURN 

43 ,C BACKWARD DIFFERENCE 

44 700 KP»K 

45 FAC»P.O 

46 GO TO 900 

47 C CENTRAL DIFFERENCE 

48 800FAC«1.0 

49 900 XK«0. 

50 YK«(Y(L,7.KP)*-Y(L.7,KR) )*DY2«FAC 

51 ZK«-(ZrL,8iKP) -Z(L.6.KR) )*DY2«FAC 

52 RETURN 

53 END 
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N0ZL3D - OLMET 
1 •DECK DLMET 

a SUBROUTINE DLMETU.K.L.XL.YL.ZU 

3 ‘CALL BASE 
H ‘CALL VARSl 

5 ♦CALL VARSa 

6 CimiN/AXISYH/LAXIS 

7 C INTEWEOIATE HALL IN L DIRECTION 

0 oza • .5/DZI 

9 LP • L+I 

10 LR » L-I 

11 IFILH.LE.O.OR.L.LT.LW.OR.L.OT.LH+I.OR.J.eT.JLH) 00 TO 100 

la IF(KM.OT.O.AND.K,GT.KHI GO TO 100 

13 IF(L.EQ.LH) GO TO 700 

It IF(L.£a.LH+l) GO TO SOO 

15 100 IFIL.NE. 1) GO TO 600 

16 C AXIS OF SYMMETRY 

17 IF(LAXIS.NE.l) GO TO 150 

IS XL -0.0 

19 YL»Y(LP.7,K)-Y(L,7,K) 

aO ZL-Z(LP,8,K)-Z(L,0.K) 

ai GO TO 999 

aa C TEST FOR INTERMEDIATE HALL NORMAL TO L-1 SURFACE 

a3 150 iFiKHi aoo.aoo.too 

a<t C TEST FOR HALL AT L-1 

85 aOO IF(JLIHL.LE.J.AND.J.LE.JLIHU) GO TO 500 

as C SYMMETRY 

87 300 XL -0.0 

ae YL-0.0 

a9 ZL=a.O*(Z(LP,0.K)-Z(L.B,K))*DZa 

30 GO TO 999 

31 C TEST FOR HAl.L AT L-1 

3a too iF(K-KH) aoo.aoo,3oo 
33 C FORHARO DIFFERENCE 
3^ 500 LR-L 

35 FAC-a.O 

36 GO TO 900 

37 600 IF(L.NE.LMAX) GO TO 600 

30 IF(LMAXBC.LT.3.0R.LMAXBC.GT.>H GO TO 700 

39 C SYMMETRY 
to XL-0.0 

tl YL-0.0 

ta ZL-0.0 

t3 IF(LMAXBC.EQ.3) YL»a.0«(Y(L,7,K)-Y(LR.7.K))*DZa 

t4 IF(LMAXBC.EQ.t) ZL-a.O‘(Z(L,B,K)-Z(LR.0.Kn*DZa 

t5 GO TO 999 

t6 C BACKHARO DIFFERENCE 

t7 700 LP-L 

t0 FAC-a.O 

tg GO TO 900 

50 C CENTRAL DIFFERENCE 

51 BOO FAC-1.0 

50 900 XL-0. 

53 YL-(Y(LP,7,K)-Y(LR,7,K)l«DZa*FAC 

5t ZL»(Z(LP.0,K)-Z(LR.a,K))*DZa*FAC 

55 999 RETURN 

56 END 


\ 


PAGE as 



I 

s 

3 

I* 

5 

6 
7 
B 
9 

10 

11 

18 

13 

19 

15 

16 

17 

18 
19 
80 
81 
88 


N0ZL3O - OTSU 

•DECK OTSW 

SUBROUTINE DTSNUDT) 

•CALL BASE 

C ROUTINE TO CHANGE DT, ETC. TO NEW OT 
C OR TO CHANGE BACK TO OLD OT 

IFUOT.EQ.S) GO TO 10 
OTOLD-DT 
SHUOLO-SMU 
DT-DT*DTFAC 
SMU-SMU*DTFAC 
inSMU.GT.O.B) SMU»0.8 
inOT.GT.DTMAXI OT-OTMAX 
GO TO 80 
10 OT«DTaO 
SMU-SMUaO 
80 CONTINUE 
HD • ,5«DT 
HDX = HD/DXl 
HOY - HD/DYl 
HDZ - HD/OZl 
RETURN 
END 


1DT«I 

IDT-8 
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N02L3D - OYZ 

I «OECK OYZ 

SUBROUTINE OYZ 
•CALL BTRIO 
•CALL RHS8CC 

n-i+1 

IF(I.Ea.3> Il-l 
DO 100 L-I.LORKMX 

DO too N>1.5 

100 F(L.Nl-C(L,N,l)-C(L.N.ll) 

10 RETURN 

11 END 



N0ZL3D - OYZBCX 
1 ‘DECK DYZBCX 

a SUBROUTINE DYZBCX(ISW) 

3 ‘CALL BASE 
t ‘CALL RHSBCC 

5 *CALL BTRID 

6 C EVALUATE VISCOUS CROSS TERMS AT UPPER BOUNDARY KMAXILMAX WHEN ISW=I, 

7 C OR AT THE INNER SURFACE K=KW (L=LW) OF AN INTERNAL WALL WHEN ISW=S 

8 II=I-I 

9 IF(I.EQ.I) 11=3 

10 Lg=LORKMX 

11 IFIlSW.EQ.gl GO TO 300 

IS IF(KLMXBC.EQ.D) RETURN 

13 C BOUNDARY AT K=KMAX(L-LMAX) 

I*! C WALL B.C.(LKMXBC=1), 

15 C FREE STREAM BC(KLMXBC=S) OR OUTFLOW BC(KLMXBC=5) 

16 80 DO 90 L=I ,LS 

17 90 F(L, 11=0.0 

18 DO 100 N=8,5 

19 DO 100 L=l,La 

50 100 F(L,Nl=S.O<(C(L,N,n-C(L,N,mi 

51 IF(ISW.EQ.S) RETURN 

SS IF(KLMXBC.EQ.3.0R.KLMXBC.EQ.H-1 GO TO 500 

S3 RETWTN 

St C INTERNAL WALL AT K=KW (L=LW1 

55 300 IF(J.GT.JKLW) RETURN 

56 IF(LORKW.GT.O) LS=LORKW 

57 GO TO 80 

SB C SYMMETRY B.C. FOR VELOCITY COMPONENT NORMAL TO UPPER BOUNDARY 
S9 500 DO 600 L=1 .LORKMX 

30 600 F(L,KLMXBC1=0.0 

31 RETURN 

3S END 


I 
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N0ZL3D - DYZBCl 
1 ‘DECK DYZBCl 

a subroutine: DYZBCl (isw) 

3 ‘CALL BASE v 

4 'CALL RHSBCC 

5 «CALL BTRlD 

6 C EVALUATE VISCOUS CROSS TERMS AT A LOWER BORY K=r (L=l) WHEN ISW=1, 

7 C OR AT THE OUTER SURFACE K=KW+1 IL*LW+1) OF AN INTERNAL WALL 

B C WHEN isw=a 

9 ' Ll=l 

10 IFMSW.EQ.ai GO TO 100 

11 IFIKLIBC.EQ.OT RETURN . 

IS C BOUNDARY AT K>=l(L*tr 

13 IFIJ.LT.JKLIWL.OR.U.GT.JKLIWUI GO TO 300 

Ilf 100 L'a»LORKMX 

15 IF(LORKW.GT.O) La«L0RKW+ 1 SW-T 

IS C INTERNAL WALL 

17 IF(ISW.EQ.I) GO TO 150 

18 IF(J-JKLW) 150,150,110 

19 no IFILa.EQ.LORKMX) RETURN 

aO IF(J.GT.JLKW) RETURN 

ai Ll=La-l 

aa C ADIABATIC WALL BC ON ENERGY EQUATION 

B3 150 II=‘I-I 

84 . IFU.EQ.l' II--3 

85 DOaOOL=I,Le 

as DO ISO N=I ,4 

87 190 F(L,N)=0. 

as aoo F(L,5)'--a.o»!C(L,5,l)-C(L,5,iin 

89 IFIISW.EQ.ai RETURN 

30 850 IFIL8.EQ.L0RKMX) RETURN 

31 LK8-.-I 

38 C SYM BC AT KL=I . AND. J.LT. JKLIWL .OR. J.GT. JKL IWU. AND.LK.GT.LORKW 

33 300 DO 500 L=L1,L0RKMX 

34 DO 400 N»l,5 

35 400 F(L,N)=a.0*(C(L,N,81-C(L.N,m 

36 500 F(L, IW+ei=0.0 

37 RETURN 

38 END 
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N0ZL3D - DZY 

1 ‘DECK DZY 

a SUBROUTINE DZY(KORL) 

3 ‘CALL RHSBCC 
t ‘CALL BASE 

5 ‘CALL VARSl 

6 ‘CALL BTRID 

7 ‘CALL Vise 
B ‘CALL VARS2 

9 DIMENSION SSI 13, 1) ,T( 13) 

10 EQUIVALENCEISS.A) , (T( 1 ) , T1 ,B( 1 ,5, 1 ) ) , IT(2) ,T2) , (T(3) ,T3) , (n't) ,TH) 

11 2,(T(5),T5),(T(6),T6),(T(7),T7),(T(8),T8),(T(9),T9),(T(10),T10) 

12 3,(T(ll),Tin,(TtI2),T12),(T(13),T13) 

13 C VISCOUS STRESSES! INNER FIRST DERIVATIVES) FOR VISCOUS CROSS 

It C TERMS IN A K,L PLANE 

15 IFIIW.EQ.2) GO TO 300 

16 K=KORL 

17 CALL ZZMIJ.K, 1 ,LMAX) 

IB DO 100 L=1 ,LMAX 

19 CALL YYM(J,L,K,K) 

20 DO 100 N=1 ,t 

21 100 XX(L,N)=YY(K,N) 

22 DO 200 L=1 ,LMAX 

23 DO 200 N=1 ,t 

2t 200 YYIL ,N)=XX(L,N) 

25 GO TO 600 

26 300 L=KORL 

27 CALL YYMIJ.L, I ,KMAX) 

28 DO too K=1 ,KMAX 

29 CALL ZZMIJ.K, L,L) 

30 DO too N=l ,t 

31 too XXIK.N)=ZZIL,N) 

32 DO 500 K=1,KMAX 

33 DO 500 N- 1 , t 

3t ZZIK,N)=YYIK.N) 

35 500 YYlK,N)=XXIK,N) 

36 600 K=KORL 

37 CW=0.0 

38 DO 800 L=1,L0RKMX 

39 LLL=L 

to KKK=K 

tl IFIIW.Ea.2) LLL«K 

t2 IFIIW.EQ.2) KKK«L 

t3 RA • l./QILLL.l.KKK) 

tt 02 > IQILLL,2,KKK)“2 + QILLL,3,KKK)“2 + QILLL,t,KKK)“2)‘RA 

t5 TT= GD‘IQILLL,5,KKK) - 0.5‘Q2)‘RA 

t6 CALL VISCOFITT.RMUE) 

t7 RMUE»TT 

t8 VNU = RMUE+TURMUILLL.6.KKKI 

t9 GKAP = RMUE+PRTR‘TURMUILLL.6,KKK) 

50 RJ = 1./Q6ILLL.KKK) 

51 GI=RJ‘VNU 

52 DO 700 N= 1 . 3 

53 G2=YYIL,N)‘G1 

5t TIN)=ZZIL,1)‘G2 

55 TIN+3)=Z2IL,2)‘G2 

56 700 TIN+6)=ZZIL,3)‘G2 

57 UIL) = QILLL,2,KKK)‘RA 

58 VIL) = QILLL.3,KKK)‘RA 

59 WIL) ■= QILLL,t,KKK)‘RA 

60 EIL) = QILLL,5,KKK)‘RA-.5‘IUIL)“2+VIL)“2+WIL)“2) 

61 SSI1,L)=T1+T5+T9 

62 SSI2,L)=SSIl,L)+Tl/3.0 

63 SSI3,L)=T2-2./3.‘Tt 

6t SSIt,L)=T3-2./3.‘T7 

65 SSI5,L)=SSIl,L)+T5/3.0 

66 SSI6,L)=Tt-2./3.‘T2 

67 SSI7,L)=T6-2./3.‘T8 

68 SSI8,L)=SSI1 ,L)+T9/3. 

69 SSI9.L)=T7-2./3.‘T3 

70 SSI10,L)=T8-2./3.‘T6 

71 SSIll ,L)=SSI6,L)‘VIL)+SSI9,L)‘WIL) 

72 SSI12,L)=SSI3,L)‘UIL)+SSI10,L)‘WIL) 

73 SSII3,L)=SSIt,L)‘UIL)+SSI7,L)‘VIL) 

7t SSIt,L)=GKPR‘GKAP‘SSIl,L)/VNU 

75 800 CONTINUE 

76 I"l‘l 

77 IFII.EQ.t) 1=1 

78 C LATERAL LIMIT OF INTERNAL AND LOWER WALLS 

79 KLLP=KORLW 

80 IFIKORLW.EQ.O) KLWP=KORLMX 

81 DO 1000 L=l.LORKMX 

82 C CENTRAL DIFFERENCES AT INTERIOR POINTS 

83 NOIFAC=l 

et L1=L+1 

85 L2=L-1 

86 C ONE-SIDED DIFFERENCES AT BOUNDARY POINTS 
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87 

C 


LOWER BOUNDARY L (K) «1 

88 



IF(L.NE.l) GO TO 801 

8i9 



L8-L ' ' ' ■ ' , 

90 



NDlFAC-8 

91 



GO TO 890 

98 

C 


UPPER BOUNDARY LMAX (KMAX) 

93 


801 

IF(L.NE.LORKMX) GO TO 805 

9H 



Ll-L 

95 



NDIFAC-S 

96 



GO TO 890 

97 

c 


INTERNAL MALLS 

98 

c 


TEST FOR INTERNAL MALL NORMAL TO L (K1 DIRECTION THAT MOULD DISRUPT 

99 

c 


CENTRAL DIFFERENCES IN THAT DIRECTION 

100 


80S 

IFILORKM.EO.O) GO TO 890 

101 



LKMP-LORKM+1 

108 



IFIL.NE.LORKH .AND. L.NE.LKMP) GO TO 890 

103 

c 


TEST FOR INTERNAL MALL PARALLEL TO L (K) DIRECTION 

109 



IFIKORLMl 850,850,810 

105 

c 


ONE-SIDED DIFFERENCES AT UPPER EDGE OF THE INTERNAL HALL 

106 

c 


PARALLEL TO L (K) DIRECTION 

107 


010 

IF(L.NE.LKHP) GO TO 850 

100 



IFU.CT.JKLM .OR. K.NE.KORLM .OR. K.NE.KORLH+U GO TO 850 

109 



L8«L 

110 



ND1FAC»8 

111 



GO TO 890 

118 

c 


ONE-SIDED DIFFERENCES ON FACES OF THE INTERNAL HALL NORMAL TO THE 

113 

c 


L (K) DIRECTION 

119 


850 

IFCK.GT.KLMP.OR. J.GT.XKM) GO TO 890 

115 



IF(L.EQ.LORKM) L1«L 

116 



IF(L.EQ.LKMP) L8«L 

117 



NDIFAC»8 

118 


890 

CONTINUE 

119 



DO 900 N>1,13 

180 


900 

T(N)-SS(N,L) 

181 

c 


DERIVATIVES 

188 



DU - U(L1)-U(L8) 

183 



DV • V(L1)-V(L8) 

189 



DM » H(LI)-M(L8) 

185 



DEI - E(L1)-E(L8) 

186 



DU8-(U(L1)««8-U(L8)**8M0.5 

187 



DV8“(V(L1)**8-V(L8)**8)*0.5 

188 



D^e-(M(L1 1 •«8-M(L8) •«8) «0 .5 

189 

c 


BOUNDARY POINT DERIVATIVES 

130 



IFCL.NE.ll GO TO 930 

131 

c 


LO»ER BOUNDARY L (K)-l 

138 

c 


TEST B.C. OPTIONS 

133 



IF(LKIBC) 980,980,910 

139 

c 


TEST FOR LOWER WALL 

135 


910 

IFIK.LE.KLMP .AND. J.GE.XKIML .AND. J.LE.XKIMU) GO TO 990 

136 

c 


SYMMETRY CONDITIONS OUTSIDE WALL REGION 

137 



IF(IW-l) 915,915,980 

130 

c 


SYMMETRY PLANE Z-CONSTANT 

139 


915 

DHFAC-1.0 

190 



DVFAC-0.0 

191 



GO TO 970 

198 

c 


SYt*CTRY PLANE Y-CONSTANT 

193 


980 

DWFAC-0.0 

199 



DVFAC-1. 

195 



GO TO 970 

196 

c 


UPPER BOUNDARY LMAX (KMAX) 

197 


930 

IF(L.NE.LORKMX) GO TO 990 

198 

c 


TEST B.C. OPTIONS 

199 



GO TO (980,990,980.980,915,980) ,LKMXBC+I 

150 

c 


INTERS. MALLS ARE TAKEN CARE OF BY ONE-SIDED DIFFERENCES AS 

151 

c 


SET UP PREVIOUSLY 

158 

c 


SYMMETRY CONDITIONS ON DERIVATIVES 

153 


970 

OU-0. 

159 



0U8-0. 

155 



DV8-0. 

156 



Dte-0. 

157 



DEI-0. 

158 



DV-DV*DVFAC 

159 



DM»OW*DWFAC 

160 



GO TO 990 

161 

c 


SET VISCOUS STRESSES TO ZERO 

168 


980 

DO 9% N-1,5 

163 



C(L,N,I)-0.0 

169 


985 

CONTINUE 

165 



GO TO 1000 

166 

c 


CORRECTION FACTOR FOR ONE-SIDED DIFFERENCES 

167 


990 

IF(NDIFAC.NE.8) GO TO 995 

168 



DU-DU*8.0 

169 



DV-DV*e.O 

170 



DM-DM«8.0 

171 



DU8-DU8*S.O 

178 



OV8-DV8‘8.0 

173 



DW8=DW8»8.0 
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17H DEI*DEI*2.0 

175 995 CONTINUE 

176 C COMPUTE VISCOUS STRESSES 

177 C(L,1,I)«0.0 

178 C(L,2,n-Ta«DU+T3*DV+T>f*DW 

179 C(L,3,n»T6*0U+T5*0V+T7«DW 

180 C(L,‘*,I)“T9*OU+T10*DV+T8*DW 

101 C(L,5,I)-T1»0EI +Ta*0Ua+T5*DVa+T8»DW2+T 1 1 ‘DUtT 1 a*DV+T 1 3*0W 

18a 1000 CONTINUE 

103 RETURN 

10^ END 


I 
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1 ‘DECK OZYBC 

2 SUBROUTINE DZYBC(K) 

3 ‘CALL RHSBCC 
H ‘CALL BTRID 

5 ‘CALL Vise 

6 KLMPl-KORLW+l 

7 IF(tCORLW.EQ.O) KLMPI-KORLMX 

8 L*LORKM>I 

9 IF(J.LE.JLKW.AND.L0RKH.GT.0.AND.K.I.E.KLMPI) GO TO 800 

10 100 L-1 

11 IF(LKIBC.EQ.O) GO TO 500 

18 IFIJ.LT.JLK1W..OR.J.GT.JLK1WU.OR.K.GT.KLM*!) GO TO 300 

13 C MALL BC FOR JLKIW..LE.J.LE.XK1WU FOR L«1(K«1I 

I>* 800 C(L.l,I)-0.0 

15 C(L,e,I)-8.0*(U(L+l)-U(L)) 

16 C(L.3,I)-8.0*(V(L+1)-V(L)) 

17 ClL.t.D-S.O^lNlL+D-MlL)) 

18 C(L,5,I)»8.0*(E(L+n-E(L)> 

19 IF(L-l) 500,500.100 

80 C SYTtCTRY BC FOR J.LT.JLKlML.OR.J.GT.vA-KlMU FOR L-KK-n 

81 300 00 >fOO N*l,5 

88 HOO C(1,N,I)>0.0 

83 IF(IH.EQ.l) C(l,t,n=8.0*(M(8)“N(in 

8>t IFdM.EO.8) Cn.3,n=8.0‘(V(8)~V(l)) 

85 500 L-LORKW 

86 IF(J.LE.XKM.AND.LORKN.GT.O.AND.K.LE.KLNPl) GO TO 700 

87 600 IF(LKMXBC.Ea.0.OR.LKMXBC.EQ.8.0R.LKMXBC.EQ,5) RETURN 

88 L«LORKMX 

89 IF(LKMXBC.NE.l) GO TO 800 

30 C MALL BC FOR L-LMAX(K=KMAX) 

31 700 C(L,l,n-0.0 

38 C(L,8,I)-8.0«(U(L)-U(L-in 

33 C(L,3,I)-8.0*(V(L)-V(L-11) 

3*f C(L,>t.I)-8.0*(M(L)-M(L-n) 

35 C(L,5,n=e.0«(E(L)-E(L-in 

36 IF(L.LT.LORKMX) GO TO 600 

37 RETURN 

38 800 DO 900 N»1 ,5 

39 900 C(L.N.I)-0.0 

40 C REFLECTIVE SYM BC MHEN LMAX(KMAX) A PLANE PARALLEL TO XY(YZ) PLANE 

41 IF(LKMXBC.EQ.3) C(L,3, 1 )«S.O»(V(L)-V(L-I )) 

48 C REFLECTIVE SYH BC 1*CN LMAX(KMAX) A PLANE PARALLEL TO XZ(XY) PLANE 

43 IF(LKMXBC,EQ.4) C(L,4. 1 )«8.0<(H(L)-M(L-1 ) ) 

44 RETURN 

45 END 


I 
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1 ‘DECK DZYDYZ 

a SUBROUTINE OZYDYZdWW.JJ) 

3 ‘CALL BASE 
‘CALL VARSl 

5 ‘CALL BTRID 

6 ‘CALL RHSeCC 

7 ‘CALL VARS2 

S C VISCOUS RIGHT HAND SIDE TERMS THAT CONTAIN CROSS DERIVATIVES 
9 C IN THE K,L OR L.K DIRECTIONS 

10 ORE * HD/(RE*DZ1«DY1*2.0) 

11 IU>1VM 

12 CALL SW 

13 1=0 

It KLXP=KORLMX+l 

15 J=JJ 

16 KLWT=KORLW 

17 IF(KORLW.EQ.O) KLWT=-5 

18 DO 300 K=1,KLXP 

19 IF(K.LT.KLXP)- CALL DZY(K) 

20 IF(K.EQ.l) GO TO 300 

21 1RK.EQ.2I CALL DYZBClll) 

22 1F(K.GT.2.AN0.K.LT.KLXP) CALL DYZ 

23 iriK.EQ.KLWTfE) CALL DYZBC1(2) 

2t IF(K.EO.KLXP) CALL DYZBCXU 1 

25 1F(K.EQ.KLWT+1) CALL DYZBCX(2) 

26 DO 200 L=l,LORKMX 

27 LLL=L 

28 KKK=K- I 

29 1F(IW.EQ.2) KKK=L 

30 IF(IW.£Q.2) LLL=K-1 

31 DO 200 N = 2,5 

32 200 S(LLL,N+B,KKK) = SILLL ,N+8,KKK) +F (L ,N) *DRE 

33 300 CONTINUE 

3t RETURN 

35 END 


I 
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1 >de:ck dzzdyy 

a SUBROUTINE DZZDYY (I WW.JJ) 

3 •CALL BASE ; , ' : 

‘CALL VARSl 

5 ‘CALL BTRID 

6 ‘CALL RHSBCC 

7 •CALL Vise 
B •CALL VARSa 

9 C VISCOUS RIGHT HAND SIDE TERMS THAT CONTAIN ONLY UNIDIRECTIONAL 

10 C DERIVATIVES IN EITHER THE K OR L DIRECTION. , 

11 IN-IWM 

la . CALL SW . 

13 LKWR-LORKW+I 

It KLWR-KORLW+I 

15 GKPR = GAMMA/PR 

16 PRTR = PR/0.9 

17 ORE = HD/(RE«DZOPDY*^a) 

IB J=JJ 

19 DO aoOO K = KLORLL.KUORLU 

ao INTWAL=0 

ai IRLORKW.GT.O.AND. J.LE. XKW) INTHAL=1 

aa IRKORLW.GT.O.ANO.K.GE.KLWR) INTWAL-O 

93 IF(IW.EQ.a) GO tq 700 

at CALL ZZMIJ.K, t .LMAX) 

as GO TO 900 . 

96 700 CALL YYM(J,K. 1 .KMAX) 

97 DO 800 N=1 .i* . 

as DO 800 L=1 ,KMAX 

99 800 ZZ(L,NRYY(L,N) 

30 C SPECIFY BOUNDARY CONDITION ON DIMENSICNLESb WALL HEAT TRANS- 

31 C FER RATE QW. NORMALIZED BY BH0INF*CINF«*3. 

39 900 QW=0.0 

33 QW=Qw*SQRT(zz;i,n-*a + zz!i.a)‘*a + zzd 3)**ai 

34 DO 1000 L = l.LORKMX 

35 LLL=L 

36 KKK=K 

37 IFdW.EQ.ai LLL=K 

30 IFdW.EO.a) KKK=L 

39 RA = l./Q(LLL,l,KKK) 

40 Qa=(Q(LLL,9.KKKd*9 + QILLL . 3 .KKk) • *9 + Q(LLL , 4 ,KKK) ••9) *RA 

41 TT = GD<(Q(LLL,5,KKkI - 0.5*Q9I*RA 

49 CALL VISCOF(TT.RMUE) 

43 VNU = RMUE+TURMU(LLL,6,KKK) 

44 GKAP = RMUE+PRTR«TURMU(LLL.6,KKK) 

45 RJ = l./Q6(LLL.KKK) 

46 SOIL) = (ZZ(L,l)^*a+ZZ(L,a)««a+ZZ(L,3)<^9)^RJ 

47 Sl(L) = (S0(L)+ZZ(L.l)**a/3.*RJl*VNU 

48 SacL) ? (SQ(LUZZ(L,a)**a/3.‘RJ)‘VNU 

49 S3(L) = (S0(L)+ZZ(L,3)**a/3.<RJ)»VNU 

50 S4(L) * (ZZ(L, 1 )^ZZ(L,a)/3.^RJ)*VNU 

51 S5(L) = (ZZ(L,1I*ZZiL,3)/3.aRJ)*VNU 

59 S6(L) = (ZZ(L,9)«ZZ(L,3)/3.*RJ)*VNU 

53 SOIL) = SO(L)^GKPR*GKAP 

54 UIL) = Q(LLL,a,KKK)^RA 

55 VILl = Q(LLL,3,KKK)^RA 

56 HID = Q1LLL,4,KKK)^RA 

57 ECL) = Q(LLL,5.KKK)^RA-.5^(U(L)<<9+V(L)*‘9+W(L)^*ai 

58 1000 CONTINUE 

59 R9=0. 

60 R3*0. 

61 R4x0. 

69 R5=0. 

63 DO 1100 L = l.LMORKM 

64 LI = L41 

65 T1 = SlILD+SKL) 

66 Ta = saiLD+saiL) 

67 T3 - S3(Ll)tS3(L) 

68 T4 = S4(Ln+S4(Ll 

69 T5 » S5(L1)4S5(L) 

70 T6 » S6(Ll)+SeiLl 

71 T16 » SOILD+SOIL) 

7a DU = UILl)-U(L) 

73 DV = VILl )-V(L) 

74 DW • WILD-WIL) 

75 DEI « EILD-EIL) 

76 F9 = TdDU*T4^DV+T5^DW 

77 F3 => T4^DU+Ta^DV+T6*DW 

70 F4 » T5^DU+T6^DV+T3*DW 

79 C CONSERVATIVE DIFFERENCING OF VISCOUS STRESS WORK TERMS IN ENERGY EQ 

00 DU9"UIL1)^*9-UIL)«^9 

81 DVa=VILl)*^9-VIL)*^9 

ea DW9=wiLi )^^a-wiL)«^a 

83 DUV=UIL1 )•VILn-UIL)•VILl 

04 DUW=UILn^WILl)-UIU*WIL) 

85 DVW-VILll^WILn-VID^WIL) 

86 F5»T16^DEI + ITHDU94T9*DVa4T3»DW9l*0.5+T4«DUV4T5^DUW4T6«DVW ■ 


I 
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87 F(L.l) =0. 

88 F(L,8) = Fe-R8 

89 F(L,3I = F3-R3 

90 FCL.M-l = Ft-Rit 

91 FIL.5) = F5-R5 

98 C VISCOUS TERMS IN ENERGY EQ LOWER SURFACES INTERMEDIATE WALL 

93 IF( INTWAL.EQ.O) GO TO 1090 

99 IF(L.EQ.LORKW) F(L,5) =-8. 0* (R5+DZ0R0Y*RE*QW) 

95 1090 R2 = F8 

96 R3 = F3 

97 R9 = F9 

98 R5 = F5 

99 C VISCOUS TERMS IN ENERGY EQ UPPER SURFACES INTERMEDIATE WALL 

100 IFI INTWAL.EQ.O) GO TO 1050 

101 IFfL.EQ.LKWR) F(L ,5)=8. 0* (R5+DZORDY«RE*QW) 

10? 1050 CONTINUE 

103 IFIL.GT. 1 1 GO TO 1 100 

109 R?1=R? 

105 R31=R3 

106 R91=R9 

107 R51=R5 

108 1100 CONTINUE 

109 C DEFINE VISCOUS RHS TERMS AT THE LOWER BOUNDARY L=1 FOR 

110 C LKiaC=l (EITHER WALL OR SYMMETRY BC) 

111 IF(LKIBC.EQ.O) GO TO 1300 

11? C TEST FOR INTERMEDIATE WALL NORMAL TO L=1 SURFACE 
113 IF(KORLW) 1110, 1110, 11?0 

1'9 C TEST FOR WALL AT L=1 

115 1110 1F(JLK1WL.LE. J.AND.J.LE.JLKIWU) GO TO 1150 

116 C SYMMETRY 

117 GO TO 1 1 90 

118 C TEST FOR WALL AT L’"! 

119 11?0 IFIK.LE.KORLW, AND. ULKIWL.LE. J.AND.J.LE.JLKIWU)) GO TO 1150 

1?0 C VISCOUS TERMS AT SYMMETRY PLANE PORTION OF LOWER BDY L=1 
1?1 1190 F(1,1)*0.0 

1?? F(1,?)=?.0*R?1 

1?3 F(1,3)=?.0*R31 

1?9 F(1 ,9)=?.0*R91 

1?5 F(1 ,5)=e.0«R51 

1?6 F(1.5-IW)=0.0 

1?7 GO TO 1300 

1?8 C ADIABATIC WALL BC AT WALL PORTION OF LOWER BOY L»1 
1?9 1150 DO 1?00 N=l,9 

130 1?00 F(1,N)»0.0 

131 F(1,5)-8.0»(R51+DZORDY*RE*QW) 

13? 1300 CONTINUE 

133 C DEFINE VISCOUS RHS TERMS AT THE UPPER BOUNDARY L"LORKMX 
139 C FOR LKMXBC=KWALL),?IFREESTREAM), OR SIOUTFLOW). 

135 DO 1900 N»1 ,5 

136 1900 F(LORKMX,N)=0.0 

137 IF(LKMXBC.EQ.5) GO TO 1500 

138 IF(LKMXBC-3) 1950,1650,1650 

139 1950 IF(LKMXBC-l) 1700,1600,1500 

190 1500 FCLORKMX, ?)=-?. 0*R? 

191 F(L0RKMX,3)=-?.0*R3 

19? F(LORKMX,9)«-?.0«R9 

193 F(LORKMX,51=-?.0*R5 

199 GO TO 1700 

195 1600 F(LORKMX,51=-?.0*(R5+DZORDY*RE*QW) 

196 GO TO 1700 

197 C DEFINE VISCOUS RHS TERMS AT THE UPPER BOUNDARY L-=L0RKMX WHEN THE 

198 C LATTER IS A SYMMETRY PLANE (LKMXBC-3 OR 9). 

199 1650 F(LORKMX,1)=0.0 

150 FILORKMX, ?)=-?. 0»F? 

151 F(LORKMX,3I=-S.O»F3 

15? FILORKMX, 9)«-?.0«F9 

153 FILORKMX, 5)=-?. 0‘F5 

159 F(LORKMX,LKMXBC)=0.0 

155 1700 CONTINUE 

156 DO 1800 L = LLORKL,LUORKU 

157 LLL=L 

158 KKK=K 

159 IFdW.EQ.?) LLL-K 

160 IFdW.EQ.?) KKK=L 

161 DO 1800 N = 1 ,5 

16? 1800 S(LLL ,N+8,KKK) = S(LLL ,N+8,KKK) +F(L ,N) «DRE 

163 ?000 CONTINUE 

169 RETURN 

165 END 
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t ‘DECK EIOEN 

a SUBROUTINE EIOEN(J) 

3 ‘CALL BASE 

4 ‘CALL VARSI 

5 ‘CALL VAfiSa 

6 C 

7 C COMPUTE EIGENVALUES 
B C 

9 C IF CNBR INPUTEO OT 0.0 » THEN DT IS SET FOR THAT COURANT NUMBER 

10 C IF CNBR INPUTED EQ 0.0 »THE INPUTEO OT IS USEO ANO THE MAXIMUM 

1 1 C COURANT NUMBER IS FOUNO 
la C 

13 DO 10 L-LL.LU 

14 DO to K-KAL.KU 

15 CALL YYMIJ.L.K.K) 

16 CALL ZZHIJ.K.L.L) 

17 RR . l./Q(L,l,tO 

18 U - Q(L.a,K)‘RR 

19 V - Q(L,3,K)*RR 

ao W • Q(L,4.K)*RR 

ai SNOSP • SQRT(GD*(Q(L,5,K)*RR-.5»(U*U+V‘V+H‘H))) 

aa SIGB >= ABS(YT(K,4)+U*YY(K,n+V«YY(K,a)+W‘YY(K,3))+SNDSP»SQRT( 

33 I YY(K,lM*am(K,a)»*a+YY(K,3)»*a) 

34 SIGC » ABS(ZZ(L.4(+U‘ZZ(L.n+V‘ZZ(L,a)+W*ZZ(L,3n+SNDSP*SQRT( 

as 1 zz(L,i)**a+zz(L,a)“a+zz(L.3)**a) 

as SIGBC = AMAXl (SIGB, SIGC) 

a7 SIGBC=SIG8C/Q6(L.K) 

38 IF (SIGHAX.GE. SIGBC) GO TO 10 

39 JT - J 

30 KT ■= K 

31 LT . L 

38 SIGMAX = SIGBC 

33 10 CONTINUE 

34 IF (SIGMAX. GT.SIGJMX) GO. TO 15 

35 SIGMAX=SIGJMX 

36 JT-JTJ 

37 KT-KTJ 

38 LT-LTJ 

39 15 CONTINUE 

40 IF (J.NE.JMAX) GO TO 35 

41 DXM <■ AMINKOXl.DYl.DZl) 

4a IF (CNBR. LE. 0.0) GO TO 35 

43 DT - CNBR»DXM/SIGMAX 

44 DTFAC’1.0 

45 W) = .5«DT 

46 HOX m/DXl 

47 HOY « HO/DYl 

48 HDZ » HO/OZl 

49 WRITE (6,aO)CNBR,JT,KT.LT,DT 

50 ao F0RMAT(lH0,3HCN»,Ea0.10,3X,llH,AT J.K.L -,3I5,3X,a5HTHE TIME STEP 

51 IIS RESET TO.ESO.IO) 

58 85 CONTINUE 

53 CNBR = OT*SIGMAX/DXM 

54 WRITE (6,30)JT.KT,LT,CNBR,SMU 

55 30 FORMAT (5X.30HJ,K,L, ANO MAX COURANT NBR .3I5.E14.5.8X,4HSMU" 

56 1 1PE18.5) 

57 IGNCAL-IGNCAL-8 

58 35 CONTINUE 

59 RETURN 

60 END 
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N0ZL3O - EIGENJ 
1 ‘DECK EIGENJ 

a SUBROUTIIC EIGENJ(K.L) 

3 «CALL BASE 

H ‘CALL VARSl 

5 *CALL VARSa 

6 C 

7 C COMPUTE EIGENVALUES 
0 C 

9 C IF CNBR INPUTED GT 0.0 I THEN OT IS SET FOB THAT COURANT NUMBER 

10 C IF CNBR INPUTED EQ 0.0 tTHE INPUTED DT IS USED AND THE MAXIMUM 

It C COURANT NUMBER IS FOUND 

IE C 

13 XJ**»0.0 

It DO 10 J - JB.JMAX 

15 RR • l./Q(L.l.J) 

16 U ■ Q(L,a,JI«RR 

17 V = Q(L,3,J)*BR 

18 W • Q(L,t.J)«RR 

19 XJt=DXIDX(L,!t,J) 

ao Xja-0XIDY(L,15,J) 

ai XJ3»DXID2(L,16,J) 

aa SNDSP » SQRT(GO*(Q(L,5,J)*RR-.5*(U*U+V«V+W*W)n 

a3 SIGA»ABS(XJH+U«XJl+V*XJa+W*XJ3)+SNDSP»SQRT(XJl*«a+Xja**a+XJ3**a» 

at SIGA=SIGA/Q6(L,J) 

as IF(SIGJMX.GE.SIGA) GO TO 10 

as jTj= j 

a7 KTJ- K 

as LTJ- L 

a9 SIGJMX = SIGA 

30 10 CONTINUE 

31 RETURN 

3a END 



I 
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N0ZL3D - FILTRX 
1 ‘DECK FILTRX 

a SUBROUTINE FILTRX(K.L,Jl.ja» 

3 »CALL BASE 

H ‘CALL VARSI 

5 ‘CALL BTRIO 

6 ‘CALL VARSa 

7 DIMENSION E(5,5) 

B JA • Jl‘l 

9 JBB • ja-1 

10 XXvAf«0.0 

11 0015J»Jl.ja 

la R1 . DX1DX(L.1>*,J1‘HDX 

13 Ra - OXIDVtL.IS.JMHDX 

H R3 =■ 0XIDZ(L.16,J)‘H0X 

15 R>* • XXJH‘HDX 

16 CALL AMATRXIE.J.L.Rl.Ra.RZ.Rif) 

17 DO 10 M-1,5 

18 DO 10 N»1.5 

19 10 D(J,N,MI » E(N,M) 

ao 15 CONTINUE 

at DO 30 J«JA,JBB 

aa RJ <= Q6(L,J) 

S3 RR » RM ‘.5‘(RJ‘Q6(L.J-m 

BH RF = RM ‘.S'lRJtOeiL.J+in 

as DO as N=i,5 

as DO ao M>i,5 

37 AIJ.N.Ml « -D(J-l,N,Mt 

ae B(j,N,M) = 0.0 

39 ao C(J,N,M) " D(J+1 ,N,M) 

30 A(J.N.N) - A(J,N,N)-RR 

31 B(J,N,N) = RJ+RF+RR 

33 CIJ.N.N) - C(J,N,N)-RF 

33 as F(J,N) =■ S(L,N+B,J1 

3‘t 30 CONTINUE 

35 RETURN 

36 END 
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N0ZL30 - riLTRY 


\ 

«DECK 

FILTRY 

2 


SUBROUTINE FlLTRYU.L.Kl .KBl 

3 

•CALL 

BASE 

H 

•CALL 

VARSl 

5 

•CALL 

BTRID 

6 

•CALL 

VARSS 

7 


DIMENSION E(5,5l 

8 


KA = Kl + I 

9 


KB = K2-I 

10 


CALL YYM(J,L,K1 ,KS) 

It 


DO 15 K=K1 ,KE 

la 


R1 = YY(K,l)«hOY 

13 


RB = YY(K,B)*HDY 

IH 


R3 = YY(K,3!«HDY 

15 


N't - YY(K,>t)*HDY 

16 


CALL AMATRX(E.K,L,R1 ,RB,R3,F 

17 


DO 10 M=1 ,5 

18 


DO 10 N=I ,5 

19 

10 

D(K.N,M) = EfN.Ml 

ao 

15 

CONTINUE 

ai 


DO 30 K=KA,KB 

aa 


RJ = 06(1. ,K) 

83 


RR = RM • .5«(RJtQB(L,K-m 

2H 


RE = RM • .5‘(RJ+a6(L,KH) ) 

as 


DO B5 N=1 ,5 

86 


DO 20 M=t ,5 

21 


A(K,N,MI := -D(K-1 ,N,M) 

ae 


B(K,N,M) = 0.0 

as 

ao 

C(K,N,M) = Diktl ,N,M) 

30 


A(K,N,N) = A(K,N,N)-RR 

31 


B(K,N,N) = RJ+RF+RR 

3a 


C(K,N,N) = C(K,N,N)-RF 

33 

as 

F(K,N) =■ S(L ,N+8,Kt 

3i| 

30 

CONTINUE 

35 


RETURN 

36 


END 
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N0ZL3D > FILTRZ 


1 

‘DECK FILTRZ 

3 


SUBROUTINE FILTRZ(J,K,L1 ,L8) 

3 

•call 

BASE 

i| 

•CALL 

VARSl 

5 

•CALL 

BTRID 

6 

•CALL 

VARS8 

, 7 


DIMENSION E(,5,5) 

8 


LA » LI+1 

9 


LB * L8-I 

10 


CALL ZZM(J,K.LUL8) 

11 


DO 15 L«Ll,L8 

IS 


Rl = ZZ(L.l)^HDZ 

13 


R8 « ZZ(L,2)*HDZ 



R3 « 2Z(L,3)^HDZ 

15 


m » ZZIL.i+MHOZ < 

CALL AMATRXfE.K.L,Rl.R8,R3,R^ 

16 


17 


DO 10 M=1 ,5 

18 


DO 10 N»1 ,5 

19 

IQ 

D(L,N,MI » E^N.M) 

SO 

15 

CONTINUE 

SI 


DO 30 L=LA,LB 

33 


RJ = QB(L.K) 

S3 


HR = RM •.5*(RJ+Q6(L-l ,K) ) 

SH 


RF = RM *.5MRJ+Q6(L+1 ,K) ) 

S5 


DO 85 N= 1 , 5 

S6 


00 80 M=l .5 

S7 


A(L,N,M) = -D(L-I,N.M) 

SB 


8(L.N.M) = 0.0 

sa 

80 

C(L,N,M) - D(Lfl ,N.M) 

30 


A(L.N.N) * A(L,N,N)-RR 

31 


B(L.N.N) ^ RJ+RF+RR 

3S 


C(L,N,N) = C(L,N,N)-RF 

33 

85 

F(L,N) = SfL.N+0,K) 

3*t 

30 

CONTINUE 

35 


RETURN 

36 


END 
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N0ZL3D - FLUXVE 

1 ‘DECK FLUXVE 

2 SUBROUTINE FLUXVE(JK,L.Rl.R2,R3,Wt) 

3 ‘CALL BASE 

t ‘CALL VARS I 

5 ‘CALL VARS2 

6 RR • l./Q(L,l.JK) 

7 U * Q(L,2,JK)‘RR 

B V « Q(L,3,JK)‘RR 

9 W • QIL.'t.JKl'RR 

10 OS » RH‘R1‘U+R2‘V+R3‘W 

11 PP • GAMI‘(Q(L.5,JK)-.5‘Q(L,l,JK)*(U‘U+V‘V+M*Wn 

12 FVni = Q(L.1.0K)*CS 

13 FV(2) • Q(L.2.JK)‘0S+R1‘PP 

It FV131 « Q(L.3,JK)*QS+R2‘PP 

15 FV(t) - Q(L,t.JK)‘QS+R3‘PP 

16 FV(5) - (Q(L.5.JK)+PP)‘QS-Rt‘PP 

17 RETURN 

IB END 
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N0ZL3D - GOINTF 

1 "DECK GOINTF 

2 SUBROUTINE GDINTFU,Kl,K2,U,Le,NMX.0INTGL) 

3 C DOUBLE INTEGRAL OF FHAT OVER ETA(K) AND ZETA(L) BETWEEN 

C LIMITS (KI.K2) AND (LI, L8) 

5 «CALL BASE 

6 "CALL VARSI 

7 ‘CALL BTRID 

8 *CALL VARS2 

9 DIMENSION OINTGL(5) 

to DO 80 L-LI.L8 

11 DO 15 K-K1.K8 

18 C METRICS XIX.XIY.XIZ 
13 M»K 

It J1«J 

15 CALL XXM(L,J1,M.M) 

16 CALL FLUXVE(K.L,XX(K,n,XX(K.8),XX(K,3),0.l 

17 DO 10 N»1,NMX 

18 10 A(K,N,n*FV(N) 

19 15 CONTINUE 

SO 00 80 N-I.NMX 

81 CALL QDRTR(B(L,N,I),A(I.N,1),0Y1,KI,K8) 

28 80 CONTINUE 

83 DO 30 N«1.NMX 

8t CALL QDRTR(ENTGRL,B(1,N,1),DZ1,H,L8) 

25 30 OINTGL(N)*ENTGRL 

86 RETURN 

87 END 


I 
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N0ZL3D - GDINTW 

1 »DECK GDINTW 

2 SUBROUTINE GDINTWCIWW.JJ.LORKIN.KORLl ,K0RL2,ENDL,GFS) 

3 'CALL BASE 
It *CALL VARSl 

5 »CALL BTRID 

6 •CALL RHSBCC 

7 »CALL VARS2 

B DIMENSION GFS(5) 

9 C DOUBLE INTEGRAL OF TOTAL STRESS OVER A WALL BOUNDARY SURFACE 

10 C L0RK» CONSTANT BETWEEN LIMITS ( Jl , J2I AND (KORLI .K0RL2I . 

1 1 J-JJ 

IS GKPR-GAMMA/PR 

13 IW=IWW 

IT L-LORKIN 

IS NDD»I 

IB CALL SW 

17 IFIL.EQ.LORKW.OR.L.EQ.LORKMXI NDD=-NDD 

IB Ll'NDD 

19 Kl«.0 

SO IF( IW.EQ. I ) GO TO 5 

21 L1=0 

22 KI-NDD 

23 5 CONTINUE 

2T DO 200 K=KORLI ,K0RL2 

25 IFIIW-I) 10,10,20 

26 10 CONTINUE 

27 L0RK=L 

28 KORL=K 

29 CALL ZZM(J,K,L,L) 

30 GO TO 30 

31 20 CONTINUE 

32 LORK=K 

33 KORL=-L 

3T CALL YYM(J,K,L,L) 

33 DO 25 N=1 

36 25 ZZ(L,N)=YY(L,N) 

37 30 RA=I . /QILORK, 1 , KORLI 

3B 02= (Q ( LORK , 2 , KORL I » ‘2+0 ILORK , 3 , KORL I • *2+0 ( LORK , M , KORL I • »2 1 »RA 

39 T=OD*IQ(LORK,5,KORL)-0,5*Q2I»RA 

TO CALL VISCOF(T,RMUEI 

T I VNU=RMUE 

T2 GKAP=RMUE 

T3 C RECONSTRUCT GEOMETRIC JACOBIAN FROM VOLUME-AVERAGED ONE 

TT Q6L-iQB(L0RK,K0RLI 

T5 Q6LP=Q6(LORK+LI ,K0RL*K1 ) 

T6 RJ=3./IT.»Q6L-Q6LPI 

T7 SO = IZZ(L,I)«*2+ZZ(L,2)‘»2+ZZ(L,3)**21 

T8 CIK, 1 , 1 )=SQRT(SO) 

T9 SO=SO«RJ 

50 SI = ISO+ZZIL, I )••2/3.»RJ)•VNU 

51 S2 = (S0+ZZ(L,2)»*2/3.»RJI»VNU 

52 S3 = IS0*ZZ(L,3)»»2/3.»RJI*VNU 

53 ST - CZZCL, 1 I •ZZIL,2I /3. •RJ) »VNU 

ST S5 = (ZZCL,I)»ZZIL,3)/3.»RJI*VNU 

55 S6 = (ZZ(L,2)»ZZ(L,3I/3.*RJ1»VNU 

56 Rl-I .O/QILORK, 1 ,KORL) 

57 R2=l .0/Q(LORK+L1 , 1 ,KORLtKll 

58 R3=l .0/Q(LORK+2»LI , 1 ,K0RL+2*K1 I 

59 DU=(T.O»Q(LORKtLI , 2 , KORL+KI 1 *R2-3 , 0*0 (LORK , 2 , KORL I <R I -0 (L0RK+2‘L I , 

60 1 2,K0RL+2*KI I *R3W (2.0*DZI 1 

61 DV= ( T . 0 »0 ( LORK*L 1,3, KORL+K I I *R2-3 . 0 *0 1 LORK , 3 , KORL I »R I -0 (L0RK+2»L I , 

62 I 3,K0RL+2*K1 1»R3)/ (2.0*DZI) 

63 DW-(T.O*Q(LORK+LI ,T , KORL+KI 1 *R2-3 . 0»0 (LORK ,T ,KORL I *R1 -0(L0RK+2»L I , 

6T 1 T,K0RL+2»KI )»R3)/ I2.0»DZII 

65 EI = (Q(LORK,5,KORL)-0.5*02MRA 

66 02-R2* (QILORK+LI ,2,K0RL+K1 I •*2+0(L0RK+LI ,3, KORL+K 1 I ••2+QILORK+L I ,T 

67 1 ,K0RL+K1)»»2I 

68 E2=10(L0RK+L1 ,5,K0RL+KI 1-O.5»02) *R2 

69 02=R3*10(L0RK*2»LI ,2,K0RL+2*K1 I •*2+Q(L0RK+2»LI ,3,K0RL+2»KI 1*»2+ 

70 I 0IL0RK+2»LI,T,K0RL+2*KI)“21 

71 E3=IQIL0RK+2*LI ,5,K0RL+2*K1 l'0,5»Q21 *R3 

72 DE-IT,0»E2-3.0*E1-E31/ I2.0*DZI ) 

73 GFS121-S1»DU+ST*DV+S5»DW 

7T GFSI3l-Sa»DV+ST»DU+S6*DW 

75 GFSIT)«S3»DW+S5»DU+S6*DV 

76 GFS(5)-S0*GKPR»GKAP»DE 

77 CALL FLUXVE(K0RL,L0RK,ZZ(L, I I ,ZZIL,2I ,ZZ(L,3) ,0. 1 

78 DO 100 N-2,5 

79 C CORRECT FOR DIRECTIONALITY OF DU,OV,DW,DE 

80 IF(LORKIN.EO.LORKW,OR.LORKIN.EQ.LORKMXI GFS (N1 — GFSINl 

81 100 A(K,N,II-FV(N)-GFS(N1/RE 

82 200 CONTINUE 

83 CALL ODRTR(ENDL,C,DYI ,K0RLI ,K0RL21 

8T DO 300 N-2,5 

95 CALL QDRTRIGFSINI ,A( 1 ,N, 1 I ,DYI ,K0RL1 ,K0RL2I 

86 300 CONTINUE 
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N0ZL3D - GDI NTH 
B7 RETURN 

88 END 



N0ZL3D - GLOANT 

1 "DECK GLOANT 

2 SUBROUTINE GLOANT 

3 "CALL BASE 

^ C CALCULATE AND WRITE GLOBAL PERFORMANCE PARAMETERS. 

5 CALL QDRTR{AREF,ENTGD»DX1 . 1 , UMAX) 

6 DO 400 N=1 .5 

7 CALL QDRTR<ENTGRL.ENTGDI(1,N),DX1,KJMAX) 

8 400 GF(N)=ENTGRL 

9 C CHANGE SCALING OF NON-DIMENSIONAL GENERALIZED FORCE VECTOR GF(N) 

10 C TO REFERENCE VALUES OF INFLOW BOUNDARY MASS FLUX RHOINF"UINF«AREF . 

11 C DYNAMIC PRESSURE AREF" 5"RH01NF"UINF""P. AND KINETIC ENERGY 
1? C FLUX AREF".5*RH01NF«UINF"*3. 

13 C REFERENCE AREA NORMALIZED BY SQUARE OF REFERENCE LENGTH. 

14 AREF=I 0 

15 faCM=1 .0/RMACM 

16 GF M )=FACM"GF( I )/AREF 

17 GF(51 '-FACM-GFCSJ/AREF 

18 rACM=L*.0"FACM"FACH'AREr 

19 DO 500 N^a,5 

BO 500 GF!N)=FACM"GF(N) 

EM WRITEI3) NC,TAU.GF 

BB WR1TE(6,6001 GF 

?3 600 F0RMAT(///4X,67HGENFRALIZED FORCES FROM DIRECT INTEGRATION OF WALL 

t?4 I SURFACE STRESSES /1P5E11.4) 

RETURN 

86 END 
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N0ZL3D - GLOBL 
1 ‘DECK GLOBL 

S SUBROUTINE GLOBL (JJ) 

3 ‘CALL BASE 
't ‘CALL VARSl 

5 ‘CALL RHSeCC 

6 ‘CALL BTRID 

7 «CALL GLOB 

8 ‘CALL VARS2 

9 DIMENSION 0INT0L(5I.ENTBL(5) 

10 DATA IFIRST/0/ 

1 1 C GLOBL PERFORMANCE PARAMETERS FROM INTEGRAL FORM OF STEADY STATE 

12 C CONSERVATION LANS. 

13 C FREESTREAM CONDITIONS assumed AT GRID POINT (J,K,U*( 1,1, LMAXl 

14 J-JJ 

15 NMX-5 

16 IF (IFIRST.EQ.l) GO TO 15 

n IFlRST-1 

IS DO 10 IH-1,2 

19 DO 10 N«1,NMX 

20 DO 10 IJ-I,JMAX 

21 ENTB(IJ,N,IM)«0. 

22 10 CONTINUE 

23 15 CONTINUE 

24 IF (J.EQ.l.OR.J.EQ.JMAXI GO TO 20 

25 GO TO 70 

26 C INTEGRAL OVER OUTFLOW BOUNDARY 

27 20 Ll-1 

2B L2"LMAX 

29 Kl«l 

30 K2-KMAX 

31 CALL 00INTF(J,KI,K2,L1,L2,NMX,DINT0L) 

32 DO 25 N-1,NMX 

33 25 OF(N)-DINTOL(N) 

34 C CORRECT FOR INTERNAL HALL LW.OT.O 

35 IF (LW.EQ.O) GO TO 40 

36 L1>LW 

37 L2-LH+1 

36 Kl-1 

39 K2-KMAX 

40 IF (KH.EQ.O) GO TO 30 

41 K2-KH+1 

42 IF (J.LE.JLW) GO TO 30 

43 IF (J.OT.JKW) GO TO 40 

44 Kl-KW 

45 30. CALL 0DINTFtJ,Kl,K2,Ll,L2,NMX,DINT0L) 

46 DO 35 N*1,NMX 

47 35 GF(N)»GF(N)-D1NTGL(N) 

48 C CORRECT FOR INTERNAL WALL KW.OT.O 

49 40 IF (KW.EQ.O) GO TO 52 

50 IF (J.OT.JKW) GO TO 52 

51 KI>KW 

52 K2-KWtI 

53 Ll-1 

54 L2-LMAX 

55 IF (LW.EO.O) GO TO 45 

56 L2-LH 

57 45 CALL ODINTFl J,K1 ,K2,L1 ,L2,NMX,0INT0L) 

58 DO 50 N-l.NMX 

59 50 OF(N)-GF(N)-D1NTOL(N) 

60 52 CONTINUE 

61 IF (J.NE.JMAX) GO TO 60 

62 DO 55 N-l.NMX 

63 55 D1NJMX(N)-0F(N) 

64 GO TO 70 

65 60 DO 65 N-< ,NMX 

66 DINJt(N)-OF(N) 

67 65 CONTINUE 

66 70 CONTINUE 

69 C INTEGRALS OVER FREESTREAM BOUNDARIES LORKMX WHEN LKMXBC-2 OR 5 

70 DO 105 IH-I.2 

71 CALL SW 

72 L-LORKMX 

73 IF (LKMXBC.NE.2.ANO.LKMXBC.NE.5) GO TO 105 

74 DO 95 K-l.KORLMX 

75 GO TO (75,80),IW 

76 75 CONTINUE 

77 CALL ZZM(J,K,LHAX.LMAX) 

78 R1-ZZ(L,1) 

79 R2-ZZ(L,2) 

60 R3-ZZIL.3) 

61 CALL FLUXVE(K,L,R1,R2,R3.0.) 

62 GO TO 85 

83 80 CONTINUE 

64 CALL YYM(J,K,KMAX,KMAX) 

85 Rl-YY(L.l) 

86 R2-YY(L,8) 
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N0ZL3D - OLOBL 


87 


R3-YY(L,3) 

88 


CALL FLUXVE(L,K.Rt.R8,R3.0.1 

89 

85 

CONTtNUE 

90 


00 90 N't.NMX 

91 

90 

A(K,N,t)-FV(N) 

99 

95 

CONTtNUE 

93 


00 too N-t,NHX 

9H 


CALL QORTR(ENTB(J,N,tM),A(t.N.t),t.O,t.KORLHX) 

95 

too 

CONTINUE 

96 

t05 

CONTINUE 

97 

C 

SET SNITCH FOR NALL SURFACE INTEGRATION 

98 


IOFSUR*t 

99 


IF(IGFSUR.EQ.O) 00 TO 300 

too 


00 ISO N>a,5 

tot 


ENTB(J,N,I)-0. 

toa 


ENTB(J,N,a)>0. 

t03 


ENTO(J)«0. 

tOH 


OINTOL(N)-0. 

t05 


OINJI(N)-0. 

t06 

tso 

OINJHX(N)>0. 

t07 

C 

COMPUTE OFtai TO OFtSI DIRECTLY FROM HALL SURFACE INTEGRATIONS 

too 


KI-I 

t09 


Ka«KMAX 

tto 


IF(KN.OT.O) KB-KN 

ttt 


IFtJLINO.EQ.Ol 00 TO 170 

tts 


IFtJ.LT.JLINL.OR.J.OT.JLtNOI 00 TO 170 

tt3 


IF(LIBC.NE.I) 00 TO 170 

tt>t 


FAC-t . 

tts 


IFtJ.EQ.JLINLI 00 TO 158 

tte 


IFtJ.EQ.JLIHUI 00 TO 159 

tt7 


GO TO 155 

tte 

tsa 

IFtJ.EQ.I.OR.J.EO.JMAXI 00 TO 155 

tt9 


FAC-.5 

tso 

tS5 

CONTINUE 

tat 


CALL OOINTNt I , J. t ,KI .Ka.ENTOL.ENTBL) 

taa 


ENTDtJI-ENTDL 

tas 


DO 160 N-a,5 

taH 

t60 

ENTBt J.N, I t-ENTBI J.N, I ti-ENTBLtNI'FAC 

tas 

t70 

tF(LMAXBC.NE.I) 00 TO IBO 

tae 


CALL OOINTNt t .U.LMAX.Kt .Ka.ENTOL.ENTBL) 

t87 


ENTD(J)»ENT0(J1*ENTDL 

tae 


DO 175 N-8,5 

tae 

t75 

ENTBt J.N. t )-ENTBt J.N. tl*ENTBLtN) 

t30 

t80 

IFtLH.EQ.O) GO TO 880 

t3t 


IFtJ.OT.JLN) 00 TO 880 

t3a 


FAC-t. 

t33 


IFtJ.NE.JLNl GO TO IBB 

t3>» 


IFtJ.EQ.JMAX) 00 TO IBB 

t35 


FAC-.5 

t36 

tea 

CONTtNUE 

t37 


CALL OOINTNt I . J.LN.KI .K8.ENT0L .ENTBL) 

t38 


ENTOtJI-ENTDIJt+ENTOL 

t39 


00 185 N-a.s 

t40 

tes 

ENTBt J.N. t l-ENTBI J.N. t >*ENTBLtN)«FAC 

t*»t 


IFIKB.EQ.KH) KB-Ka+I 

t>»a 


CALL OOINTNt t . J.LN*t .Kt .Ka.ENTOL.ENTBL) 

tt3 


ENTOIJ)-ENTDIJ)+ENTOL 

t"*** 


00 190 N-a.s 

tW 

190 

ENTBt J.N. I )-ENTBt J.N. t )+ENTBLtN)«FAC 

tH6 

aao 

Ll-t 

t>*7 


L8-LMAX 

t^e 


IFtLH.OT.O) L8-LN 

t>f9 


IFtJKINU.EQ.O) 00 TO 330 

tso 


IFIJ.LT.JKtHL.OR.J.OT.JKtNU) 00 TO 330 

tst 


IFIKIBC.NE.t) 00 TO 830 

tsa 


FAC-t.O 

153 


IF(J.EQ.JKINL.OR.J.EQ.JKINU) 00 TO 881 

ts>« 


00 TO aaa 

tss 


IFtJ.EO.t.OR.J.EQ.JMAXI 00 TO 888 

tS6 


FAC-.5 

tS7 

aaa 

CONTINUE 

tS8 


CALL ODINTNia.J.t.LI.La.ENTOL.ENTBL) 

tS9 


ENTDtJ)-ENTDtJ)+ENTOL 

teo 


DO 885 N-a.5 

t6t 

aas 

ENTB 1 J . N . t ) -ENTB 1 J . N . U +ENTBL t N ) *FAC 

tea 

930 

IFIKMAXBC.NE.I) 00 TO a>»0 

t63 


CALL OOINTHia. J.KMAX.Lt .L8.ENTDL. ENTBL) 

t6>* 


ENTOIJ)-ENTOIJ)tENTOL 

t65 


DO 835 N-8.5 

t66 

935 

ENTBt J.N. I )-ENTBt J.N. I )+ENTBLtN) 

t67 

9H0 

tFfKN.EQ.O) 00 TO 300 

t68 


IFtJ.OT.JKN) 00 TO 300 

t69 


FAC- I . 

t70 


IFtJ.NE.JKN)00 TO B^a 

t7t 


IFtJ.EQ.JMAX) 00 TO 2HS 

t7B 


FAC-.5 

t73 

ana 

CONTINUE 
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171* 


CALL GDINTWIS, J.KW.Ll ,L8,ENTDL.ENT8L) 

175 


ENTDIJI-ENTDIJI+ENTDL 

176 


DO 845 N-8,5 

177 

845 

ENT8 ( J . N , 1 ) -ENTB ( J. N , 1 ) +ENTBL (N ) ‘FAC 

178 


1F(L8.EQ.LW1 L8-L8+1 

179 


CALL GD 1 NTW ( 8 , J . KMt 1 . L 1 , L8 , ENTOL , ENTBL 1 

180 


ENTD(J)-ENTO(J)+ENTOL 

181 


DO 850 N-8.5 

188 

850 

ENTBl J.N, 1 »«ENTB( J.N, 1 H-ENTBL(N)*FAC 

183 

300 

CONTINUE 

184 


RETURN 

185 


END 
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1 

NOZL3D - OLOeAL 
•DECK GLOBAL 


2 

SUBROUTINE GLOBAL(J) 

- 

3 

•CALL BASE 



•CALL VARSI 


5 

•CALL BTRIO 


6 

•CALL GLOB 


7 

•CALL VARS2 


8 

GKPR - GAMMA/PR 


9 

PRTR - PR/0.9 


10 

C 


II 

C INTEGRAL OF GENERALIZED STRESSES OVER HALL BOUNDARY L»1 OR L-LHAX 


12 

C 


13 

L«1 


19 

IF(LMAXBC.EQ.l) L-LHAX 


IS 

DO 200 K-l.KHAX 


16 

CALL ZZHU.K.L.Ll 


17 

RA • l./Q(L,l,K) 


18 

02 - (Q(L,2,KH^2 + 0(L,3.K)^^2 + Q(L,9,KH^2MRA 
T • G0^(Q(L,5,K) - 0.5^Q2)^RA 


19 


20 

CALL VISCOF(T.RMUE) 


21 

VNU » RMUE 


22 

GKAP • RMUE 


23 

C RECONTRUCT GEOMETRIC JACOBIAN FROM VOLUME-AVERAGED ONE 


29 

Q6L«Q6(L,KI 


25 

LP-L+1 


26 

IF(L.EQ.LMAX) LP-L-1 


27 

Q6LP-Q6(LP,K) 


28 

RJ»3./(9.^Q6L-Q6LP) 


29 

15 CONTINUE 


30 

SO - (ZZ(L.1)^^2+ZZ(L,2)^«2+ZZ(L,3)^^2) 


31 

C(K,I,1)»SQRT(S0) 


32 

SO-SO^RJ 


33 

SI - (S0+ZZ(L.1M^2/3.^RJMVNU 


39 

S2 « (S0+ZZ(L.2I^^2/3.^RJHVNU 


35 

S3 » (S0+ZZ(L,3M^2/3.^RJ)^VNU 


36 

S9 - (ZZ(L,1)^ZZ(L,2)/3.^RJ)^VNU 


37 

S5 - (ZZ(L,1)^ZZ(L,3)/3.^RJ)^VNU 


36 

S6 » (ZZ(L.2)^ZZ(L,3)/3.^RJHVNU 


39 

Ll-L+1 


90 

L2-L+2 


91 

IF(L.NE.LMAX) GO TO 20 


92 

Ll-L-1 


93 

L2-L-2 


99 

20 CONTINUE 


95 

R1»1.0/Q(L,1,K) 


96 

R2-1.0/Q(L1,1,K) 


97 

R3«I.0/Q(L2,I,K) 


98 

DU-(9.0^Q(L1,2,KMR2-3.0^Q(L,2,KHR1-Q(L2,2.K)^R3)/(2.0^DZ1) 


99 

DV-(9.0^Q(L1,3,K)^R2-3.0^Q(L,3,K)^R1-Q(L2.3,KMR3)/(2.0^DZ1) 

OM-(9.0^Q(L1,9,K)^R2-3.0^Q(L,9,K)^R1-Q(L2,9,KMR3)/(2.0^DZ11 


50 


51 

E1»(Q(L,5,K)-0.5^Q2)^RA 


52 

Q2*R2^(Q(Ll,2,K)^^2+atLl,3,KH^2+Q(Ll,9,KM^2) 


53 

E2«(Q(L1.5.K)-0.5^02MR2 


59 

Q2«R3^(Q(L2,2,K)^^2+a(L2.3,K)^^2+Q(L2,9,K)^^2) 


55 

E3*(Q(L2.5,K)-0.5^Q2MR3 


56 

DE-(9.0^E2-3.0^E1-E3)/(2.0^DZ1) 


57 

GF(I)»0.0 


58 

GF (2) -SI •DU+S9^DV+S5^DH 


59 

GF ( 3 ) -S2^DV+S9^0U+S6^DH 


60 

GF ( 9) -S3^DH+S5^0U+S6^DV 


61 

GF (5) -SO^OKPR^GKAP^DE 


62 

CALL FLUXVE(K,L,ZZ(L,1),ZZ(L,2),ZZ(L,3).0.) 


63 

DO too N«l,5 


69 

C : CORRECT FOR DIRECTIONALITY OF DU.DV.DW.DE 


65 

IF(L.EQ.LMAX) GFCNI— GF(N) 


66 

100 A(K,N, 1I-FV{N)-GF(N)/RE 


67 

200 CONTINUE 


68 

CAUL QDRTRCENTGDIJI ,C,DY1 , 1 .KMAXl 


69 

DO 300 N-1,5 


70 

CAUL QDRTRCENTGDI ( J,N) ,A( 1 ,N. 1 ) ,DY1 , 1 ,KMAX) 


71 

300 CONTINUE 


72 

RETURN 


73 

END 
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N02130 - GLOINT 

1 ‘DeCK GLOINT 

2 SUBROUTINE GLOINT 

3 "CALL BASE 
H "CALL GLOB 

5 NMX-5 

6 IF(IGFSUR.EQ.O) GO TO 10 

7 NMX«I 

B CALL QORTRCAREF.ENTO, 0X1,1, JHAX) 

9 00 5 N«2,5 

10 CALL ODRTRIENTGRL.ENTBtl.N, 11,0X1,1, UMAX) 

11 3 GFtNI— ENTGRL 

12 C NET OUTFLOW INTEGRAL MINUS INFLOW INTEGRAL 

13 10 00 15 N-I,NMX 

I*! GFINl— OINJMXCNl+OINJKNI 

15 15 CONTINUE 

16 00 25 IN«I,2 

17 00 20 N-I,NMX 

IB CALL QDRTR(ENTGRL,ENTB(I,N,IW),DX1,1,JMAX) 

19 20 GF (N) -OF (N) -ENTGRL 

20 B5 CONTINUE 

21 C CHANGE SCALING OF GENERALIZEO FORCE VECTOR GFCNI 

22 C TO REFERENCE VALUES OF INFLOW BOUNOARY MASS FLUX 

23 C RRHO'RMACH, OYNAMIC PRESSURE ,5*RRH0«RMACH**2, ANO 

2H C KINETIC ENERGY FLUX .5«RRH0*RMACH**3. REFERENCE AREA 

25 C IS EQUAL TO SQUARE OF REFERENCE LENGTH. 

26 AREF-1.0 

27 FACM-l.O/RMACH 

28 GF(1)-FACM*GF(I)/AREF 

29 GF(5I*FACM*GF(5) 

30 FACM»2.0«FACM«FACM/AREF 

31 00 30 N-2,5 

32 30 GF(N)«FACM»GF(N) 

33 WRITE (6,35)GF,CW 

3H 35 F0RMAT(4X,3HGF»IP5EII.‘t,eX,3HCW«IPEll.'H 

35 RETURN 

36 ENO 


I 
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N0ZL30 - GRID 

1 ‘DECK GRID 

SUBROUTINE GRID 
•CALL BASE 
•CALL VARSl 
•CALL VARSa 

C PUT HERE THE CALCULATION OF THE GRID 
RETURN 
END 



N0ZL3O - INFLTR 
1 ‘DECK INFLTR 

a SUBROUTINE INFLTR! ISW.LORK) 

3 ‘CALL BASE 
“L ‘CALL BTRID 

5 ‘CALL RHSBCC 

6 C FILTER INTERMEDIATE DELTAQ AT INFLOW BOUNDARY 

7 J=1 

8 Il=a 

9 IW^it-ISW 

10 CALL SW 

11 C FILTER IN LORK DIRECTION 

le ie»LMORKM 

13 IF(LORKW.GT.O) I2-L0RKW-1 

It 13=11-1 

15 it=ie+! 

16 DO 30 N=I,5 

17 IF(N.E0.3.0R.N.EQ.t) GO TO 30 

18 DO 10 1=11, le 

19 10 A(l,l,l)=0.a5‘(F(I + l,NI+F(I-l,N)‘B.0‘Fn,N)) 

20 All ,1,1)=F(1,N) 

21 A(I2‘1,1,1J=F(12+1,N1 

22 IFILKIBC.EQ, I.AND.J.GE.JLKIWL.AND.J.LE.JLKIWU) GO TO 15 

23 A(l,l,ll=0.5‘(F(l,N)+F(2,Nn 

2t 15 IF(I2.EQ.LMORKM.ANO. (LKMXBC.EQ.3.0R.LKMXBC.EQ.tn 

25 1 A(12+l,l. 11=0. 5‘(F(12,NUF(12tl, Nil 

26 DO 20 1=13, It 

27 20 F(I ,N)=A(1 , 1 , 1 1 

28 30 CONTINUE 

29 DO to 1=13, It 

30 IF(IW.EQ.l) F(I,3)=VOU(1,LORK1‘FCI,2) 

31 IF(IW.EQ.21 F(I,31=V0U(L0RK,I1‘F(I,2) 

32 IF(IW.EQ.l) F(I,t)=W0U(I,L0RK)‘F(l,2) 

33 IF(1W.EQ.2) Fn,tl=W0U(L0RK,Il‘F(I,2) 

3t to CONTINUE 

35 RETURN 

36 END 
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N02L3D - INtTIA 

1 ■ ^DECK INITIA 

2 SUBROUTINE INlTlA 

3 *CALL BASE 

H -CALL VARSi , ‘ ' 

5 -CALL SHOCKC 

6 -CALL BTRID 

7 -CALL VISCO 
Cj -CALL GLOB 

9 C COMMON FREESP CONTAINS FREESTRE AM PRESSURE 

!0 COMMON/FREESP/FSP.FSRHO 

11 COMMON/AXISYM/LAXIS 

12 COMMON/FILTR/INELT 

13 -CALL VARS? 

DIMENSION DINTGLU) 

15 DIMENSION lOPARS(H) 

IG C NOL MUST EQUAL THE FIRST DIMENSION OF Q (MULTIPLE OF H FOR CDC) 

17 NOL ^32 

10 IDPARS(1)=0 

19 lDPARS(2)-0 

20 IDPAR5(3)’0 

21 I0PARS(HJ=0 

^3? call DMhlAS. (3 0.0) 

23 CAI.L DMDASTM3,0, IDPARS) 

2" PI - ^f.-AT.AN; ! . 1 

25 NCl-0 

26 TAU=--0.0 

27 NRES** • 

2B NK«0 

29 C 

30 C READ DATA 

31 C 

32 READ (5. K'lNMAX. JMAX.KMAX,LMAX.lAMIN. INVISC.-.ilBC . JMaXBC.KPL ANF ,K1B 

33 I C . .IK ! NL . JK I WU , KW , UKN . KMAXBC 

3^ RE AD ( 5 , 1 0 U. i eC , JL-l WL , Jl . I WU , L N . Jl W , LMAXBC , NRS T . 1 WR I T . NGR 1 . NP . K V 1 S 

35 I .t.VIS.KLVIS. INFLT. ISUTH.NROUT 

36 READ ( 5 , 1 5 ) D r . FSMACH . RMACH . RE . PR . RTOEGK . p$P , F S T 

37 READ (5.15) GAMMA .RMUEXP , TW . CNBR .OTF AC , RM . SMU . OMEGA 

.30 READ (5.15) DTMAX 

39 10 F0RMA1( 1615) 

‘■^0 15 FORMAT '8F 10.0) 

m WRITE {6,20iNMAX,.(MAX.KMAX.LMAX,l AMIN, INVISC . JIBC . JMAXBC .KPLANE ,K1 

4? IBC.JKIWL , JK I WU.KW,JKW, KMAXBC 

43 WRITE (6, 25U.IBC,JLIWL.JLIWU,LW.JLW. LMAXBC. NR5T, IWR: T.NGRI .NP.KVIS 

44 i .LVIS.KI VIS. INFLT. ISUTH.NROUT 

45 WP ! T E ( 6 . 3C ) OT . FSMACH . RMACH . RE . PR . R^DECK . FSP . FST 

46 WR 1 TE ( B . 35 ) GAMMA , RMUEXP . TW . CNBR . C TF AC . RM . SMU . OMEGA 

47 WP1TE(B.37) DTMAX 

48 20 F0RMAT( 122HI NMAX UMAX KMAX LMAX LAMIN INVISC J1 

49 IBL ^:MAXBC KPLANE KlBC JKIWL JKIWU KW JKW KMAXB 

50 IC /161B) 

51 25 FORMA r ( / / I 32H LIBC JLIWL JLIWU LW JLW LMAXBC 

5? 1 NRSr IWRIT NGR! NP KV!E LVIS KLVIS INPLT ;S 

53 2UTH NROUT /1610) 

54 30 F0RMAT(//7X.2HDr. 10X,6HFSMACH, I0X.5HRMACH 

55 1 . 12X,2HRF. I3X.2HPR, I IX.eHRTDEGK. 1 OX. 3hFSP. 1 3X. 3Hh ST . / 1 P8E 1 5 . 7) 

56 35 FORMA T ( ' /5X , 5HGAMMA , I OX , 6HRMUEXP .MX. 2HTW . 1 2X . 4HCNBR . 1 OX . 5HOTF AC . 

57 I . 1 3X . 2HRM , 1 2X . 3HSMU .MX, 5H0MEGA/ I P0EI 5 . 7 ) 

58 37 F0RMAr(//5X.5HDTMAX/lPEl5.7///) 

59 C RMACH IS REFERENCE M.ACH NUMBER 

60 C RE IS REYNOLD’S NUMBER AT REFERENCE CONDITIONS 

61 C RTDEGK IS REFERENCE TEMPERATURE IN DEGREES KELVIN 

62 C (USED ONLY IN COMPUTING THE SUTHERLAND VISCOSITY) 

63 C FSMACH 15 FREESTREAM MACH NUMBER 

64 C FSP IS DIMENSIONLESS FREESTREAM PRESSURE 

65 C (NORMALIZED BY REFERENCE PRESSURE) 

66 C FST IS DIMENSIONLESS FREESTREAM TEMPERATURE 

67 C (NORMALIZED BY REFERENCE TEMPERATURE) 

68 C INVISC'l FOR INVISC ID FLOW. 0 FOR VISCOUS FLOW 

69 C (C 15 MANDATORY) 

70 C LAMIN=^1 FOR LAMINAR FLOW. 0 FOR TURBULENT FLOW 

71 C 

72 C SET BOUNDARY CONDITION OPTIONS KPLANE^I FOR PLANAR SYMMETRY 

73 C LMAXBC DEFINES BDY CONDITIONS AT THE SURFACE L»LMAX. THE BC ARE H 

74 C FIXED AT THEIR INITIAL VALUES FOP LMAXBC^O. 

75 C LMAXBC«I SELECTS IMPLICIT VISCOUS WALL BC 

76 C LMAXBC=2 SELECTS IMPLICIT OUTFLOW BC WITH ENFORCED FREESTREAM 

77 C PRESSURE. FREESTREAM DENSITY 

78 C l.MAXBC=3 SELECTS REFLEC-^IVE SYMMETRY BC SUCH THAT LMAX IS A 

79 C SYMMETRY PLANE Z=CONSTANT AND THE 

80 C W-VELOCITY COMPONENT IS ZERO IN THAT SYMMETRY PLANE. 

81 C LMAXBC=4 SELECTS REFLECTIVE SYMMETRY BC SUCH THAT LMAX IS A 

82 C SYMMETRY PLANE Y=CONSTANT AND THE V 

83 C VELOCITY COMPONENT IS ZERO IN THAT SYMMETRY PLANE. 

84 C LMAXBC=5 SELECTS IMPLICIT OUTFLOW BC IN WHICH AIL VISCOUS STRESSES 

85 C AND HEAT FLUXFX VANISH AT L=LMAX. 

86 C NOTE LMAXBC - 0 CAN BE USED TO EMPLOY TIME-LAGGED BDRY CONDITIONS 



N02L30 - INITIA 

87 C AT LMAX, WHICH CAN 8E COOED INTO SUBR. BC. SIMILARLY TIME-LAGGED BC 

88 C AT THE OTHER 80YS L-I,K*I,K-KMAX CAN BE CONSTRUCETO WHEN LI8C.K18C 

88 C OR KMAXBC ARE ZERO. 

90 C 

91 C LIBC DEFINES THE 8C AT THE SURFACE L-1 

98 C LIBC-0 MEANS THE BC ARE HELD FIXED AT THEIR INITIAL VALUES. 

93 C LIBC»I MEANS IMPLICIT VISCOUS HALL BC ARE APPLIED IN THE WALL 

m C REOION(JLIWL.LE.J.LE.JLIHU) AND ( I .LE.K.LE.KMAX) . 

95 C THE REMAINDER OF THE SURFACE L-I OUTSIDE THIS WALL REGION IS 

96 C ASSUMED TO COINCIDE WITH THE Z-0 PLANE, AND REFLECTIVE SUMMETRY BC 

97 C ARE APPLIED SUCH THAT THE W-COMPONENT OF VELOCITY VANISHES IN 

98 C THE SYMMETRY PLANE. WHEN KW.GT.OI SEE BELOW) , THE OESCRBEO WALL 

99 C REGION EXTENDS OUT ONLY TO K-KW RATHER THAN KMAX. 

100 C 

101 C KMAXBC DEFINES THE BC AT THE SURFACE K-KMAX. THE OPTIONS ARE 

108 C IDENTICAL TO THOSE FOR LMAXBC 

103 C 

104 C KIBC DEFINES THE BC AT THE SURFACE K=I 

105 C KieC=0 MEANS THE BC ARE HELD FIXED AT THEIR INITIAL VALUES. 

106 C KIBC-I MEANS IMPLICIT VISCOUS WALL BC ARE APPLIED IN THE WALL 

107 C REGION(JKIWL.LE.J.LE.JKIWU) AND ( I .LE.L.LE.LMAX) . 

108 C THE REMAINDER OF THE SURFACE K-1 OUTSIDE THIS HALL REGION IS 

109 C ASSUMED TO COINCIDE WITH THE Y-0 PLANE, AND REFLECTIVE SUMMETRY BC 

110 C ARE APPLIED SUCH THAT THE V-COMPONENT OF VELOCITY VANISHES IN 

111 C THE SYMMETRY PLANE. WHEN LW.GT.O (SEE BELOW) , THE DESCRBED WALL 

118 C REGION EXTENDS OUT ONLY TO L»LW RATHER THAN LMAX. 

113 C 

114 C TW=0.0 SELECTS IMPLICIT ADIABATIC WALL BC FOR THE ENERGY EQUATION. 

115 C A NON-ZERO INPUT VALUE OF TW IMPOSES A BOUNDARY CONDITION ON 

116 C DIMENSIONLESS ABSOLUTE WALL TEMPERATURE EQUAL TO TW. 

117 1TW=0 

118 IF(TW.GT.O.O) ITW»1 

119 C 

180 C SET OPTIONS FOR INFLOW (J=I) AND OUTFLOW! J=JMAX) BOUNDARIES 

181 C JMAXBC=8 FOR SUBSONIC OUTFLOW WITH FREESTREAM PRESSWIE IMPOSED 

188 C JMAXBC.lt. a FOR COMPUTED OUTFLOW B.C. 

183 C J1BC=0 FOR FIXED (LAGGED) B.C. AT J-1. JIBC.NE.O USES INITIAL 

184 C VALUES OF TOTAL PRESSURE, TOTAL ENTHALPY, AND VELOCITY VECTOR 

185 C DIRECTION COSINES, TOGETHER WITH A CLOSING EQUATION OBTAINED EITHER 

186 C FROM MOC THEORY(JIBC.LT.O) OR FROM THE CONTINUITY, U-MOM£NTUM,OR 

187 C ENERGY EQUATION(JIBC.GT.O) . SEE COMMENTS IN SUBR. SCJMAT 
I8B C 

189 C KVIS - 1(0) SPECIFIES THAT THE VISCOUS TERMS FOR THE ETA(K) 

130 C DIRECTION ARE TO BE INCLUDED IN (OMITTED FROM) THE COMPUTATION. 

131 C LVIS * 1(0) similarly CONTROLS THE COMPUTATION OF THE VISCOUS 

138 C TERMS FOR THE ZETA(L) COORDINATE DIRECTION 

133 C KLVIS = 1(0) SIMILARLY CONTRaS THE COMPUTATION OF THE VISCOUS 

134 C CROSS DERIVATIVE TERMS FOR THE ETA AND ZETA COORDINATE DIRECTIONS. 

135 C 

136 C SET NORMAL MASS INJECTION RATE WMIMT, NORMAL I ZED BY (FREESTREAM 

137 C DENSITY)«(FREESTREAM SOUND SPEED) 

13B WMOOT =0.0 

139 C SET FINITE VOL/FINITE-DIFF WEIGHT FACTOR, WTFAC«0.75(1 .0) FOR 

140 C FINITE-VOL (FINITE-DIFF) WEIGHTING OF DELTAQ AT BOY POINTS. 

141 C WTFAC=0.75 IS MANDATORY 

148 C 

143 INXBC=1 

144 WTFAC-0.75 

145 NPLOT=0 

146 IPLOT1=0 

147 IPL0T8-0 

148 CNBR=0.0 

149 IF(KPLANE.EQ.l) KMAX-1 

150 NLR0W=16*N0L 

151 NKLP-KMAX*NLROW 

158 NLSKIP-NKLP-NLROW 

153 CF • 1.05 

154 NC=NC1 

155 ITMAX-NCl+NMAX 

156 IGNCAL-8 

157 SM0“0.5*SMU/(8.0*(3.0-FLOAT(KPLANE)n 

158 JB=8, i 

159 IF(JIBC.NE.O) JB-1 

160 LL-8 

161 IF(LIBC.GT.O) LL=1 

168 LU»LMAX-1 

163 IF (LMAXBC. GT.O) LU«LMAX 

164 IFIKPLANE.EQ. 1 1 KMAXBC=0 

165 IFIKPLANE.EQ. 1) K1BC=0 

166 KAL=8 , 

167 IF(KIBC.GT.O) KAL«1 

168 KU«KMAX-1 

169 IF(KMAXBC.GT.O) KU=KMAX 

170 IFIKPLANE.EQ. 1) KU-1 

171 IFIKPLANE.EQ. 1) KAL=1 
178 C COMPUTE CONSTANTS 

173 FSRHO=FSP/FST 
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174 ALP=0. 

175 TSUTH’^l 10.33/RTDEGK 

176 GAMl = GAMMA- 1 

177 GD - GAMMA*GAM1 

178 HD = .5*DT 

179 JM = JMAX-l 

180 KM = KMAX-l 

181 IFtKPLANE.EQ. I ) KM=l 

182 KL8»a 

183 IFtKPLANE.EQ. n KL8«1 

184 LM * LMAX-1 

185 DXl = I . 

186 DYl « 1. 

187 DZl = 1. 

188 HDX = HD/DXl 

189 HDY = HD/OYl 

190 HDZ = HD/DZl 

191 CS = COS(P1«ALP/180. ) 

192 SS = SlN(Pl*ALP/iaO.) 

193 CWFAC=(2./(GAMMA+1 .))««( .5* (GAMMA+l . ) / (GAMMA-l . )) 

194 C...FILL ZETA COORDINATE ARRAY 

195 C 00 I K = l.KMAX 

196 C CALL ETATB(2ET(l ,K) XF.LMAX) 

197 C 1 CONTINUE 

198 C 

199 C 

200 C INITIALIZE SHOCK GRID POINT VELOCITIES 

201 DO 40 J=l.JMAX 

202 DO 40 K»1 .KMAX 

203 XST(J,K)=0.0 

204 YST(J,K)=0.0 

205 ZST(J,K)=0.0 

206 40 CONTINUE 

207 C LOAD FREE STREAM AT ANGLE OF ATTACK ALP WHERE ALP IS 

208 C MEASURED FROM X AXIS IN X.Y PLANE 

209 REA0(2) KMAXR , JMAXR , LMAXR. I TMAXR ,LMAXBC,L IBC .FSMACH .GAMMA .RE .SMUR , 

210 1 DTR.ALP.CNBR.PRR 

211 HR I TE ( 6 . 45 ) KMAXR , JMAXR , LMAXR . 1 TMAXR . LMAXBC . L 1 BC . FSMACH . GAMMA . RE . S 

212 I MUR , OTR , ALP , CN8R , PRR 

213 45 FORMAT (5X.55HTH IS IS A RESTART FROM THE FOLLOWING INITIAL CONDITIO 

214 INS /76H KMAXR, JMAXR. LMAXR. 1 TMAXR. LMAXBC. 

215 ILIBC.FSMACH.OAMMA.RE.SMUR.DTR.ALP.CNBR.PRR /6U0/BE15.8) 

216 CNBR*0.0 

217 WR I TE ( 3 ) KMAX . UMAX , LMAX . I TMAX . LMAXBC . L 1 BC . FSMACH . GAMMA . RE . SMU , DT . 

218 I ALP.CNBR.PR 

219 WR I TE { 4 1 KMAX , UMAX , LMAX . I TMAX . LMAXBC . L IBC .FSMACH . GAMMA , RE , SMU . DT , 

220 1 ALP.CNBR.PR 

221 C... RESTART 

222 50 READ(2) NCl . TAU.DTR.NK 

223 IF (NCI .GT.NRST) GO TO 160 

224 IF (NCl.EQ.NRSn GO TO 60 

225 DO 55 J=l. JMAXR 

226 55 READ (2) OUM 

227 GO TO 50 

228 60 DO 100 J=1 , UMAX 

229 D065K=1,KMAX 

230 DO 65 L=1 ,LMAX 

231 Q(L, 1 ,K) * I .0 

232 Q(L.2,K) = FSMACH^CS 

233 Q(L,3,K) « 0.0 

234 Q(L,4.K) = FSMACH*SS 

235 Q(L,5,K) = I . /GD+ .5*FSMACH-«2 

236 65 CONTINUE 

237 READ(2) ( ( (Q(L.N.K) ,L=1 .LMAXR) .N=I .8) ,K=l .KMAXR) 

238 IFINGRI .EQ. 1 ) CALL GRID(J) 

239 C SAVE X 

240 X(J)=Qn,6.1) 

241 C PUT DXIDX ON DISK FOR INITIAL JACOBIAN CALCULATION 

242 DO 70 L^l.LMAX 

243 CALL XYM'L. J. 1 ,KMAX) 

244 DO 70 K=1 .KMAX 

245 DXIDX(L. 14,K)«XX(K. 1 ) 

246 70 CONTINUE 

247 C ZERO OUT TURMU 

248 DO 95 L«1 .LMAX 

249 DO 95 K« l.KMAX 

250 95 TURMU(L.6.K)=0.0 

251 CALL LKPIO(J. 1 ) 

252 100 CONTINUE 

253 C SWITCH TO IDENTIFY AXIAL SYMMETRY 

254 LAX1S«0 

255 IF(KPLANE.EQ.O.AND. ABS( Y (1 ,7 , 1) -Y U .7 .KMAX)) .LT . 1 .E-6) LAX1S=1 

256 C FIND NOZZLE THROAT INDEX J=JTT 

257 JTT»1 

258 DO 102 J=1 , UMAX 

259 IF(X(J) .NE.O. ) GO TO 102 

260 JTT=J 
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861 



GO TO 103 

868 


108 

CONTINUE 

863 


103 

CONTINUE 

864 

C 


REDEFINE FSMACH AS DIMENSIONLESS FREESTREAM VELOCITY 

865 

C 


(NORMALIZED BY REFERENCE SOUND SPEED) 

866 



FSMACH=FSMACH«SQRT ( FST ) 

867 



RE = RE/RMACH 

868 

C 


I/D LJ-PLANES TO PUT Q6.YX1,ZX1 ON DISC FOR CALC. Q6 IN JACOB 

869 



DO 115 K=l,KMAX 

870 



CALL LJP10(K.8) 

871 



DO 110 L*1.LMAX 

878 



DO 105 J-l.JMAX 

873 



CALL DJMET(J,L.XX(J,l),YXI(L.15,J),ZXI(L,l6.J)) 

874 



Q(L,14,J)«XX(J.n«DXlDX(L,14.J) 

875 


105 

CONTINUE 

876 


uo 

CONTINUE 

877 



CALL LJPlO(K.l) 

878 


115 

CONTINUE 

879 

C 



880 



CALL OUTALL(NCl) 

881 

C 



888 



DO 155 J=l .UMAX 

883 



CALL LKPI0(J.8) 

884 



DO 180 L»l ,LMAX 

885 



DO 180 K=1 .KMAX 

886 



Q6(L,K)=Q(L, 14,K) 

887 



CALL DJMET8(J,L.XXl (L. 14.K) ) 

888 


180 

CONTINUE 

889 



CALL JACOB(J) 

890 



IF(J.NE. UMAX) GO TO 184 

891 

C 



898 

C 


ADJUST OUTFLOW PLANE VARIABLES TO SATISFY IMPOSED PRESSURE 

893 

C 


BOUNDARY CONDITION P=FSP WHEN JMAXBC=8 

894 

C 



895 



IF(JMAXBC.NE.S) GO TO 184 

896 



DO 188 L=i.LMAX 

897 



DO 188 K=l .KMAX 

898 



RV=Q(L,8.K)**8+Q(L.3.K)**8+Q(L,4,K)**8 

899 



P0LD»GD«{Q(L,5.K)-RV/(e.-»Q(L. 1 ,K)) ) 

300 



PNEW’-FSP/POLD 

301 



Q(L, 1 ,K)=PNEW*Q(L, 1 ,K) 

308 



Q(L.5,K)=FSP/GD+RV/(8.*Q(L. 1 ,K)) 

303 


188 

CONTINUE 

304 


184 

CONTINUE 

305 



CALL BC(J) 

306 



CALL GLOBL(J) 

307 



IF (J.NE.JTT) GO TO 90 

308 

C 


COMPUTE NOZZLE THROAT AREA 

309 



KT=KMAX 

310 



IF(KW.GT.O) KT=KW 

31 1 



LT=LMAX 

318 



IF(LW.GT.O) LT^LW 

313 



DO 80 L=l,LT 

314 



CALL XXM(L, J. 1 ,KT) 

315 



DO 75 K=1 ,KT 

316 



DA=SQRT(XX(K,l)«XX(K,l)+XX(K.8)*XX(K,8)+XX(K.3)*XX{K.3n 

317 


75 

A(K.l.l)«DA 

318 



CALL QDRTR(B(L, 1 .1 ) .Ad . 1 , n ,DY1 , 1 ,KT) 

319 


80 

CONTINUE 

380 



CALL QDRTR(AT.Bd.l,l).DZl.l.LT) 

381 



IF(AT.LT. 1 .E-6) AT=1 . 

388 



WRITE (6,B5)JTT.AT 

383 


85 

F0RMAT(8X,88HTHR0AT LOCATION X«0. AT JTT= 13/ 

384 



1 8X.15HTHR0AT AREA AT= 1 PE 18. 5) 

385 


90 

CONTINUE 

386 



IF (J.NE.JTT) GO TO 185 

387 

C 


NOZZLE DISCHARGE COEFFICIENT CW 

388 

C 


INTEGRATE MASS FLOW AT THROAT J»JT 

389 



NMX'l 

330 



Ll«l 

331 



LS*LMAX 

338 



IF(LW.GT.O) LS'LW 

333 



Kl»l 

334 



K8«KMAX 

335 



IF(KW.GT.O) K8»KW 

336 



CALL GDINTFIJ.KI .K8.LI .LS.NMX.DINTGL) 

337 



CW*D1NTGL( 1 )/(CWFAC*AT) 

338 


185 

CONTINUE 

339 



CALL PRECAL(J) 

340 



DO 130 L=l .LMAX 

341 



DO 130 K=l .KMAX 

348 



Q(L. 15.K)*Q6(L.K) 

343 


130 

CONTINUE 

344 

C 



345 

C 

COMPUTE HTOT AND PTOT (REFERENCED TO HREF AND PREF, RESP.), AND 

346 

C 

VELOCITY VECTOR DIRECTION COSINES V0U=V/U, W0U=N/U AT INFLOW 

347 

C 

BOUNDARY J=l. 
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348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

36 1 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 


IF (J.GT.l) GO TO 150 

IF (JIBC.EQ.O.AND. INXBC.EQ.O) GO TO 150 

DO 140 K'l.KMAX 

DO 140 L«1 ,LMAX 

RR=1.0/Q(L,1,K) 

XKE=0.5*{Q(L,2,K)*^2 t Q{L,3,K)««2 t Q(L ,4 ,K) * «2) *RR««2 
ER=Q(L,5.K)«RR 

HT0T(L.K)»GAMIMGAMMA«ER-GAM1*XKE) 

PTOT(L,K)»HTOT(L,K)«Q(L,l,K)MOAMMA«GAMM(ER-XKE)/ 

I HTOT(L,Kn*M-l.O/OAMl) 

IF (Q(L,a.K).NE.0.0) GO TO 135 
VOU ( L , K ) « 1 . 0/SQRT (RE^FSMACH) 

WOU ( L . K 1 « 1 . 0 / SQR T ( RE *FSMACH ) 

VOU(L,K)«0. 

W0U(L,K)»0. 

GO TO 140 

135 V0U(L.K)»Q(L,3.K)<'Q(L,2,K) 

W0U(L.K)=Q(L,4,K)/Q(L.e,K) 

140 CONTINUE 

WRITE (6, 145) ( (L,VOU(L, n ,WOU(L. 1) ,HTOT(L, 1) ,PTOT(L, D ) ,L»1 ,LMAX) 

1 45 FORMAT ( 5X , 3HK= 1 / 6X , I HL . 8X . 3HV0U , 1 2X , 3HW0U , 11 X , 4HHT0T , 

1 IOX.4HPTOT/(5X.I2.1P4E15.7)) 

150 CONTINUE 

CALL LKP10(J,1) 

155 CONTINUE 
RETURN 

160 WRITE (6, 165)NCI ,NRST 

165 FORMAT(30H **^ERROR - INPUT VALUE NRST= 15.60H DOES NOT MATCH ANY 
I RESTART CYCLE NUMBER. LAST CYCLE READ » 15) 

STOP 

END 
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1 ‘DECK JACOB 

2 SUBROUTINE JACOB (JDO) 

3 ‘CALL BASE 
^ ‘CALL VARSl 

5 ‘CALL RHSBCC 

6 ‘CALL VARS2 

7 COMMON/AXISYM/LAXIS 

8 IWW=2 

9 IFIKPLANE.EQ, 1) IWW=1 

10 J=v«0 

11 AFAC» 75 

la BFAC*.a5 

13 C UPPER BOUNDARY SURFACE L=LORKMX 

19 DO 35 IW»1,IWW 

15 CAI I SU 

16 IFILKMXBC.NE. I ) GO TO 35 

17 L=L0RKMX 

18 IF(L.EQ.l) GO TO 35 

19 DO 30 K=1,K0RLMX 

aO IFdW.EQ.n Q6(L,K1=AFAC‘Q6(L,K)+BFAC‘Q6(L-1 ,K) 

21 IFdW.EQ.ai Q6(K.L)=AFAC‘Q6(K,L)+BFAC‘Q6(K,L-1) 

22 30 CONTINUE 

23 35 CONTINUE 

29 IF(LAXIS.EQ.O) GO TO 90 

25 C AXIAL SYMMETRY AT L=1 FOR ALL K,J 

26 DO 37 K=1,KMAX 

27 Q6d ,K)'AFAC‘Q6d ,K)+SFAC‘Q6(2,K) 

28 37 CONTINUE 

29 90 CONTINUE 

30 C LOWER BOUNDARY SURFACE LORK=l 

31 L = 1 

32 DO 55 1W=1 , IWW 

33 CALL SW 

39 IF(J.LT.JLKIWL) GO TO 55 

35 IFU.GT. JLKIWU) GO TO 55 

36 IF(KORLW.EQ.O) KLIM=KORLMX 

37 IF(KORLW.GT.O) KLIM=KORLW 

38 D050K=l,KLIM 

39 IFdW.EQ.n Q61L,KI=AFAC‘Q6(L,K)+BFAC‘Q6(L+1 ,K) 

90 lFdW.EQ.2) Q6(K,L)=AFAC‘Q6(K,L)+BFAC‘Q6(K,L+1 ) 

91 50 CONTINUE 

92 55 CONTINUE 

93 C INTERIOR AND EXTERIROR SURFACES OF AN INTERNAL WALL AT L -LORKW 

99 DO 70 IW=1 , IWW 

95 CALL SW 

96 IFU.GT. JLKW) GO TO 70 

97 IF(LORKW.LE.O) GO TO 70 

98 IFIKORLW.EQ.Ol KLIM=KORLMX 

99 IFtKORLW.GT.OI KLIM=KORLW+l 

50 L=LORKW 

51 DO 60 K=l .KLIM 

52 IFdW.EQ.n Q6(L,K1=AFAC‘Q6(L ,K)+BFAC‘Q6(L-1 Kl 

53 IFdW.EQ.2) Q6tK.L)=AFAC‘Q6(K,L)+BFAC‘Q6(K,L-n 

59 IFdW.EQ.n Q6(L‘1,K)=AFAC‘Q6(L + 1.K)+BFAC*Q6(L+2,K) 

55 IFdW.EQ.2) Q6(K,L + l)=AFAC‘Q6(K,L+n+BFAC‘Q6(K,Lt2l 

56 60 CONTINUE 

57 70 CONTINUE 

58 C EXTERIOR EDGE WHERE TWO INTERNAL WALLS INTERSECT WHEN BOTH WALLS 

59 C ARE PRESENT AND ONE WALL IS LONGER THAN THE OTHER 

60 IFIKPLANE.EQ. n GO TO 100 

61 DO 90 IW=1,2 

62 CALL SW 

63 IF(KORLW.LE.O) GO TO 90 

69 IF(LORKW.LE.O) GO TO 90 

65 IFU.LT. JLKW+n GO TO 90 

66 IFU.GT. JKLW) GO TO 90 

67 L=LORKW 

68 KS=K0RLW+1 

69 DO 80 K=K0RLW,KS 

70 IFdW.EQ.n Q6(L,KnAFAC‘Q6(L,K)+BFAC‘Q6(L + l ,K) 

71 IFdW.EQ.2l Q6(K,LI>AFAC‘Q6(K,L)+BFAC‘Q6IK,L + n 

72 80 CONTINUE 

73 90 CONTINUE 

79 100 CONTINUE 

75 C WR1TE(6,900) J 

76 C 900 FORMATI5X. U=' 19) 

77 C WRITE(6,905) 

78 C 905 FORMAT(3X, 'K'TlS'l ’T30'2'T95'3'T60'9'T75'5d90'6’T105'7’ 

79 C 1 T120-8n 

80 C DO 1 1 0 K= I , KMAX 

81 C WRITE(6.910) K, (Q6d .K) . m ,8) 

82 C no CONTINUE 

83 C WR1TE(6,906) 

89 C 906 FORMATI3X,'K'T15'9'T30’10'T95'11'T60'12'T75’I3'T90'19’T105'15'1 

85 C DO 1 15 K=1 ,KMAX 

86 C WRITE(6,9I0) K, (Q6d ,K) , 1=9, 15) 
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87 C 910 F0PMAT(ax,I?,IX,IP8EI5 P) 

88 C 115 CONTINUF 

89 RETURN 

90 END 
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N0ZL3D - LJPIO 

1 ‘DECK L^IO 

2 SUBROUTINE UPtOfK.N) 

3 *CALL VARSl 
i* *CALL BASE 

5 ‘CALL VARS2 

6 CALL DMPAST(13,(K-l)*NLROW,l) 

7 DO 10 J=I ,JMAX 

8 IF(N.EQ.l) CALL DMWASTI 13, 0(1,1, JI.NLROW) 

9 IF(N.EQ.2) CALL DMRAST( 13, 0(1,1, J),NLROW) 

10 CALL DMPAST(13,NLSKIP,-I) 

11 10 CONTINLE 

12 RETURN 

13 END 


I 


PAGE 60 


fu M ^ in to f" © O) 


N0ZL3D - LKPIO 
1 ‘DECK LKPIO 

SUBROUTINE LKPIO(J.N) 

•CALL VARSI 
•CALL BASE 
•CALL VARS2 

CALL OMPAST(I3,(J-I)^NKLP,n 
IF(N.EQ.I) CALL OMWASTI 13.Q.NKLP) 
IFIN.EQ.B) CALL OMRASTI I3.Q.NKLPI 
RETURN 
10 END 
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N0ZL30 - MUTMIX 
•DECK MUTMIX 

SUBROUT I ME MUTM I X ( L I . L2 ) 

•CALL BASE 
•CALL VARS I 

C0MM0N/VISC/TAS(32) ,UU(321 ,SN0R(32) ,TM0(32) , TMI (32) ,TUBMT(32I , 

I DSI32) ,U(32) ,V(32) ,W(32) ,E(32) ,RR(32) 

•CALL VARS2 

C TURBULENT KINEMATIC VISCOSITY FOR MIXING LAYER AND FULLY DEVELOPED 
C JET REGION 

C CALCULATE MAXIMUM VORTICITY AND VELOCITY EXTREMA 

TASMAX*I.E-5 
UMAX«UU(LI) 

UMIN*UU(LI) 

LMIN=LI+I 
DO I L=LMIN,L2 

IF(TASIL).GT.TASMAX) TASMAX*TAS(L) 

IF(UU(L) .GT.UMAX) UMAX=UU(L) 

IFIUU(L) .LT.UMIN) UMIN=UU(L) 

I CONTINUE 

C CALCULATE TURBULENT VISCOSITY 

DO 10 L=LI,L2 
IF(TASMAX) ‘♦,4,6 
4 TURMT(L)=0 
GO TO 10 

C MIXING LENGTH 

6 ELM I X=0 . 1 3^ ABS ( UMAX-UM I N ) / TASMAX 
C KINEMATIC VISCOSITY OVER RE 

TURMT(L)=(ELMIX^*2)^TAS(L) 

10 CONTINUE 
RETURN 
END 
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I ‘DECK miSPF 

SLBROUTINE MUTSPFC IW.LORK, J.KORL.SPFAC) 

•CALL BASE 
•CALL VARS I 
•CALL VARSE 

C COMPUTE EXPONENT SPFAC IN EXPONENTIAL DAMPING FACTOR FOR 
C BOUNDARY LAYER ON A WALL AT L(K)=LORK 

GO TO (10,E0),IW 
10 L=LORK 

10 K=KORL 

11 GO TO 30 

12 20 L=KORL 

13 K=LORK 

H 30 RM1=1./Q(L,1,K1 

15 XKE=.5^(Q(L,2,K)^^2+Q(L,3,K)^^2+Q(L,t,K1^^2)*RMl 

16 TT=GD^(Q(L,5,K)-XKEMRM1 

17 CALL VISCOF(TT.RMUE) 

18 SPFAC-SQRT(RE^Q(L,1,K1/RMUE1 

19 RETURN 

20 END 
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1 'DECK MUTUR 

? SUBROUTINE MUTUR (JJ) 

3 *CALl base 

4 'CALL VARSl 

5 'CALL RHSBCC 

6 COMMON/V1SC/TAS(32) ,UU(3E) ,SNOR(3E) ,TMO(3E) ,TMI (3E) ,TURMT(3?) , 

7 1 DSI3P) ,U(3ai ,V(3E) ,W(3a) ,E(32) ,RR(32> 

0 'CALL VARSa 

9 COMMON/AXISYM/LAXIS 

10 DATA IFIRST/0/ 

11 lFIRSr=inRST'l 

la c 

13 C CONTROL ROUTINE FOR TURBULENT VISCOSITY TURMU(L,6,K) 

It C 

15 J-JJ 

16 IFU.lT.JB) go to 3000 

17 00 2500 IW=1 ,a 

IB IRKPLANE.EQ. 1 .AND, IW.EQ.ai GO 10 2500 

19 IFILAXIS.EQ. I .AND. KPLANE.EQ.O. AND. IW.EQ.ai GO TO 2500 

20 CALL SW 

21 DO 2000 K=KLORLL,KUORLU 

22 10 DO 20 L»LLORKl.,LUORKU 

23 GO TO ( I ,21 , IW 

as 1 LORK=L 

25 KORL =K 

26 C ETA METRICS 

27 CALL YYM(J,L .K,KI 

28 E(L1 = I ./SQRTiYYfK, I i "2+YY(K,2) •'2+YY(K,3l"2) 

29 GO TO 3 

30 a LORK=K 

31 KORL'L 

32 r ZETZ METRICS 

33 CALL ZZM(J,L,K,K) 

39 EILUl . /SQRTtZZCK, 1 1 "2+ZZ (K , 2) "2+ZZ (K, 31 "21 

35 C VELOCITY COMPONENTS, TOTAL VELOCITY, AND ELEMENTAL ARC 

36 C LENGTH ALONG LORK LINE 

37 3 RHOI^l ,/Q(LORK, I ,KORL.) 

38 U(L)=RHOI'Q(LORK,2,KORL) 

39 V(L)=RH0I*Q(L0RK,3,K0RL) 

90 W(LI‘'RH0I'Q(L0RK,9,K0RLI 

91 UU(L)=>SaRT(U(l.)''2+VtL)"2+W(L)"2l 

92 GO TO (6,7),IW 

93 6 CALL DLMET(J,K,L,X1,YI,ZI1 

99 GO TO 8 

95 7 CALL DKMEr(J,L,K,XI,YI,Zn 

96 e DSIL1=SQRTIX!"2+YI <«a'ZI "2) 

97 20 CONTINUE 

98 C VORTICITY COMPONENT NORMAL TO SURFACE ETA-CONSTANT OR ZETA-CONSTANT 

99 DO 999 L=LLORKL,LUORKU 

50 GO TO 131 ,321 , IW 

51 31 LORK-L 

52 KORL-K 

53 D2=,5'DZI 

59 GO TO 33 

55 32 LORK--K 

56 KORL -L 

57 D2=,5/DYI 

58 C XI METRICS 

59 33 XJ=XXI(L,19,K) 

60 YJ-YXI (L , I5,K' 

6! ZJ-ZXI (L, I6,K) 

62 C DERIVATIVES OF VELOCITY COMPONENTS IN LORK DIRECTION 

63 LP=L'l 

69 LR-L-I 

65 C INTERMEDIATE WALL IN LORK DIRECTION 

66 IF(LORKW,LE.O,OR.L,LT,LORKW,OR,L,GT,LORKW+I,OR,J GT.JLKWIGO TO 100 

67 IF(KORLW.GT.O,AND.K,GT,KORLW) GO TO 100 

68 IF(L.EQ.LORKW) GO TO 700 

69 IF(L,EQ,LORKW+l 1 GO TO 500 

70 100 IF(L .NE. 1 ) GO TO 600 

71 !FtLAXIS,NE. I I GO TO 150 

72 rjLI=Q . 

73 DV-VILP.-VU, ) 

79 OW=W(LPl-W,l.) 

75 GO TO 310 

76 1 50 CONT I NUE 

77 C TEST FOR INTERMEDIATE WALL NORMAL TO L=1 SURFACE 

78 IFIKORLW) 200,200,900 

79 C TEST FOR WALL AT L= I 

80 200 1F(JLKIWL.LE.J.AN0,J LE.JLKIWU; GO TO 500 

Bl C SYMMETRY 

8? 300 OU=0,0 

83 IF( IW.EQ,21 GO TO 310 

89 DV--0 , 0 

85 DW=W(LP'-W(L I 

86 GO TO 910 
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07 310 DV=V(LP)-V(L) 

08 DW=0. 

09 GO TO 910 

90 C TEST FOR WALL AT L=1 

91 HOO IF(K-K0RLW1 200,000,300 

92 C FORWARD DIFFERENCE 

93 500 LR=L 

O'* FAC=2.0 

95 GO TO 900 

96 600 IF(L.NE.LORKMX) GO TO 800 

97 lF(LKMX0C.LT.3.OR.LKMX0C.GT.‘t) GO TO 700 

90 C SYMMETRY 

99 DU-0.0 

100 DV-0.0 

101 DW-0.0 

102 LR=LR 

103 IFlLKMXBC.EQ.m DW=W(L1-W(LR) 

10‘t 1F(LKMXBC.EQ.3) DV-V(L)-V(LRI 

105 GO TO 910 

106 C 0ACKWARD DIFFERENCE 

107 700 LP-L 

108 FAC-2.0 

109 GO TO 900 

no C CENTRAL DIFFERENCE 
111 800 FAC-1.0 

IIP 900 LR-LR 

113 LP-LP 

IH 0U=(U(LP1-U(LR1)*D2«FAC 

115 DV=(V(LP)-V(LRn»D2*FAC 

116 DW=(W(LP)-W(LRI)*D2«FAC 

117 910 CONTINUE 

118 C VORTICITY COMPONENT 

119 TAS(LI=ABS(XJ»OUtYU«OV«ZJ*OWHE(L) 

120 999 CONTINUE 

121 C COMPUTE TURBULENT KINEMATIC VISCOSITY OVER RE,TURMT(L), ALONG THE 

122 C CURRENT LORK LINE AND STORE TElff>ORARILY IN S(KL,IW,J) 

123 C 

12‘t C CONFIGURATIONS WITHOUT INTERMEDIATE WALLS (PURE EXTERNAL OR PURE 

125 C INTERNAL FLOWl 

126 IF(KW.GT.O .OR. LW.GT.O) GO TO 1200 

127 C UPPER WALL PRESENT? 

128 IF(LKMXBC-11 1000,1020,1000 

129 C NO UPPER WALL 

130 1000 L2-L0RKMX 

131 Ll»l 

132 C L01€R wall PRESENT? 

133 IF(LK1BC*JLK1WU) 9000,9000,1001 

13't C LOWER WALL OR ITS WAKE 

135 1001 IF(J-JLKIWU) 1002,1002,8000 

136 1002 IF(J.LT.JLKIWL) GO TO 9000 

137 C 

138 C WALL BOUNDARY LAYER 

139 C 

mo 7000 CALL MUTSPFC IW.Ll ,J,K,SPFAC1 

141 CALL MUTWWKtLl ,L2, 1 ,SPFAC) 

142 GO TO 1990 

143 C 

144 C WAKE OF A WALL 

145 C 

146 8000 CALL MUTWWKCLl ,L2, 0,0,0) 

147 GO TO 1990 

140 C 

149 C NO WALLS, WAKES, OR MIXING LAYERS 

150 C 

151 9000 DO 9100 L-Ll ,L2 

152 9100 TURMT(L)=0.0 

153 GO TO 1990 

154 C 

155 C 

156 C 

157 C UPPER WALL IS PRESENT 

158 1020 Ll-LORKMX 

159 C LOWER WALL PRESENT? 

160 IF(LK1BC«JLK1WU) 1025,1025,1030 

161 C UPPER WALL BOUNDARY LAYER SPANS ALL LORK 

162 1025 L2-1 

163 GO TO 7000 

164 C BOTH UPPER AND LOWER WALLS ARE PRESENT 

165 1030 IFIJ.LT. JLKIWL) GO TO 1025 

166 C *'• THE VARIABLE LEDGE DEFINES THE COMPUTATIONAL SUBDOMAIN 

167 C 1 .LE.L0RK.lt. LEDGE THAT IS SPANNED BY THE LOWER WALL B.L. 

168 C OR WAKE AND THE SUBDOMAIN LEDGE. LE. LORK. LE.LORKMX 

169 C •*' THAT IS SPANNED BY THE UPPER WALL B.L. LEDGE IS CURRENTLY 

170 C *'« TAKEN AT THE POINT OF MAXIMUM TOTAL VELOCITY 

171 UMAX-0. 

172 DO 1040 L=1,L0RKMX 

173 inUUd, l.Ll.UMAX) GO TO 1040 
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n** UMAX»UU(L) 

175 LEOGE-L 

176 10‘fO CONTINUE 

177 C UPPER HALL B.L. 

178 L2«LEDGE 

179 CALL MUTSPFdH.Ll.J.K.SPFACI 

180 CALL MUTHM<(L1.L8,1.SPFAC) 

181 C LONER HALL B.L. OR HAKE 

182 Ll«l 

183 L2»LE0G£-1 

184 IF(J-JLKIHU) 7000,7000.8000 

185 C ••• LOGIC FOR FULL 30 NOZZLE CONFIGURATION 

1B6 C ••• THAT HAS INTERICDIATE HALLS AND SIDE PLATES LORKH.OT.O 

187 1200 CONTINUE 

188 C DEFINE THE TaERANCE EPSHAK TO DISTINGUISH HAKES 

189 C FROM MIXING LAYERS. IF THE MAXIMUM VELXITY DEFECT VMIN-VMAX 

190 C IN A PROFILE SATISFIES VMIN.LT.EPSHAK*VMAX. HE HAVE 

191 C A HAKE. OTHERWISE, WE HAVE A MIXING LAYER 

192 EPSWAK=0.9 

193 C IS A SIDEWALL/SIDEPLATE PRESENT? 

194 IF(KORLW) 1300,1300,1210 

195 C SIDEWALL/SIDEPLATE PRESENT 

196 1210 IF(K-KORLW) 1300,1220,1225 

197 1225 IF(K-(KORLW+l 1)1220, 1220, 1230 

198 C REGION OUTSIDE SIDEWALL/SIDEPLATE 

199 C MIXING LAYER 

200 1230 CALL MUTMIXC I .LORKMX) 

201 GO TO 1990 

202 C IN PLANE OF SIDEWALL/SIDEPLATE K-KORLW.KORLW+1 

203 1220 IF(J-MAX0(JKLW,XKW)) 1250,1250.1235 

204 C REGION DOWNSTREAM OF ALL WALLS 

205 1235 UMIN^UUd) 

206 LMIN=1 

207 DO 1236 L«2.LORKMX 

208 IF(UU(L).GT,UMIN) GO TO 1236 

209 UMIN=UU(L) 

210 LMIN=L 

211 1236 CONTINUE 

212 C WAKE OR MIXING LAYER? TEST UMIN AGAINST UINF 

213 IF(UMIN-EPSWAK*UU(LORKMXn 1240,1230.1230 

214 C WAKE 

215 1240 CALL MUTWHKILMIN.LORKMX, 0,0,0) 

216 CALL MUTWWKCLMIN.l.O.O.O) 

217 GO TO 1990 

218 C REGION OF SIDEWALL/SIDEPLATE 

219 C BOUNDARY LAYER ON UPPER SURFACE OF WALL 

220 1250 CALL MUTSPFdW,LORKW+l , J.K.SPFAC) 

221 CALL MUTWWK(LORKW»l,LORKMX.l.SPFAC) 

222 C BOUNDARY LAYER OR VERTICAL WALL SURFACE BELOW L-LORKW 

223 IF(J-JKLW) 9000,9000,1260 

224 1260 CALL MUTSPFdW.LORKW, J.K.SPFAC) 

225 CALL MUTH*K(L0RKW,1,1,SPFAC) 

226 GO TO 1990 

227 C IN REGION BETWEEN SYMMETRY PLANE K=1 AND SIDEWALL/SIDEPLATE K-KORLW 

22B C LOWER WALL PRESENT AT L«1 ? 

229 1300 IF(XKIWU) 1310,1310.1500 

230 C NO LOWER WALL 

231 1310 IF(J.GT.XKW) GO TO 1400 

232 C BOUNDARY LAYER ON LOWER SURFACE LORKW OF INTERMEDIATE WALL 

233 CALL MUTSPF dW, LORKW, J.K.SPF AC) 

234 CALL MUTWHKILORKW, 1 , 1 .SPFAO 

235 C BOUNDARY LAYER ON UPPER SURFACE OF INTERMEDIATE WALL 

236 CALL MUTSPFdW.LORKW+1 ,J,K,SPFAC) 

237 CALL MUTWM<(L0RKW+1,L0BKMX,1,SPFAC) 

238 GO TO 1990 

239 C INTERMEDIATE WALL WAKE OR MIXING LAYER 

240 1400 UMIN>UUd) 

241 LMIN-1 

242 UMAX«UUd) 

243 DO 1401 L-2.L0RKMX 

244 IF(UUIL) .GT.UMIN) GO TO 1401 

245 UMIN-UU(L) 

246 LMIN^L 

247 1401 CONTINUE 

248 UMAX-AMINl(UUd),UU(LORKMX)l 

249 C WAKE OR MIXING LAYER? 

250 IFIUMIN-EPSWAK'UMAX) 1410,1410.1230 

251 C WAKE - IF BROAD ENOUGH 

252 1410 IFdLMIN.LE.3).0R.(LMIN.GE.(LMAX-2))) GO TO 1230 

253 C INTERMEDIATE WALL WAKE CENTERED AT LMIN 

254 CALL MUTWHKlLMIN.l.O.O.O) 

255 CALL MUTWHKILMIN.LORKMX, 0,0.0) 

256 GO TO 1990 

257 1500 CONTINUE 

258 C LOWER WALL PRESENT AT L=1 

259 1F(J.GT.MAX0(JLKW,JLK1WU) ) GO TO 1700 

260 C REGION CONTAINING WALLS 
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N0ZL3D - MUTUR 

861 


IFCJLKW-JLKIWUI 1580,1520,1510 

862 

151C 

1 1«ITE(6,1515) 

863 


PRINT 1515 

86H 

1515 FORMAT! 8X,45H«« ••‘ERROR FLAG IN SUBROUTINE MUTUR •••• 

865 


A/8X.58H‘“”INA0M1SS1BLE INPUT ••••• 

866 


1/8X,58H“TH1S SUBROUTINE IS NOT PRESENTLY COOED TO COMPUTE 

867 


8/8X,5BH“THE TURBULENT VISCOSITY TURMU FOR PLUGGED NOZZLES 

868 


3/8X,58H“WHERE THE CENTRAL PLUG AT L(K)«1 IS SHORTER THAN THE 

269 


4/8X,58H‘ ‘UPPER NOZZLE WALL AT L(K)»LW(KW), THE CURRENT 

270 


5/ex,58H«L0GlC REQUIRES XIWU ,GE, JLW WHEN BOTH ARE POSITIVE 

871 


6/8X,58H“AND NON-ZERO, ADDITIONAL LOGIC WOULD BE REQUIRED 

878 


7/8X,58H“AFTER STATEMENT 1510 TO HANDLE THE REGION 

873 


9/8X,58H“.0.LE.JLIWU,LE.J.LE.XW. 

87>t 


9/8X,3H‘“ 1 

875 


STOP 

276 

isao 

1 IF(J.GT.JLKW) GO TO 1600 

877 

c 

REGION J UPSTREAM OF INTERMEDIATE WALL TRAILING EDGE 

878 

c 

BOUNDARY LAYER ON OUTER SURFACE OF INTERMEDIATE WALL 

879 


CALL MUTSPF(IW,LORKW+l,J,K,SPFAC) 

280 


CALL MUTWM<(LORKW+l ,LORKMX, 1 ,SPFAC) 

281 

c 

BOUNDARY LAYERS INSIDE NOZZLE 

888 


Ll=LORKW 

883 


L8»l 

88't 

c 

BOUNDARY LAYER ON UPPER WALL AHEAD OF PLUG 

285 


IF(J.LT.JLKIWL) GO TO 7000 

286 

c 

BOUNDARY LAYERS ON UPPER WALL AND ON LOWER WALL (PLUG) 

287 


UMAX»UU(1) 

888 


LEDGE* 1 

889 


DO 1530 L*8,LORKW 

890 


IF(UU(L) .LT.UMAX) GO TO 1530 

291 


UMAX*UU(L) 

898 


LEOGE=L 

893 

1530 

CONTINUE 

294 

c 

UPPER WALL B.L. 

895 


L8=LEDGE 

896 

o 

to 

CALL MUTSPF(IW,L1,J,K,SPFAC) 

897 


CALL MUTWWK(L1,L8,1,SPFAC) 

898 


IF(Ll.EQ.l) GO TO 1990 

899 

C 

B.L. ON LOWER WALL (PLUG) 

300 


Ll»l 

301 


GO TO 1540 

308 

1600 

CONTINUE 

303 

C 

SUBREGION BEHIND UPPER NOZZLE WALL AND ABOVE LOWER WALL (PLUG) 

304 


UMAX=UU(1) 

305 


LEDGE* 1 

306 


DO 1610 L=2,L0RKMX 

307 


IF(UU(L). LT.UMAX) GO TO 1610 

308 


UMAX*UU(L) 

309 


LEDGE*L 

310 

1610 

CONTINUE 

311 

C B.L. OVER LOWER WALL (PLUG) 

318 


Ll«l 

313 


CALL MUTSPF(IW.L1,J,K,SPFAC) 

314 


CALL MUTWWK( LI. LEDGE, l.SPFAC) 

315 

c 

UPPER WALL WAKE OR MIXING LAYER OUTSIDE PLUG B.L. 

316 


UMIN*UU(LEDGE) 

317 


LMIN-LEO(^ 

318 


LEDGE-LEDGE+1 

319 


DO 1680 L»LEDCE,LORKMX 

380 


IF(UU(L).GT.UMIN) GO TO 1680 

381 


UMIN*UU(L) 

388 


LMIN-L 

383 

1620 

CONTINUE 

384 

C 

WAKE OR MIXING LAYER? 

385 


IF(UMIN-EPSWAK‘AMINI (UMAX.UU(LORKMX) ) ) 1630,1640, 1640 

386 

C 

UPPER WALL WAKE CENTERED AT LMIN 

387 

1630 

CALL MUTWWKILMIN, LEDGE, 0,0.0) 

388 


CALL MUTWWKILMIN, LORKMX, 0,0.0) 

389 


GO TO 1990 

330 

C 

MIXING LAYER 

331 

1640 

CALL MUTMIX(LEDGE,LORKMX) 

338 


GO TO 1990 

„ 333 

1700 

CONTINUE 

334 

C 

REGION DOWNSTREAM OF ALL WALLS 

335 


UMAX*UU(1) 

336 


LEDGE* 1 

337 


DO 1710 L»2,L0RKMX 

338 


IF(UU(L) .LT.UMAX) GO TO 1710 

. 339 


UMAX*UU(L) 

340 


LEDGE-L 

341 

1710 

CONTINUE 

348 


IF (LEDGE-3) 1720,1720,1730 

343 

1780 

LEDGE- 1 

344 


UMAX-UU( 1 ) 

345 


GO TO 1800 

346 

1730 

IF(LEDGE.GE.L0RKMX-8) GO TO 1830 

347 

C 

REGION 1 .LE.L.LE. LEDGE. TEST FOR LOWER WALL (PLUG) WAKE. 

1 
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31+8 

3't9 

350 

351 
358 

353 

354 

355 

356 

357 

358 

359 

360 

361 
36? 

363 

364 

365 

366 

367 

368 

369 

370 

371 
37? 

373 

374 

375 

376 

377 

378 

379 

380 

381 
38? 

383 

384 

385 

386 

387 

388 

389 

390 

391 
39? 

393 

394 

395 

396 

397 

398 

399 

400 

401 


N0ZL3D - MUrm 

1 F ( UU ( 1) -EPSWAK«UMAX 1 1740, 1 750 , 1 750 
C WAKE OF LOWER WALL (PLUG) 

1740 CALL MUTWWKd, LEDGE, 0,0.0) 

GO TO 1800 

C MIXING LAYER IN LOWER REGION 
1750 CALL MUTMIXCl , LEDGE) 

1800 CONTINUE 

C UPPER REGION L.GT. LEDGE. LOOK FOR WAKE OF UPPER NOZZLE WALL. 
UMIN=UUILEDGE) 

LMIN<EDGE 

LEDGE=LEDGE+1 

DO 1810 L=LEDGE,LORKMX 

IFIUU(L) .GT.UMIN) GO TO 1810 

UMIN=UU(L) 

LMIN=L 

1810 CONTINUE 

C WAKE OR MIXING LAYER? 

IF(LMIN.GT.LEDGE+?1 GO TO 1830 
C MIXING LAYER 
18?0 CALL MUTMIXILEDGE.LORKMX) 

GO TO 1990 

1830 IF(UMIN.GE.EPSWAK*AMIN1 (UMAX.UU(LORKMX) ) ) GO TO 18?0 
C UPPER WALL WAKE CENTERED ABOUT LMIN 
CALL MUTWWKI LMIN, LEDGE, 0,0.) 

CALL MUTWWK ( LM I N , LORKMX , 0 , 0 . ) 

GO TO 1990 

C LOAD KINEMATIC VISCOSITY OVER RE TEMPORARILY IN S(KL,IW,1) 

1990 DO 1999 L=LLORKL , LUORKU 
GO TO (1991, 199?), IW 

1991 LORK=L 
KORL»K 

GO TO 1993 
199? LORK=K 
KORL=L 

1993 S(LORK, IW+8,K0RL)=TURMT(L) 

1999 CONTINUE 
?000 CONTINUE 
?500 CONTINUE 

C COMBINE INDIVIDUAL VISCOSITY COEFFICIENTS FOR THE K AND L DIRECTIONS 
IF(KPLANE) ?300,?300,?100 
?100 DO 8800 L-LL.LU 
DO 8800 K=KAL,KU 

TURMU(L,6,K)»RE*Q(L,1,K)*S(L,9,K) 

8800 CONTINUE 
GO TO 3000 

8300 IF(LAXIS.EQ. 1) GO TO ?100 
DO 8400 L=LL,LU 
DO ?400 K=KAL,KU 

TURMU(L,6,K)=RE*Q(L, 1 ,K)*SQRriS(L,9,K)*<?+S(L, 10,K)»*?) 

?400 CONTINUE 
3000 CONTINUE 

C IF(IFIRST.EQ.l) CALL TURCHK 

RETURN 
END 
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N0ZL3D - MUTWNK 

1 *OECK MUTNWK 

2 SUBROUTINE HUTWWKdl ,L2, IWALL.SPFAC) 

3 ‘CALL BASE 

4 *CALL VARS I 

5 C0MM0N/VISC/TAS(32) ,UU(32) .SN0Ri32) ,TMO(32) ,TMl (32) ,TURHT(32) . 

6 I DS(32) ,U(32) ,V(32) ,W(32) ,E(32) ,FF(32) 

7 ‘CALL VARS2 

8 DATA FK,AP.FKK,F27,FCWK.FCKLEB.FELMIX/0.4,26. . . 0 168. I .6 , . 5, . 3 , . 26/ 

9 C TURBULENT KINEMATIC VISCOSITY FOR WALL BOUNDARY LAYER (IWALL»I) 

10 C OR WAKE (IWALL=0) WHERE WALL (OR WAKE CENTER) IS AT L=Lt AND B.L. EDGE 

U C OR WAKE EDGE IS AT L«L2 

12 C ARC LENGTH SNOR, MAXIMUM VORTICITY, VELOCITY EXTREMA, AND 

13 C VORTICITY FUNCTION FF . 

14 RA=SPFAC«SQRT(TAS(L1 ) )/AP 

15 1DL==1 

16 1F(L1.GT.L2) 1DL«-1 

17 L=Ll 

18 12=1ABS(L2-L1 )+l 

19 1M»I 

20 SNOR(1)=0. 

21 TASMAX=TAS(Ll ) 

22 C MAX VORTICITY AND ITS LOCATION 

23 ITASMX'l 

24 DO I 1=2,12 

25 L=L+IDL 

26 1F(TAS(L) .LE.TASMAX) GO TO 1 

27 TASMAX=TAS(L) 

28 ITASMX^l 

29 I CONTINUE 

30 C FIRST MINIMUM BEYOND THE ABSOLUTE VORTICITY MAX. DETERMINES 

31 C THE RANGE OF FF( I ) 

32 C TO AVOID SPURIOUS PEAKS OUTSIDE THE SENSIBLE BOUNDARY LAYER 

33 C OR WAKE REGION 

34 IFF » ITASMX 

35 L*Ll 

36 DO 2 1=2,12 

37 L-L+IDL 

38 1F( I .LE. ITASMX) GO TO 2 

39 IF(TAS(L) .LE.TAS(L-IDL)) GO TO 2 

40 1FF«1 

41 00 TO 3 

42 2 CONTINUE 

43 3 L=Ll 

44 UMAX=UU(Ll) 

45 UM1N=UU(L1) 

46 FF(1)»0. 

47 FFMAXsO. 

48 SNMAX«.5MDS(Ll)+0S(LH-IDLn 

49 DO 5 1«2.12 

50 L=L+1DL 

51 SNOR( n«SN0R(l-n + .5MDS(L)+DS{L-IDL) ) 

52 5 CONTINUE 

53 L=L1 

54 DO 10 1=2,12 

55 L=L+1DL 

56 1F(UU(L) .GT.UMAX) UMAX=UU(L) 

57 1F(UU(L) .LT.UMIN) UMIN=UU(L) 

58 El=RA*SNOR( I ) 

59 IF(E1 .GT.50) El=50 

60 FF(1 )=SNOR(I)*TAS(L)^( 1 . - 1 WALL^EXP( -E 1 ) ) 

61 IF( 1 .GT. IFF) GO TO 10 

62 IF(FF( I ) .LT.FFMAX) GO TO 9 

63 IM=I 

64 FFMAX=FF(I) 

65 SNMAX=SNOR( 1 ) 

66 GO TO 10 

67 9 1F( IM.EQ. 1 ) GO TO 10 

68 IF(lWALL.NE.l) GO TO 10 

69 C FOR WALL BOUNDARY LAYER STOP WITH FIRST MAXIMUM FOUND 

70 C 

71 IF(FF( 1 ) .'.E.FFMAX) GO TO 15 

72 10 CONTINUE 

73 15 CONTINUE 

74 C INTERPOLATE FOR MAXIMUM POINT OF FF 

75 IFdM.EQ.l .OR. IM.EQ. 12) GO TO 20 

76 IMP=1M+1 

77 1MM=1M-1 

78 BM=.5MFF(IMP)-FF(1MM)) 

79 AM=BM-FF(IM) 

80 1F(AM.EQ.0. ) GO TO 20 

81 DIM=.5«0M/AM 

82 1F(ABS(D1M).GE.1) GO TO 20 

83 IF(AM.GE.0.) GO TO 20 

84 FFMAX*FF(1M)“.5MBM*<»2)/AM 

85 BM=.5MSN0R(1MP)-SN0R(IMM)) 

86 AM=BM-SNOR(IM) 
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N0ZL3D - MUTWWK 

87 SNMAX=SNOR U M ) -D I MM BM-0 1 M^ AM ) 

88 80 CONTINUE 

89 C OUTER VISCOSITY 

90 UDIFF=ABS(UMAX-UM1N) 

91 FWAK=SNMAX*FFMAX 

92 I F ( FFMAX . GT . FCNK^UD I FF ) FWAK=SNMAX« f ( FCWK*UD I FF) « <2) /FFMAX 

93 00 30 1=1.12 

9H F1A=FCKLEB«SN0R( D/SNMAX 

95 IF(FIA.0T. I .E5) F1A=1.E5 

96 TM0( 1 )=FKK«F27*FWAK/ ( I • •^5.5•F I A^ *6) 

97 30 CONTINUE 

98 C INNER VISCOSITY 

99 L=L1-IDL 

100 IF(IWALL.EQ.O) GO TO 50 

tOl C WALL BOUNDARY LAYER 

102 00 40 I = l . 12 

103 L=L^-10L 

104 El=RA«SNOR( I ) 

105 IF(E1 .GT.50) El=50 

106 TMl ( n=TAS(L)MFK*SNOR( I )M 1 . -EXP ( -El) ) )*^2 

107 40 CONTINUE 

108 GO TO 70 

109 C WAKE 

no 50 DO 60 1 = 1,12 

m L=L+IDL 

U2 IF(TASMAX) 52.52,54 

1 13 52 TMI ( I )=0. 

114 GO TO 60 

115 54 TMI ( n=TAS(L)MFELMlX*UDlFF/TASMAX)*^8 

1 16 60 CONTINUE 

117 C LOAD VISCOSITIES INTO ARRAY, USING INNER VALUE UNTIL MATCH POINT IS 

118 C REACHED 

119 70 I«l 

120 L<1 

121 80 TURMT(L)=TM1 ( I ) 

122 I=ltl 

123 L»L+IDL 

124 IFd.GT.IB) GO TO 90 

125 IFlTMKD.LE.TMOnn GO TO 80 

126 81 TURMT(L)»TMO( 1) 

127 l»l+l 

128 L«L+1DL 

129 IF(l.LE.ie) GO TO Bl 

130 C THE TURMT ARRAY CONTAINS THE KINEMATIC VISCOSITY OVER RE 

131 90 RETURN 

132 END 
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1 

a 

3 

>♦ 

5 

6 

7 

8 
g 

10 

It 

la 

13 

lit 

15 

16 

17 

18 


NOZL3D - NEWDT 
‘DECK NEWDT 

SUBROUTINE NEWOTIDQOQMX, IDTSW) 

•CALL BASE 

DATA RESlDS/0.0/ 
lDTSW-0 

IF(lONCAL.EQ.l) IGNCAL * 8 

NK«s|^+l 

IF (ABS(DQOQMX).OT. ONEGA) GO TO 100 
IF(DTFAC.EQ.l) GO TO 100 
DTF=DTMAX/DT 

1 F ( DTFAC . GT . DTF ) DTFAC-DTF 
1F(ABS(DTFAC-1.0) ,LT.1.E-T) DTFAC-1.0 
IF(DTFAC.NE.l.O) 1DTSW«1 
CN8R-0.0 
1GNCAL=IGNCAL+1 
100 CONTINUE 
RETURN 
END 
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N0ZL3D - N0ZL30 
1 'DECK N0ZL3O 

a PROGRAM NOZLSDUNPUT, OUTPUT, TAPES-INPUT.TAPEe-OUTPUT.TAPEa.TAPEit. 

3 1 TAPE3.TAPE15) 

“t 'CALL BASE 

5 C 

6 C 3-D IMPLICIT NAVIER-STOKES SOLVER FOR FULL NOZZLE GEOMETRY 

7 C 

B CALL INITIA 

9 CALL GLOINT 

10 IDTSW«0 

11 DO 100 NSTEP=I.NMAX 

I a NC=NSTEP+NCI 

13 CALL STEPIDQOQMX, IDTSW) 

m CALL GLOINT 

15 CALL NEWDTIDQOQMX.IDTSWl 

16 IF(MOO(NSTEP,NROUT) .NE.O .OR. NSTEP.EQ.NMAX) GO TO 100 

17 CALL OUTALLiai 
IB 100 CONTINUE 

19 CALL OUTALL(-l) 

ao STOP 

ai END 
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1 

3 

3 

4 

5 

6 

7 

8 
9 

10 

11 

la 

13 

19 

15 

16 

17 

18 
19 
ao 
ai 
33 
3Z 
39 
35 
as 

37 

38 

39 

30 

31 
33 
33 
39 

35 

36 

37 

38 

39 

90 

91 
93 
93 
99 

95 

96 

97 

98 

99 
50 
St 
53 
53 
59 

55 

56 

57 

58 

59 

60 
61 
63 
63 
69 

65 

66 


N0ZL30 - OUTALL 
•DECK OUTALL 

SUBROUTINE OUTALL (NCOOT) 

•CALL BASE 
•CALL VARSl 
•CALL VARS3 

COMMON/AX 1 SYM/LAX I S 
NPRINT"! 

IRNCOUT.EQ.NRST .AND. IWRIT.EQ.O) NPRlNT-0 
lGLOB-0 

IF(NCOUT.LT.O) 16L0B=l 
C , 

c 

C WRITE ON UNIT 9 AND 6 
C 

WRITE(9) NC.TAU.DT.NK 
IF (NPRINT. EQ.O) GO TO 15 
KK*KU 

IF(UXIS.EQ.l) KK*1 
WRITE (6,10)NC.TAU,DT 

10 FORMAT! 1H!,5X.58HN0ZZLE FLOW FIELD AS WRITTEN TO RESTART FILE AT S 
ITEP,I5,9H TIME ».F10.5.5X,5H DT«,Ft0.5//) 

15 CONTINUE 

DO ‘fS J»l,JMAX 
CALL LKPI0(J,8) 

DOaOL*l,LMAX 

CALL DJMET(J,L,XX(J, 1) .XX(J,2) ,XX(J,3) ) 

DO 20 K-I.KMAX 
Q6(L,K)=Q(L,15,K) 

XXUL.l^t.Kl^XXIJ.n 

YXI(L.I5,K)«XX(J,2) 

ZXI(L.16.K)=XX(J,3) 

C DISCARD TURMU AND PUT X IN ITS PLACE FOR OUTPUT TO RESTART UNIT 
Q(L,6,K)-X(J) 

20 CONTINUE 

IFdOLOB.EQ.l.AND.KPLANE.EQ.n CALL GLOBAL! J) 

IF (NPRINT. EQ.O) GO TO 40 

D035K=1,KK 

WRITE (6,25)J,K 

25 FORMAT!IH0.2X.2HJ»,13,2X,2HK=.I3.2X,IHL,6X,1HX,!1X,1HY,11X.1HZ 
1 . 6X , 6HR/ RREF , 5X . 6HU/ AREF , 5X , 6HV / AREF , 5X , 6HW/ AREF , 5X . 6HT/ TREF , 

I 5X.6HP/PREF,5X,3HENT) 

DO 35 L*l,LMAX 
R « Q(L,I,K) 

RR » l./R 
U » Q!L.2,K)«RR 
V * Q(L,3.K)*RR 
W « Q!L,‘f,K)«RR 
E = Q!L.5.K) 

S2*0.0 

IF(ABS!U).GT.1.0E-17) S2»S2+U**2 
IF!ABS!V) .GT. 1 .OE'17) S2«S2+V**2 
IF!ABS!W).GT.l.0E-!7) S2=S2+W*«2 
PP » G0*!E-.5*R«S2) 

TT=PP«RR 

ENT * PP/(ABS!R))**GAMMA 

WRITE (6,30)L,X!J) ,Y(L.7,K) ,Z!L,6,K) ,R,U,V,W.TT.PP.ENT 
30 FORMAT! IH . mX,I3. lOFl 1 .6) 

35 CONTINUE 
HO CONTINUE 

WRITE!H) ! ( (Q!L,N,K) ,L«l ,LMAX) ,N«l ,0) .K-l ,KMAX) 

H5 CONTINUE 

IFCIGLOB.EQ.l.AND.KPLANE.EQ.n CALL GLOANT 
WRITE !6.50) 

50 FORMAT! IHl) 

RETURN 

END 
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N0ZL3D - PRECAL 
I ‘DECK PRECAL 
S SUBROUTINE PRECAL U) 

3 ‘CALL BASE 

4 ‘CALL VARSl 

5 *CALL VARS2 

6 C PUT RHS «. SMOOTHING TERM FOR K t L INTO S FOR NEST STEP 

7 IF(LAMIN.EQ.Q) CALL MUTURUI 

8 CALL RHS(J) 

9 CALL SMOOTH(J) 

10 C PUT OXIDX.DXIDY.DXIDZ INTO Q ARRAY FOR NEXT STEP 

11 DO 1 00 L=1 ,LMAX 

1? CALL XXMIL.J, 1 ,KMAX) 

13 DO 100 K=I ,KMAX 

IH DXI0X(L,I4,K)=XX(K,1) 

15 DXIDY(L,15,KI=XX(K,2> 

16 DXIDZIL , 16,K1=XX(K,3) 

17 100 CONTINUE 

18 IFIJ.NE.E) RETURN 

19 C SET UP FOR SHOCK 

BO XLSKM2=0. 

81 ZLSKM8=Z(LMAX'1,8,KM) 

88 XLS88>0. 

83 ZLS88=Z(LMAX-1 ,a,KL8l 

8** RETURN 

85 END 
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N0ZL3D - QDRIR 
1 ‘DECK QDRTR 

S SUBROUTINE QDRTRIENrCRL.ENTGRD.OLT.IL.IU) 

3 DIMENSION ENTGROd) 

‘t C 1-0 TRAPEZOIDAL QUADRATURE. COMPUTES DEFINITE INTEGRAL .ENTGRL , 

5 C OF INTEGRAND, ENTGRDII), BETWEEN LIMITS IL.IU. 

6 C 

7 ENTGRL=0.5*tENTGRD(IL)+ENTGRD(IUM 

8 IFUIU-ILl.LT.e) RETURN 

9 1LP=IL+1 

10 IUM=IU-1 

11 DO I I = ILP,IUM 

18 1 ENTGRL =ENTGRL+ENTGROI It 

13 ENTGRL =ENTGRL*DLT 

1‘f RETURN 

1 5 END 
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N0ZL3D - RHS 


1 

‘DECK 

RHS 


a 



SUBROUTINE RHS(J) 


3 

•CALL 

BASE 


H 

•CALL 

VARSl 


5 

•CALL 

BTRIO 


6 

•CALL 

VARS8 


7 



RO = -HDZ 


e 



LV«=LWtl 


9 



KWR=KW+ 1 


10 



IF(KW.LE.O) KWR-KMAX+I 


1 1 



1NTWAL=0 


1? 



IRLW.GT. 1 .AND. J.LE.JLW) INTWAL=l 


13 



DO 55 K=KAL,KU 


IM- 



IF(K.GE.KWR) INTWAL“0 


IS 



CALL. 2ZM(J,K. 1 .LMAX) 


16 



DO 15 L=1 ,LMAX 


17 



CALL FLUXVE(K.L.ZZ(L. 1 ) , ZZ (L ,8) .ZZ(L , 3) , ZZ(L .HI) 

18 



DO 1 0 N= 1 , 5 


19 


to 

C(L ,N, 1 1 =■ FV(N) 


80 


15 

CONTINUE 


81 



iSYMIN^O 


88 



!SYMAX=0 


83 

C 


TEST FOR symmetry AT LMAX 


8M 



I F ( LMAXBC . EG . 3 . OR 1 MAXBC . EQ , ^ ) i SYMAX-=LMAXBC 


85 

C 


TEST FOR WALL AT L=l 


86 



in IK.LT.KWR) .AND. ( JL 1 WL . LE . J. AND . J . LE . JL 1 WU) 1 

GO 

87 

c 


SYMMETRY 


88 


85 

ISYMIN^if 


89 


35 

IF ( INTWAL.EQ.O) GO TO 1+0 


30 



CALL DIFFERIRO.I.LW.ISYMIN.O) 


31 



CALL D I FFER ( RO , LWR , LMAX , 0 , I SYMAX ) 


38 



GO TO 


33 


HO 

CALL DIFFERIRO, 1 .LMAX, ISYMIN, ISYMAX) 


3M 


H5 

CONTINUE 


35 

c 


ZTM =ZZ(I,'t)/Q6(1.KI 


36 

c 


ZT = ZZ(2,‘t)/Q6(e,K) 


37 



DO 55 L=LL,LU 


38 

c 


ZTP = ZZIL+1 ,4)/Q6(L-M ,K) 


39 

c 


DDV = R0*IZTP - ZTMl 


HO 



DDV=0.0 


HI 



DO 50 N-I ,5 


H8 


50 

S(L,N+B.K) = F(L,N1 - DDV'QIL ,N,K) *Q6(L ,K) 


H3 

c 


ZTM = ZT 


HH 

c 


ZT = ZTP 


H5 


55 

CONTINUE 


H6 



IF (KPLANE.EQ.n GO TO IIO 


H7 



RO • -HDY 


H8 



LWR=LW+I 


H9 



KWR=KW+ 1 


50 



IFILW.LE.OI LWR=LMAX+1 


51 



INTWAL-0 


58 



IFIKW.GT. I.AND. J.LE.JKW) INTWAL=1 


53 



DO 105 L=LL,LU 


5H 



IFCL.GE.LWR) INTWAL=0 


55 



CALL YYMU.L, 1 ,KMAX) 


56 



DO 65 K-l ,KMAX 


57 



CALL FLUXVEIK.L.YYIK, 1 ) ,YY(K,2) ,YY(K,3) ,YY(K,‘H 

50 



DO 60 N«l,5 


59 


60 

C(K,N. 1 ) = FV(N) 


60 


65 

CONTINUE 


61 



ISYMIN=0 


68 



ISYMAX=0 


63 

c 


TEST FOR SYMMETRY AT KMAX 


6H 



I F ( KMAXBC . EQ . 3 . OR . KMAXBC . EQ . H ) I S YMAX=KMAXBC 


65 

c 


TEST FOR WALL AT K=1 


66 



IFHL .LT.LWR) .AND. ( JKt WL . LE . J . AND. J. LE . JKl WU) ) 

GO 

67 

c 


SYMMETRY 


68 


75 

ISYMIN=3 


69 


85 

IF (INTWAL.EQ.O) GO TO 90 


70 



CALL DIFFERIRO, 1 ,KW, ISYMIN, 0) 


71 



CALL D I FFER ( RO . KWR , KMAX ,0,1 SYMAX ) 


78 



GO TO 95 


73 


go 

CALL D1FFER(R0, 1 .KMAX, ISYMIN. ISYMAX) 


7H 


95 

DO 100 N=1 ,5 


75 



DO 100 K=KAL,KU 


76 


too 

S(L,N+8,K) = F(K.N)+S(L ,N+8,K) 


77 


105 

CONTINUE 


70 


110 

CONTINUE 


79 



IF(INVISC.NE.O) RETURN 


80 

c 


VISCOUS RIGHT HAND SIDE 


81 

c 


VISCOUS TERMS FOR L DIRECTION 


08 



IFtLVlS.EQ. 1 ) CALL DZZDYY(1,J) 


83 



IFtKPLANE.EQ. 1 ) RETURN 


0H 

c 


VISCOUS TERMS FOR K DIRECTION 


05 



IF(KV!S.EQ. I ) CALL DZZDYY(8.J) 


86 

c 


VISCOUS CROSS DERIVATIVES 



I 
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N0ZL3D - RHS 

87 

IF(KLVIS.EQ.O) RETURN 

ee 

CALL DZYDYZ(l,J) 

89 

CALL DZYDYZ(a.J) 

90. 

RETURN 

91 

END 
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N0ZL3D - RHSJ 

1 ‘DECK RHSJ 

e SUBROUTINE RHSJ(L) 

3 ‘CALL BASE 

4 ‘CALL VARSl 

5 ‘CALL BTRID 

6 ‘CALL VARSE 

7 RO = -HOX 

8 XXJ4-0.0 

9 DO 15 J=1,JHAX 

10 XXJI=DXIDX(L,14,J) 

11 XXJE«DXIDY(L,15,J) 

le XXJ3'DXIDZ(L.16,J) 

13 CALL FLUXVE(J,L,XXJ1,XXJ2,XXJ3,XXJ4) 

14 DO 10 N=l,5 

15 10 C(J,N,1) = FV(N) 

16 15 CONTINUE 

17 CALL DIFFERIRO, 1 .UMAX, 0,0) 

18 DO 20 J=JB,JMAX 

19 DO 20 N=1 ,5 

20 20 S(L,N+8,J) = F(J,N)+S(L,N+8,J) 

21 RETURN 

22 END 
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N0ZL3D - SHOCK 

1 ‘DECK SHOCK 

2 SUBROUTINE SHOCK 

3 "CALL BASE 
H ‘CALL VARSl 

5 ‘CALL SHOCKC 

6 ‘CALL VARSa 

7 C COMPUTE CARTESIAN VELOCITY COMPONTS OF SHOCK SURFACE GRID PTS L-LS 

0 SHKMT = 0. 

9 SHKMT = O.I 

10 LS*LMAX-1 

11 LSP * LMAX-V 

12 OJM2 • l./(JMAX-2) 

13 0X2*.5/DX1 

I"* DY2=.5/DY1 

15 DZ2».5/DZ1 

16 PI=H.0«ATAN(1.0) 

17 CS-COS(PI‘ALP/ieO.O) 

10 SS*SIN(P1«ALP/10O.O) 

19 GAMP«GAMMA+1 .0 

20 C SHOCK SPEEDS ON REGliAR ZETA LINES OF MESH 

21 L'LS 

22 DO 15 J = 2, UMAX 

23 JP*J+1 

2V JR-J-1 

25 PMT = (J-2)«0JM2 

26 DO 10 K-KAL.KU 

27 C SHOCK GRID POINT VELOCITY COMPONENTS 

20 QSZETA=0.0 

29 XL-0.0 

30 YL=0.0 

31 ZL=0,0 

32 AL » SQRT(XL”2 + YL«*2 ♦ ZL”2) 

33 QS(J.K) = QSZETA*AL 

3V OSZETA = QSZETA»SHKMT 

35 XST(J,K)=>QSZETA*XL 

36 YST(J,K)=QSZETA*YL 

37 ZSTU,K)=QSZETA*ZL 

30 10 CONTINUE 

39 IFIKPLANE.EQ. 1) GOTO 15 

VO C OSU.D “ QS(J,3) 

VI C QS(J.KMAX) = QS(J,KMAX-2) 

V2 C XST(J,1)-XST(J.31 

V3 C XST(J,KMAX)=XST(J,KMAX-2) 

VV C YSTIJ, 1 )=— YST(J,3) 

V5 C YST(J,KMAX)=-YST(J,KMAX-2) 

V6 C ZST(vl,l)-ZST(J,3) 

V7 C ZSTW,KMAX)*ZST(J.KMAX-2) 

V0 15 CONTINUE 

V9 C SHOCK SPEED ON SINGULAR ZETA LINE J = 1 

50 XJ - (XLSKM2-XLS22)*DX2 

51 ZJ » (ZLSKM2-XLS22)*DX2 

52 AN • SQRT(XJ‘*2 + ZJ«‘2) 

53 XN = -ZJ 

5V ZN • XJ 

55 QSN > 0. 

56 XSTO - QSN'SHKHT 

57 DO 1 K - l.KMAX 

56 QSd.K) • OSN 

59 XSTll.K) - XSTO 

60 XSTll.K) « 0. 

61 YSTll.K) - 0. 

62 1 ZSTll.K) • 0. 

63 MRITE13) NC.TAU.DT, 

6V 1 (1QS(J,K),J • 1,JMAX),K - l.KMAX) 

65 1 1 RETURN 

66 END 
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N0ZL30 - SMOOTH 
1 ‘DECK SMOOTH 

a SUBROUTINE SMOOTH(JJ) 

3 ‘CALL BASE 

4 ‘CALL VARSl 

5 ‘CALL VARS2 

6 COMMON/AXISYM/LAXIS 

7 DIMENSION C0M(5) 

8 C GLOBALLY FaLY CONSERVATIVE SMOOTHING 

9 

10 C ZETA(L) DIRECTION OR ETA(K) DIRECTION 

11 SM0-0.5‘SMU/(B.‘(3.0-FLOAT(KPLANE) n 

la DO 100 iH-i,a 

13 LORKH-LH 

14 KORLW-KW 

15 XKW-XW 

16 KLORLL-KAL 

17 KUORLU=KU 

18 LMORKM»LM 

19 KORLMX^KMAX 

aO LKMXBC^LMAXBC 

ai LKIBC'LIBC 

aa JLKIWL-JLIWL 

a3 JLK1WU«JL1WU 

a4 Li’»i 

as Ki»o 

as IF (IW.EQ.l) GO TO 10 

37 IF (KPLANE.EQ.l) GO TO 100 

as JLKW»JKW 

39 LORKH-KW 

30 KORLM<LH 

31 KLORLL=LL 

33 KUORLU="LU 

33 LMORKM=KM 

34 KORLMX=LMAX 

35 LKMXBC-KMAXBC 

36 LK1BC=K1BC 

37 JLK1WL=JK1WL 

38 XKIWU-JKIWU 

39 L1«0 

40 Kl-1 

41 10 CONTINUE 

4a J«JJ 

43 KLXP-KORLMX 

44 IF(KORLW.GT.O) KLXP«KORLW 

45 DO 95 KORL=KLORLL,KUORLU 

46 IF(LORKW) 11.11.13 

47 II Ma-1 

48 LKl=a 

49 LKa»LMORKM 

50 GO TO 15 

51 le IFIKORL.GT.KLXP.OR. J.GE. JLKW) GO TO U 

53 Ma»a 

53 LKl=a 

54 LKa-LORKW-l 

55 15 DO 95 M«1.M3 

56 IF (M-a) 35.30. as 

57 aO LKl-LORKW+a 

58 LK8-LM0RKM 

59 NSYML«0 

60 GO TO 30 

61 S5 NSYML'O 

6S C TEST FOR LOWER SYMMETRY PLANE 

63 IFILKlBC.EQ.l.AND. (J.LT. JLKIWL.OR, J.GT. JLKIWU.OR.KORL.GT.KLXP) ) 

64 1 NSYML=5-IM 

65 C TEST FOR UPPER SYMMETRY PLANE 

66 30 NSYMU-0 

67 IFILKS.EQ.LMORKM.AND. (LKMXBC.EQ.3.0R.LKMXBC.EQ.4)) NSYMU » LKMXBC 

68 DO 35 N-1.5 

69 35 CDM(N)-0.0 

70 SMl-0.0 

71 DO 40 L0RK=LK1.LK3 

73 L-LORK 

73 K-KORL 

74 IFUW.EQ.a) L-KORL 

75 IFdW.EO.ei K-LORK 

76 40 SM1-AMAXI(SM1.ABS((Q6(L+L1.K+K1)-Q6(L-L1.K-K1))/Q6(L.K))) 

77 SMl-SM0/(l.0+0.a5‘SMl) 

78 LKaM=LK3-l 

79 IF(LAXIS.NE.l) GO TO 41 

80 IFILKI.EQ. a. AND. IW.EQ.l) GO TO 4a 

81 41 IF (LKl.GT.a.OR.NSYML.EQ.O) GO TO 60 

83 C SMOOTHING AT LOWER SYMMETRY PLA^E OR SYMMETRY AXIS 

83 43 L-1 

84 K=KORL 

85 IF(IW.EQ.a) L-KORL 

86 IFflW.EQ.ai K=1 
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N0ZL30 - SMOOTH 

87 CJ«Q6(L+Ll,K+KU * Q6(L,K) 

88 DO 55 N‘1,5 

89 IF(LAXIS) 658,658,656 

90 656 IFUU.NE.n GO TO 658 

91 IF(LKl-a)658,657,658 

93 C SMOOTHING AT SYMMETRY AXIS 

93 657 IF(N.EQ.3 .OR. N.EQ.>n GO TO 45 

94 GO TO 50 

95 658 IF (N-NSYMU 50,45.50 

96 45 S(L,N+8,K)=S(L,N+8.K)-6.0*SM1«CJ«Q(L,N,K) 

97 CDM(N)«CJ»(Q(L+2‘Ll,N,K+a*Kn+Q(L,N.K)t 

98 1 a.*(Q(L,N,K)-Q(L+Ll,N,K+Kl)n 

99 GO TO 55 

100 50 COM(N)«CJ‘(Q(L+a*U,N,K+a«KI)-Q(L+Ll,N,K+Kn 

101 1+3.*(Q(L,N,K)-Q(L+L1.N,K+K1))) 

lOa S(L,N+8,K)*S(L,N+8,K)-a.0<SMl«CDM(N) 

103 55 CONTINUE 

104 60 CONTINUE 

105 DO 65 L0RK=LK1 ,UKEM 

106 L=LORK 

107 K*KORL 

108 IFdW.EQ.ai L=KORL 

109 IFdW.EQ.ai K=LORK 

110 CU»Q6(L+L1 .K+K1)+Q6(L,K) 

111 DO 65 N=l,5 

1 la CDKLN»CJ* (Q(L<-a*Ll ,N,K+a*Kl 1-3,0«(Q(L+L1 ,N,K+K1 1 

113 1 -Q(L,N,K)1-Q(L-L1,N,K-Kin 

114 S(L.N48,K)=S(L,N+8,K)-SM1*(CDKLN-CDM(N) 1 

115 CDMINXDKLN 

116 65 CONTINUE 

117 L-LKa 

1 18 K=KORL 

119 IFdW.EQ.ai L=>K0RL 

lao IFdW.EQ.ai K=LKE 

lai CJ=Q6(L+U.K+K11+Q61L,K1 

laa DO 90 N«l,5 

ia3 IF (NSYMU) 75,70,75 

184 70 S(L,N+8,K1*S(L.N+8,KUSM1*CDM(N1 

185 GO TO 90 

lae C SMOOTHING AT UPPER SYMMETRY PLANE 

137 75 IF (N-NSYMU) 85,80,85 

188 80 S(L+L1,N+8,K+K1)«S(L+L1.N+8,K+K1)-6.0»SM1«CJ*Q(L+L1,N,K+K11 

189 CDKLN-CJ* (-(Q(L+L1 ,N,K+K1 )+Q(L-Ll ,N,K-K1 1 1 

130 l+2.dQ(L,N,K)-Q(L+Ll,N.K+Kl)l) 

131 S(L.N+8,K)«S(L.N+8,K1-SM1«(CDKLN-CDM(N)1 

138 GO TO 90 

133 85 CDKLN*CJ«(Q(L,N.K)-Q(L-Ll,N.K-Kl)+3.* 

134 l(QtL,N.K)-Q(L+Ll,N.K+Kll)l 

135 S(L,N+8.K)=S(L.N+8,K1-SM1*(C0KLN-CDM(N1) 

136 S(L+L1 ,N+8.K+K11=S(L+L1 ,N+8,K+Kll+a.0*SMl«CDKLN 

137 90 CONTINUE 

138 95 CONTINUE 

139 100 CONTINUE 

140 RETURN 

141 END 
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N0ZL3D - SMOTHJ 


1 

*DECK 

SMOTHJ 

a 


SUBROUTINE SMOTHJ(L) 

3 

»CALL 

BASE 

4 

•CALL 

VARSl 

5 

•CALL 

VARS2 

6 


DIMENSION CDM(5) 

7 

C 

GLOBALLY FULLY CONSERVATIVE SMOOTHING 

8 

Q 


JMM=JM-I 

10 

c 

XI DIRECTION 

11 


DO 100 N=l .5 

1? 

100 

CDM(N)=0.0 

13 


SMI =0.0 

14 


DO 150 J=2.JM 

15 

150 

SM1=AMAX1 (SMI ,ABS( (Q6(L,J+n-Q6(L,J-I ) )/Q6(L,J) ) ) 

16 


SMl=SM0/{ 1 .0+0.25*SMl ) 

17 


DO 200 J=2,JMM 

18 


CJ=Q6(L.J+I)+Q6(L.J) 

19 


DO 200 N= 1 . 5 

20 


CDJN=CJ« (Q(L,N, J+2l-3.0MQ(L.N,J+l ) 

21 


1 -Q(L.N,J))-Q(L,N,J-I)) 

22 


S(l ,N+8.J)=S(L.N+8,J^-SM1*(CDJN-CDM(N) ) 

23 


CDM(N)=CDJN 

24 

200 

CONTINUE 

25 


DO 300 N=1 .5 

26 

300 

S(L,N+8, JM)-=S(L,N+0, JM1+SMI*CDM(N) 

P-’ 


RETURN 

28 


END 
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N0ZL30 - STEP 

1 ‘DECK STEP 

2 SUBROUTINE STEP(DQOQMX, IDTSM) 

3 *CALL BASE 
^ •CALL VARSl 

5 ‘CALL SHOCKC 

6 ‘CALL BTRID 

7 ‘CALL GLOB 

8 COMMON/FILTR/INFLT 

9 ‘CALL VARSa 

10 DIMENSION DINTaiS) 

lie 

12 JT-1 

13 KT«1 

I** LT»1 

15 S1GMAX»0.0 

16 JTU»1 

17 KTJ«1 

18 LTJ»I 

19 SIGJMX^O.O 

20 C CALL SHOCK 

21 C 

22 C J SWEEP ALONG (K.D LINES 

23 V0L*0. 

2H RESM-0. 

25 RESIDED. 0 

26 Kt=2 

27 K2=KM 

28 JMH- JM-I 

29 KMH- KM-1 

30 LMH- LM- I 

31 IF (KPLANE.EQ.O) GO TO 10 

32 K1=KAL 

33 K2=KU 

3*t KMH=1 

35 to CONTINUE 

36 DO 65 K«1 ,KMAX 

37 CALL LJP10(K,2) 

38 DO 15 L=1,LMAX 

39 DO 15 J^l.JMAX 

40 Q6(L,J)-Q(L,15,J) 

41 DXIDYIL, 15,J)=0. 

42 DXIDZ(L,16,J)=0. 

43 15 CONTINUE 

44 DO 60 L=LL,LU 

45 DO 20 >1 .UMAX 

46 CALL DJMET(J.L,XX(J.I),XX(.J.2),XX(J,3)) 

47 20 CONTINUE 

48 IF (K.LT.KAL.OR.K.GT.KU) GO TO 50 

49 IF(IGNCAL.GE.2) CALL EIGENJIK.L) 

50 CALL RHSJ(L) 

51 CALL SMOTHJ(L) 

52 IF (K.LT.K1.0R.K.GT.K2) GO TO 35 

53 IF (L.LT.2.0R.L.0T.LM) GO TO 35 

54 DO 30 J=2,JM 

55 DO 30 N’=l,5 

56 DVOL=l .0/Q6(L.J) 

57 VOL= VOL+DVOL 

58 RES=ABS(S(L,Nt8,J)l 

59 IF (RES-RESM) 30,30.25 

60 25 RESM-HES 

61 JRESM*J 

62 KRESM-K 

63 LRESM*L 

64 NRESM»N 

65 30 RESID*RES1D+RES‘»2 

66 35 CALL FILTRXIK.L.I.JMAX) 

67 IF(J18C.NE.O) CALL BCXINILI 

68 CALL BCXOUT(L) 

69 IFIJIBC.NE.O) CALL BCJMATI 1 ,K,L . 1 ) 

70 IFIJMAXBC.EQ.El CALL BCJMATI JMAX,K,L , 1 ) 

71 CALL BCALJ(K.L) 

72 C S MUST BE ZERO ON B.C. 

73 CALL BTRKJB.JMAX) 

74 00 45 J’JB.JMAX 

75 DO 45 N=1 ,5 

76 45 S(L,N+8,J) - F( J.Nl *06(2 , J) 

77 C PUT XXl.YXI.ZXI ONTO DISC FOR K 8, L SWEEPS 8EL0W 

78 50 DO 55 J=1 .UMAX 

79 Q(L,14,J)’=Q6(L,J) 

80 YXI(L,15,J)=XX(J.2) 

81 55 ZXI(L,16,J)-=XX(J,3) 

82 60 CONTINUE 

83 CALL LJPIOIK.n 

84 65 CONTINUE 

85 RESID - SQRT(RESID)/(DT+.00005)/(JMH‘KMH«Lm»5.01 

86 NCM=NC-1 
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N0ZL3D “ STEP 

B7 WR 1 TE ( 6 , 70 ) NCM . RES ID , RESM , JRESM . KRESM . LRESM . NRESM 

88 PR I NT 70 , NCM . RES I D , RESM . JRESM . KRESM , LRESM . NRESM 

89 70 FORMAT( IH0.8HN», 14, 1X.9HLS RES1D= , IPEl 0 . 3 . I IH MAX RESID 

90 1 1PE10.3.9H J.K,L,N=. 12,3( IH, . len 

91 IF (RES10.lt. 1 . ) GO TO 80 

98 WRITE (6,75) 

93 75 F0RMAT(41H ^<<*STOPPlNG<^RESIDUAL IS GREATER THAN 1 ) 

94 CALL OUTALL(NC) 

95 GO TO 190 

96 80 CONTINUE 

97 C 

98 C 

99 C 

100 C K SWEEP ALONG (J.L) LINES 

101 OQ0QMX=0. 

108 RUMAX«=0. 

103 DO 180 J»l,JMAX 

104 CALL LKP10(J,8) 

105 C SET UP TO AVOID DQOQ FOR N=8 IN SEPARATED REGIONS 

106 C 

107 IF(KPLANE.EQ. 1) GO TO 84 

108 DO 83 L=LL,LU 

109 DO 83 K»KAL,KU 

110 1F(Q(L,8,K) .LE.RUMAX) GO TO 83 

111 RUMAX«Q(L,8,K) 

118 83 CONTINUE 

1 13 84 CONTINUE 

1 14 CALL 0JMET8(J.L,XJ) 

1 15 DO 85 L=1 ,LMAX 

1 16 DO 85 K=1 .KMAX 

117 Q6(L.K)=Q(L, 14.K) 

118 XXI (L, 14,K)=XJ 

119 85 CONTINUE 

180 IF (J.LT.JB) GO TO 165 

121 1F(IGNCAL.GE.8) CALL EIGEN(J) 

122 IF (KPLANE.EQ.n GO TO 180 

123 DO 115 L=LL.LU 

124 CALL FILTRY(J.L,1,KMAX) 

125 CALL BCLKl (8. J.L) 

186 CALL BCLKMX(8, J,L) 

127 IF(INVISC.EQ.O) CALL VISMAT(8,J.L) 

128 IF (J.EQ. 1 .AND. JIBC.NE.O) GO TO 90 

129 IF (J.EQ. JMAX.AND. JMAXBC.EQ.2) GO TO 90 

130 GO TO 100 

131 90 DO 95 K=KAL.KU 

132 95 CALL BCJMAT ( J ,K .L . 8) 

133 100 CONTINUE 

134 CALL eCALKL(J,L.l) 

135 CALL BTRl (KAL.KU) 

136 IF(J*J1BC.EQ. 1 . AND. INFLT.EQ. 1 ) CALL 1NFLTR(8,L) 

137 DO 1 10 N=I ,5 

130 DO I 10 K«KAL.KU 

139 no S(L,N+8,K) = F (K , N) *Q6 (L . K ) 

140 115 CONTINUE 

141 C 
148 C 

143 C L SWEEP ALONG J.K LINES 

144 180 RO * -HDZ 

145 DO 160 K=^KAL.KU 

146 CALL FILTRZCJ.K, I .LMAX) 

147 CALL BCLKl ( 1 ,J,K) 

148 CALL BCLKMXn ,J,K) 

149 1F( INVISC.EQ.O) CALL VI SMAT ( 1 , J . K ) 

150 IF (J.EQ. 1 .AND. JIBC.NE.O) GO TO 185 

151 IF (J.EQ. JMAX.AND. JMAXeC.EQ. 2) GO TO 185 

152 GO TO 135 

153 185 DO 130 L=LL.LU 

154 '.30 CALL 6CJMAT( J.K ,L . 3) 

155 135 CONTINUE 

156 CALL RCALKL(J.K,8) 

157 CAuL BTRl(LL.LU) 

158 IF(J^JlBC.EQ.l.AND.INFLT.EQ.l) CALL INFLTR(3.K) 

159 DO 155 L«LL,LU 

160 DO 150 N«1 ,5 

161 IF (N.EQ.3.0R.N.EQ.4) GO TO 145 

168 1F(N.EQ.8.AND. (ABS(Q(L.8,K)) .LT.O.OnRUMAXDGO TO 145 

163 IF (Q(L.N,K) .EQ.O. ) GO TO 145 

164 DQ0Q=F(L.N)/Q(L.N.K1 

165 IF (A0S(DQOQ) .LE.ABS(DQOQMX) ) GO TO 145 

166 DQOQMX^^DQOQ 

167 JDQ“w 

168 KDQ=K 

169 LDQ=L 

170 NDQ=N 

171 145 CONTINUE 

178 150 Q(L,N,K) = F(L.N) Q(L,N,K) 

173 155 CONTINUE 


PAGE 84 



160 


N02L30 - STEP 
CONTINUE 


174 

175 

176 

177 

178 

179 

180 
lai 
1 08 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 

214 

215 

216 


165 CALL BC(J) 

CALL GLOBLfJl 
IF (J.NE.JTT) GO TO 170 
NOZZLE DISCHARGE COEFFICIENT CW 
C INTEGRATE MASS FLOW AT THROAT J»JT 
NMX=l 
Ll»l 
L2*LMAX 

IF(LW.GT.O) L2»LW 

Kl«l 

K2»KMAX 

IF(KW.GT.O) Ka^-KK 

CALL GDINTF(J.Kl .K2.L1 .L2.NMX.DINTGL) 

CW*01NTGL( I )/(CWFAC*AT) 

170 CONTINUE 

IF( lOTSW.EQ.O) GO TO 172 
CALL OTSW( 1 I 
172 CALL PRECALC J) 

00 175 L=1 .LMAX 
DO 175 K=l ,KMAX 
Q(L.15,K)=Q6(L,K) 

175 CONTINUE 

CALL LKPIOC J, 1 ) 

C SWITCH DT BACK , IF NECESSARY 
1F( lOTSW.EQ.O) GO TO 180 
CALL DTSW(2) 

180 CONTINUE 
C 

TAU TAU + DT 

WRITE ( 6 . 1 85 ) NC . T AU , DT , DQOQMX . JDQ . KDQ . LDQ , NDQ 
185 FORMATC 1H0.5X.4H NC=,13,6H TIME= .FIO .4 ,4H DT=.EM.H, 

I IX, 17HMAX1MUM DELTAQ/Q= . tPE 1 0 . 3, 1 IHAT J.K,L ,N= 12 .3(1H , , 1 2) ) 
1 F ( NK . EQ . 0 . AND . RES 1 DS . L T . RES 1 0 ) NRES“2«NRES 
1F(NSTEP.EQ,2) RESIDS=RES1D 
C SWITCH DT FOR NEXT STEP IF IDTSW.NE.O 
IF(IDTSW.NE.O) CALL DTSW(l) 

RETURN 

C 

C ERROR STOP WHEN RESIDUAL > 1 
190 STOP 
END 
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N0ZL3D - SW 


1 •DECK SW 

S SUBf^OUTI^E SW 

3 «CALL RHSBCC 
t ‘CALL BASE 

5 IFdW.EQ.ai GO TO 100 

6 LORKMX»LMAX 

7 KORLMX=KMAX 

8 LM0RKM=LM 

9 LLORKL=LL 

10 LUORKU=LU 

1 1 KLOBLL=KAL 

la KUORLU-KU 

13 LKMXBC«LMAXBC 

It KLMXBC=KMAXBC 

15 LKlBC<ieC 

16 KL1BC=K1BC 

17 LORKW»LW 

IB KORLW=KW 

19 JLKW=JLW 

ao JKLW=JKW 

21 JLK1WL=JU1WL 

aa jLKiwu=JLiwu 

a3 JKL1WL=JK1WL 

at JKL1WU=JK1WU 

25 D20ROY=DZ1 

26 RETIWN 

27 100 LORKHX=KMAX 

28 K0R1.MX=LMAX 

29 LMORKM=-KM 

30 LLORKL=KAL 

31 LUORKU=KU 

32 KLORLKL 

33 KUORLU=LU 

3t LKMXBC=KMAXBC 

35 KLMXBC=LMAXBC 

36 LK1BC=K1BC 

37 KL1BC=L1BC 

38 KORLW-LW 

39 LORKW=KW 

to JLKW=JKW 

tl JKLW=JLW 

ta JKL1WL=JL1WL 

t3 JKL1WU=JL1WU 

tt JLK1WL=JK1WL 

tS JLK1WU=JK1WU 

tB DZ0RDY=DY1 

t7 RETURN 

tS END 


N0ZL3D - VISCOF 

1 ‘DECK VISCOF 

2 SUBROUTINE VISCOF! TEMP. RMUE) 

3 ‘CALL VISCO 

4 C 

5 C DIMENSIONLESS LAMINAR VISCOSITY COEFFICIENT RMUE IS EVALUATED 

6 C FROM SUTHERLAND LAW LHEN ISUTH=1 , AND FROM POWER LAW WHEN ISUTH=0 

7 C 

B IF(ISUTH-I) ao, 10,30 

9 C SUTHERLAND LAW 

10 10 RMUE= (TEMP“1.5)/(TEMP+TSUTH) 

1 1 RETURN 

la C POWER LAW 

13 ao RMUE=TEMP“RMUEXP 

It RETURN 

15 30 CONTINUE 

16 RETLSW 

17 END 
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N0ZL3D - VISMAT 
1 *DECK VISMAT 

s subroutine: vismat(iww,uj,k) 

3 *CALL BASE 

4 'CALL VARS I 

5 «CALL BTRIO 

6 -CALL RHSBCC 

7 *CALL Vise 
0 ‘CALL VARS8 

9 C JACOBIAN MATRICES FOB VISCOUS TERMS THAT ARE TREATED IMPLICITLY 


10 



n 

JaJJ 


12 

CALL SW 


13 

GKPR = GAMMA /PR 


14 

PRTR = PR/ 0.9 


15 

ORE * -HD/(RE«0Z0RDY«*2) 


16 

IF (IW.EQ.2) GO TO 10 


17 

CALL Z2M(J,K, 1 .LMaX) 


18 

GO TO 20 


19 

10 CALL YYM(J,K.I,KMAX1 


20 

DO 15 N^l ,4 


?1 

DO 15 L-1 .KMAX 


22 

15 Z2(L.N)=YY(L.N) 


23 

20 R3 = 1 ./3. 


24 

DO 25 L=l .LORKMX 


25 

LLL=L 


26 

KKK^K 


27 

IF(1W.EQ.2) LLL=K 


28 

IFdW.EQ.2) KKK-L 


29 

RR(L) = 1 ./Q(LLL. 1 .KKK) 


30 

Q2=(Q(LLL.2.KKK)*«2-»OfLLL.3.KKK)**2+Q(LLL,4,KKKl 

31 

T GO* (Q(LLL .5.KKK) ~ 0 . 5*02) «RR(L ) 


32 

CALL VISCOFd,RMUE) 


33 

VNU = RMUE+TURMl.lfLLL,6.KKK) 


34 

GKAP = RMUE+PRTR*TURMU(LLL.6.KKK) 


35 

RJ = 1 ./Q6(LLL,KKK) 


36 

S0(L) = (ZZa., I )**2+ZZ(L,2)**2-»-ZZIL,3)** 

2) ‘RJ 

37 

Sl(L) = (S0(U+R3*ZZ(L.1)**2«RJ)*VNU 


38 

52(1.) = (S0(U+R3*Z2(L.2)**2*RJ)*VNU 


39 

S3(L) ^ (S0(L)+R3*ZZ(L,3)**2*RJ)«VNU 


40 

S4(L) = R3*ZZ(L, M*ZZ(L,2)«RJ*VNU 


41 

S5(L) - R3*ZZ(L, n*ZZ(L.3)«RJ*VhW 


42 

S6(L) = R3*ZZ(L,2)*ZZ(L.3)«RJ*VNU 


43 

S0(L) = SOU.)*GKPR*GKAP 


44 

RR(L1 ^ I ./OaLL. 1 .KKK) 


45 

U(L) = Q(LLL,2.KKK)*RR(L) 


46 

V(L) = Q(Ll.L .3,KKK)*RR(L) 


47 

W(L) = Q(LLL,4.KKK)*RR(L) 


40 

EfL) = Q(LLL.5.KKK)*RRa) 


49 

25 CONTINUE 


50 

DO 30 L=2, LORKMX 


51 

LR = L-1 


52 

CO = SO(L)+SO(LR) 


53 

Cl = Si a )+Sl (LR) 


54 

C2 = S2(L)+S2(LR) 


55 

C3 = S3(0+S3(LR) 


56 

C4 = S4.(L)*S4(LR) 


57 

C5 = S5(U+55(LR) 


50 

C6 = S6(L>+S6(LR) 


59 

0(L,2, I ) = -(Cl*U(LR)+C4*V(LR)+C5*W(LR) )*RR(LR) 

60 

DEU(L.2,n= -(C1*U(L )+C4«V(L )+C5*W(L 

) )*BR(L 

61 

D(L.2,2) = C1*RR(LR) 


62 

DEU(L.2.2) = C1*RR(L) 


63 

D(L.2.3) = C4*RR(LR) 


64 

DEU(L,2.3) = C4*RRiL) 


65 

D(L.2.4) = C5*RR(LR) 


66 

0EU(L,2.4) = C5*RR(L) 


67 

0(L.2.5) » 0,0 


68 

DEU(L,2,5) * 0.0 


69 

0(L,3.n -• -(C2*V(LR)+C4*U(LR)tC6*W(LR) ) 

•RR(LR) 

70 

OfU(L,3,|l= -(C2'V(I )<-C>t«UiL l*C6«wa ))*RR(L ) 

71 

D(L,3,2) = C4*RR(LR) 


72 

OEua .3.2) * C4*RR(L) 


73 

0(L.3,3) * C2*RR(LR) 


74 

DEU(L,3.3) » C2*RR(D 


75 

0(L.3.4) ^ C6*RR(IR) 


76 

DEU(L.3,4) = C6*RR(L) 


77 

0(L,3.5) “ 0.0 


78 

DEUfL .3.5) 0.0 


79 

0(L.4. 1 ) -(C3*W(LR)^C5*U(LR)+C6«V(LR) ) 

•RR(LR) 

00 

DEU(L.4,n “-(C3*W(L )+C5*U(L )+C6*V(L ))*RR(L ) 

81 

D(L.4.2) = C5*RR(LR) 


82 

DEU(L,4,?) - C5*RR(D 


83 

D(L,4.3) = C6»RR(LR) 


84 

DEU(L.4.3) ^ C6*RR(D 


85 

D(L ,4,4/ ^ C3*RR(LR) 


86 

DEU(L,4.4) C3*RR(U 
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N0ZL30 - VISMAT 

87 0(1,8, 5) = 0.0 

88 DEU(L,8,5) = 0,0 

89 D(L,5,1) = -((Cl-C0)*U(LR)**e+(C8-C0)*V(LR)*«8+(C3-C0)«W(LR)**8 

90 1 +8,«C8<U(LRHV(LR)+a.«C5«U(LR)<W(LR)+9.*C6*V(LR)*W(UR)+C0*E(LR)) 

91 a ‘RR(LR) 

99 DEU1L,5,1) = -((Cl-C01«U(L)**9+(C5-C0)*V(L)«*e+(C3-C0)*W(L)*«e+ 

93 1 2,*C8‘U(U*V(L)+a,*C5*U(L)«W(L)+2,«C6*V(L)*W(L)+C0*E(U)*RB(L) 

98 0(L,5,a) = nCl-C0)«U(LR)+C8«V(LR)+C5«W(LRn«RR(LR) 

95 DEU(L,5,a)= ((C1-C0)«U(L )+C8<V(L )+C5*W(L ))*RR(L ) 

96 D(L,5,3) = ((C2-C0)’V(LR)+C8*U(LR)+C6*W(LR))*RR(LR) 

97 DEU(L,5,3)= ((C2-C0)*V(L )+C8»U(L )+C6«W(L ))«RR(L ) 

98 D(L,5,8) = ((C3-C0)*W(LR)+C5*U(LR)+C6*V(LR))*RR(LR) 

99 DEUCE, 5, 8) = ((C3-C0)‘W(L)+C5*U(LI+C6*V(Ln«RR(L) 

100 D(L,5,5) = C0«RR(LR) 

101 DEUCE, 5, 5) = CO'RRCE) 

10? 30 CONTINUE 

103 C TEST FOR INTERNED I ATE WAEE 

108 INTWAE^O 

105 lF(EORKW,Or.O,AND. J.EE.JEKWl INTWAE'l 

106 lF(KOREW.GT.O.AND,K.GE,KOREWtn INTWAE=0 

107 DO 80 L=a,EMORKM 

108 ER = E+l 

109 DO 35 N=a,5 

1 10 DO 35 M=1 ,5 

111 IF (INTWAE.EQ. 1 .AND. (E,EQ,E0RKW.0R,E.EQ.E0RKW+1 11 GO TO 35 

112 ACL, N, Ml =-- A(L,N,M)+DRE«D(L,N,M) 

113 BCE, N, Ml = B(L,N,Ml-DRE*(D(LR,N,M)tDEU(L,N,Ml) 

118 C(L,N,M) - C(L,N,M)tDRE*DEU(LR,N,MI 

115 35 CONTINUE 

116 80 continue 

117 C IMPLICIT VISCOUS SLOCKS FOR INTERMEDIATE WALL 

118 IF (INTWAL,EQ.O) GO TO 50 

119 L<ORKW 

120 LR=L0RKW+1 

121 DO 85 N*2,5 

122 DO 85 M'-'l.S 

123 A(L,N,M!=A(L,N,M1+2,0*DRE»0(L,N.M) 

128 B(L,N,MI=B(L,N,M1-2,0*DRE*DEU(L.N,M1 

125 C(L,N,M)=>0,0 

126 A(LR,N,M)=0,0 

127 S(LR,N,M)=B(LR,N,M1-2,0«DRE*D(LR+1,N,M) 

128 85 C(LR,N,M)=C(LR,N,M)+2.0‘DRE»DEU(LR+I,N,M) 

129 50 CONTINUE 

130 C 

131 C FILL IN VISCOUS PORTION OF IMPLICIT COEFF, MATRIX FOR 

132 C IMPLICIT OUTFLOW B,C. AT L<ORKMX (LKMXBC*2 OR 51, OR FOR IMPLICIT 

133 C ADIABATIC WALL B,C. (LKMXBC»1 ), OR FOB SYMMETRY BC(LKMXBC=3, 8) , 

138 C 

135 IF (LKMXBC.EQ.O) GO TO 65 

136 L»LORKMX 

137 DO 60 N=2,5 

138 IF (LKMXBC.LT.3.0R.LKMXBC.GT,8) GO TO 55 

139 IF (N.EQ.LKMXBCl GO TO 65 

180 55 DO 60 M=1 ,5 

181 AIL,N,M1=A(L,N,M) t C2. Q«DRE1 «D(L ,N,M) 

182 B(L,N,M1=0(L,N,M1 - (2. 0‘DREI ‘DEUCL ,N,M1 

183 60 CONTINUE 

188 65 CONTINUE 

185 C 

186 C FILL IN VISCOUS PORTION OF IMPLICIT COEFF MATRIX FOR IMPLICIT 

187 C ADIABATIC WALL BC FOR JLKIWL ,LE, J.LE, JLKIWU AND SYMMETRY BC 

188 C FOB U OUTSIDE THAT INTERVAL 

189 L=I 

150 IF (LKlSC.NE.n GO TO 100 

151 NSYM=10 

152 C TEST FOR INTERMEDIATE WALL NORMAL TO L=l 

153 IF (KORLW) 70,70,80 

158 C TEST FOR WALL AT L=1 

155 70 IF (JLKIWL. LE.J. AND. J.LE. JLKIWU) GO TO 85 

156 C SYMMETRY 

157 75 IFCIW.EQ.l) NSYM=8 

158 IFCIW.EQ.2) NSYM=3 

159 GO TO 85 

160 C TEST FOR WALL AT L=1 

161 00 IF CK-KORLWl 70,70,75 

162 85 DO 95 N=2,5 

163 IF (N.EQ.NSYM) GO TO 95 

168 DO 90 M=1 ,5 

165 B(L,N,MI=B(L,N,M)-(2,0*DRF)'D(L+I ,N,M) 

166 C(L,N,MI=C(L,N,M)+(2,0*DRE)«DEU(L+1 ,N,M) 

167 90 CONTINUE 

168 95 CONTINUE 

169 !00 RETURN 

1 70 END 
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1 

*de:ck 

N0ZL30 - XXM 

XXM 

e 


SUBROUTINE XXMCL , J,K1 .KB) 

3 

«CALL 

BASE 


•CALL 

VARSl 

5 

•CALL 

VARSB 

6 

C 


7 

C XI 

METRICS FORMED FOR A K,L L 

8 

C 


9 

C 


10 

C SYMMETRY 

1! 

c 


18 


DO 10 K=KI ,K8 

13 


CALL DKMET(J.K.L,XK.YK,ZK) 

Ilf 


CALL DLMFT(J,K.L,XL.YL,ZL) 

15 


XX(K,1) = YK«ZL'ZK*YL 

16 


XX(K,8) = ZK^XL-XK«ZL 

17 


XX(K,3) = XK*YL-YK^XL 

18 


XX(K.if) = 0. 

19 

10 

CONTINUE 

80 


RETURN 

81 


END 
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N0ZL30 - YYM 


1 «DECK YYM 

2 SUBROUTINE YYM( J,L ,Kl ,K2) 

3 *CALL BASE 
^ ♦CAUL VARSl 

5 ♦CALL VARSe 

6 C 

7 C ETA METRICS FORMED FOR A J,L LINE IN K 

8 C 

9 DO 10 K = Kt ,KE 

10 XJ=XXI(L,lt,K) 

11 YJ=YXI(L.15.K) 

12 ZJ»ZXI(L,16,K) 

13 CALL DLMET(J,K,L,XL,YL,ZL) 

li* YY(K,n = ZJ‘YL-YJ*ZL 

15 YY(K,2) = XJ*ZL-XL*ZJ 

16 YY(K,3) = YJ‘XL-XJ«YL 

17 YYIK,!*) = 0. 

IB 10 CONTINUE 

19 RETURN 

20 END 


I 
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NOZL3D - ZERODQ 

1 

"DECK 

ZERODQ 

2 


SUBROUT I hE ZEROOQ(I) 

3 

♦CALL 

BASE 

4- 

♦CALL 

VARSl 

5 

♦CALL 

BTRID 

6 

♦CALL 

VARS2 

7 

C 

DEFINE IMPLICIT OPERATOR MATRIX ELEMENTS TO YIELD DELTAQ=I 

8 

C 

AT GRID POINTS WHERE LAGGED BOIMJARY CONDITIONS ARE TO BE 

9 

15 

DO 30 N=l,5 

10 


DO 20 M=l,5 

11 


A< 1 ,N,MI=0. 

12 


BtI,N,M)=0. 

13 

20 

C( I ,N,M)=0. 



B( I ,N,N)=I . 

15 

30 

F(I,N)=0. 

16 

too 

CONTINUE 

17 


RETURN 

18 


END 




I 
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N0ZL3D - ZZM 

1 «DECK ZZM 

3 SUBROUTINE ZZM(J,K, LI ,L2) 

3 ‘CALL BASE 
'CALL VARSl 

5 'CALL SHOCKC 

6 'CALL VARS2 


7 

C 


8 

C 

ZETA METRICS FORMED FOR A J,K 

9 

c 


10 

c 

SYMMETRY 

11 

c 


12 


DO 10 L = Li ,L2 

13 


CALL OKME'U.K.L.XK.YK.ZKl 

IH 

c 

CALL DJMET(J,L,XJ,YJ,ZJ1 

15 


XJ=XXI (L, IH.X) 

16 


YJ=YXI (L, IS.Kl 

17 


2J=ZXI (L, 16,K) 

IB 


ZZ(L, 1 ) = YJ'ZK-ZJ'YK 

19 


ZZlL.ei = XK'ZJ-XJ'ZK 

20 


ZZ(L,3) = XJ'YK YJ*XK 

21 


ZZtL.'TI = 0. 

22 


10 CONTINUE 

23 


RETURN 

24 


END 
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N0ZL3D - COMDECKS 

1 *COMDECK CAROS 

2 COMMON /CARDS/ 


3 

A 

ITEMS, 

1 TPREC . 

KCAROS, KOOREC, KIRECS, 

4 

B 

LASCOL , 

LSOUGT . 

LVJUMP, LISENT, LESENT, NILERR, 

5 

C 

IREC, 

IDAT 


6 

INTEGER 

IREC(eOO) 

, IDATIEOO) 

7 

REAL 

RECm 


8 

EQUIVALENCE 

(IREC,REC) 

9 

•COMOECK 

CDMERR 



iO 

COMMON /CDMERR/ 


I ! 

A 

DMERCD, 

DMERCM. 

DMERLC, DMERPM, lOMERH, lEHSAV 

IB 

INTEGER 

DMERCD. 

DMERCM, DMERLC, DMERPM 

13 

COMMON /COMETS/ 


IH 

A 

TRARGS . 

TROPID, 

TRINST, TRARGL, 

15 

B 

TRSTSZ, 

TRTOPM, 

TRTOPS, TRSTAK 

16 

INTEGER 

TRARGS . 

TROPID, TRINST, TRARGL(IO) 

17 

INTEGER 

TRSTSZ. 

TRTOPM, TRTOPS, TRSTAK Ct8) 

10 

«COMDECK 

CDMERRA 



19 


USE /CDMERR/ 


20 

DMERCD 

BSS 

1 


21 

DMERCM 

B5S 

1 


22 

DMERLC 

BSS 

1 


23 

DMERPM 

BSS 

1 


24 

lOMERH 

BSS 

1 


25 

lEHSAV 

BSS 

1 


26 


USE /COMETS/ 


27 

TRARGS 

BSS 

1 


20 

TROPIO 

BSS 

1 


29 

TRINST 

BSS 

1 


30 

TRARGL 

BSS 

10 


31 

TRSTSZ 

BSS 

i 


32 

TRTOPM 

BSS 

1 


33 

TRTOPS 

BSS 

1 


34 

TRSTAK 

BSS 

40 


35 

•COMDECK 

CDMASTA 



36 


USE 

/COMAST/ 


37 

MAXLOI 

SET 

16D 


38 

ASTOIM 

BSS 

1 


39 


BSS 

7 

AST0SD(I-7) 

40 

SIZREC 

BSS 

1 

RECORD SIZE IN WORDS (N) 

41 

RETCOD 

BSS 

1 

RETURN CODE (BITS 0-0 OF FET+0) 

42 

EOFCOD 

BSS 

0 


43 

EOlCOD 

BSS 

1 

END OF INFORMATION RETURN CODE 

44 

STATUS 

BSS 

1 

OPERATION status WORD 

45 

DTLERR 

BSS 

0 

DETAILED ERROR CODE (NOS) 

46 

TAPERR 

BSS 

1 

DETAILED TAPE ERROR (SCOPE) 

47 

RSKCNT 

BSS 

1 

RESIDUAL SKIP COUNT (SCOPE) 

40 

NWRDXF 

BSS 

1 

NUMBER OF WORDS XFERRED ON BEAD/WRITE 

49 

ASTCNT 

BSS 

7 


50 

ASTSEC 

BSS 

8 


51 


IFEQ 

OS . SCOPE 


52 

ASTSYS 

BSSZ 

I 

SYSTEM IDENTIFIER (SCOPE) 

53 


ELSE 



54 

ASrSYS 

DATA 

1 

SYSTEM IDENTIFIER (NOS) 

55 


END IF 



56 

A5TMSG 

BSS 

9 

MESSAGE TEXT AREA 

57 

DEVTYP 

BSS 

1 


58 

PRUS I Z 

BSS 

1 


59 

LFNADS 

BSS 

1 


60 

PRUXEI 

BSS 

1 


61 

NWXF 

BSS 

1 


62 

NWXWRT 

BSS 

1 


63 

OUTMIN 

BSS 

1 

(OUT-IN) ON EXIT FROM FETRETS 

64 


BSS 

6 

SCRATCH 

65 

FET 

BSS 

9 

FET PROPER 

66 

FETEXT 

BSS 

3 

FET EXTENSION (SCOPE) 

67 

ASTQFR 

BSS 

MAXLOI 

QUALIFIERS (USER IDS, OWNERS IDS) 

68 

ASTPFN 

BSS 

MAXLOI 

PERMANENT FILENAMES 

69 

ASTLFN 

BSS 

MAXLOI 

LOGICAL FILENAMES 

70 

ASTEQC 

BSS 

MAXLDI 

EQUIPMENT COOES 

71 

ASTOPT 

BSS 

MAXLDI 

ACCESSIBILITY/PERMANENCY OPTIONS 

72 

ASTYPE 

BSS 

MAXLDI 

GEN EQUIPMENT TYPE INDICES 

73 

ASTUNT 

BSS 

MAXLOI 

UNIT NUMBERS (LEFT FOR COMPATIB) 

74 

ASTLOC 

BSS 

MAXLOI 

CURRENT DEVICE LOCATIONS 

75 

ASTNXT 

BSS 

MAXLOI 

NEXT (EOI) DEVICE LOCATIONS 

76 

ASTLIM 

BSS 

MAXLOI 

DEVICE CAPACITIES 

77 

ASTWXR 

BSS 

MAXLDI 

COUNTS OF WORDS READ 

78 

ASTWXW 

BSS 

MAXLDI 

COUNTS OF WORDS WRITTEN 

79 

-COMDtCK 

DALCOM 



80 

C 




81 

COMMON /CDMDAL/ 


82 

$ 

LD1L1B(26) . 


83 

S 

LIBLOI (4) ,LIBHDR(4) 

,LIBLINC*) ,LIBNSG(>T) , 

04 

$ 

L1BL0C(4) ,LIBNXT(4) .LIB0PR(4) ,LIBSEG(4) . 

05 

S 

LIBSEQ(4) ,LIBWRT(4) ,L1N1NP(16) . LlNTOCl 16) . 

86 

S 

MAXDAL . 

MCTSEG. 

MWHSFG . MWTSEG , NAMKFY ( 4 ) , 
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87 

88 

89 

90 

91 
98 
93 
9H 

95 

96 

97 

98 

99 
too 
101 
102 
103 
10>f 

105 

106 

107 

108 

109 

110 
111 
112 
113 
n't 

1 15 

116 
117 

lie 

119 

120 
121 
122 
123 
12H 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 


N0ZL3D ■ 
NCTSEG, 


COMDECKS 

NRTSEG, 


COMMON /SYMBIO/ 

A CRDFIL, ERRRL 
8 PLTFIL, 

C SYSPBT, 

INTEGER 


INTEGER 

INTEGER 

LOGICAL 


PPLFIL, 

TTYINP, 

CRDFIL, 

PLTFIL. 

SYSPRT, 

TTYINP, 


NTLINE, 

NWLHDR, 

NWTSEG 

MCHLIN, 

MTWLIN, 


PRTFIL, 

PUNFIL, 

SYSCRD, 

TTYPRT, 

TXTFMT, 

ZIOSCR 

ERRFIL, 

MCHLIN. 

MTWLIN 

PPLFIL, 

PRTFIL, 

PUNFIL, 


SYSCRO 


TTYPRT 


IPOOL(l) 

POOL(l) 

DOUBLE PRECISION DPOOL(l) 

EQUIVALENCE t IPOOL .POa.DPOOL) 

•COMDECK DALTIT 

C* NOSTRA DATA MANAGEMENT SYSTEM * 

C« E Z - 0 A L BASIC-LEVEL MANAGER OF DI^CT^ACCESS^LI^IES^^^^' 

•COMDECK DMECOM 


COMMON n 
REAL 


COMMON /CDMEBB/ 

A DMERCO, DMERCM, 

INTEGER DMERCD, 

COMMON /COMETS/ 

A TRARGS, TROPID, 

8 TRSTSZ, TRTOPM, 

INTEGER TRARGS, 

INTEGER TRSTSZ, 

•COMDECK lOMACTL 
*<•«»««•«*«<«•#•••<••••••••••••••••• 

• ASSEMBLY CONTROL SPECIFICATIONS • 
•••••«•<<*«««*•»••«••••••••••••••••• 


DMERLC, 

DMERPM, 

lOMERH, 

DMERCM. 

DMERLC, 

DMERPM 

TRINST, 

TRARGL, 


TRTOPS. 

TRSTAK 


TROPID. 

TRINST, 

TRARGL (10) 

TRTOPM. 

TRTOPS. 

TRSTAK (48) 


lEHSAV 


SCOPE 

NOS 

OS 


•COMDECK 


EQU 

ECAJ 

SET 

SYSCOM 

LIST 

lOMCOM 


0 

1 

NOS 

B1 

S 


COMMON /CDMAST/ 

A ASTOSO, ASTCNT, 
8 ASTQFR, 

C ASTUNT, 

INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
EQUIVALENCE 


ASTPFN, 

ASTLOC, 

ASTDIM. 

ASTSYS, 


ASTDIM. 

ASTSEC, 

ASTLFN, 

ASTNXT, 


ASTMSG, 

ASTOPT, 

ASTWXR, 


ASTPKT, 

ASTYPE, 

ASTWXW 


ASTSYS, 

ASTEQC, 

ASTLIM, 

ASTOSO(14). ASTCNT(7), ASTSEC(B) 

ASTMSG(9) ,ASTPKT(25) 

ASTQFR(16), ASTPFN(IS), ASTLFN(16), ASTEQC(161 
ASTUNT(16), AST0PT(16), ASTYPE(16) 

ASTLOCdS), ASTNXT(16). ASTLIMU6) 

ASTWXR(16), ASTWXW(16) 

( I DOPER , ASTOSO ( 1 )) , 1 1 OERCO , ASTOSO (2)1 


139 

•COMDECK 

RPMOIB 




mo 

c 






mi 


COMMON /CDMDAT/ 


BOOTNG, 

ma 


A 

ASPBEG. 

ASPEND. 

ASPLOI, 

m3 


B 

IDXCAT. 

I DXLAT. 

I DXGAT, 

1 DXRAT, 

m^ 


C 

KEYCAT. 

KEYLAT. 

KEYGAT, 

KEYRAT, 

IH5 


D 

GIDBUF. 

GIDOMS. 

G I DTEM, 


t^6 


E 

MSKGID. 

MSKLOC. 

MSKRID, 

RPDNUM, 

m? 


F 

RPDIND. 

RPDFIX, 

RPONAM, 

148 


G 

TIMBE6. 

TIMOMS, 

TIMING, 

TYPTAB, 

149 


H 

UPCALL. 

UPGREF 


ASPLDl 

150 


INTEGER 

ASPBEG, 

ASPENO, 

151 


INTEGER 

GIDBUF. 

GIDOMS, 

G I DTEM 


152 INTEGER 

153 INTEGER 

154 INTEGER 

155 LOGICAL 

156 EQUIVALENCE 

157 EQUIVALENCE 

158 •COMDECK RPMOAT 

159 DATA 

160 DATA 

161 DATA 

162 DATA 

163 DATA 

164 DATA 

165 DATA 

166 DATA 

167 DATA 

168 DATA 

169 DATA 

170 •COMDECK RPMTIT 

17) 

172 C^ NOSTRA 

173 C* 


GIDRES13) 

RPOIND, 


RPONUM 


RPDFIX, RPONAM, 

RPOTAB ( 4 ) , TYPTAB ( 4 ) , UPCALL 
BOOTNG, TIMING, UPGREF 
( IDXTABl 1 ) , IDXCAT) . (RPOTABl 1 1 .RPDIND) 

(GIDRESn ) .GIDBUF) . (RIDRESl 1 1 .KEYTABl 1 ) .KEYCAT) 

ASPBEG, ASPENO, ASPLDl / 18.32,0/ 

BOOTNG /.TRUE./ 

I DXCAT , 1 DXLAT , I DXGAT , I DXRAT / 1 , 2 , 3 , 4/ 

KEYCAT .KEYLAT , KEYCAT , KEYRAT/3HCAT , 3HLAT , 3HGAT , 3HRAT / 
G I DBUF . G 1 DDMS , G I DTEM / 4HJBUF , 4HIDMS , 4HSTEM/ 

MSKGID, MSKRID /2^77777777000000000000B/ 

MSKLOC /77777777B/ 

RPDTAB / 2. 1, 3, 3/ 

TYPTAB /3RIND, 3RFIX, 3RNAM, 3RNUM/ 

TIMBEG.TIMOMS, TIMING. UPCALL/0. ,0. , .FALSE. ,0/ 

UPGREF /.FALSE./ 


«««««««« 

DATA 


management 


««#*««««««*««««*«««««««« 

SYSTEM « 
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NOZLIC - 


17^ C« 

R P M 

R E S 0 

U R C E 

POOL 

M A N A 

i76 •COMDECK SYMBIO 





177 

COMMON /SYMBIO/ 




17B 

A CROFIL, 

ERRFIL. 

MCHLIN, 

MTULIN. 


179 

B PLTFIL. 

PPLFIL, 

PRTFIL, 

PUNFIL, 

SYSCRO 

ISO 

C SYSPRT, 

TTYINP, 

TTYPRT, 

TXTFMT, 

ZIOSCR 

lei 

INTE8ER 

CRDEIL, 

ERRFIL, 

MCHLIN, 

MTWLIN 

188 

INTEGER 

PLTFIL, 

PPLFIL, 

PRTFIL, 

PUNFIL, 

103 

INTEGER 

SYSPRT, 

TXTFMTIS) ,ZI0SCR(961 


LOGICAL 

TTYINP, 

TTYPRT 




E R « 


SYSCRP 
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1 

•DECK 

DMGASP 





2 

C*DECK 

DMGASP 

DMGASP 

MIXED 



3 

SUBROUTINE 

DM GASP 




9 

S 

(ARGI , 

ARG2, ARG3) 




5 

C 






6 

C-PURPOSE 

ACCESS METHOD OF NOSTRA 

-DMS 



7 

C-AUTHOR 

C. A. FELIPPA 




8 

C-VERSION 

NOVEMBER 1977 




9 

C-EQUIPMENT 

CDC 





10 

C=KEYWORDS 

AUXILIARY STORAGE 

MANAGER 

I/O 


11 

C-KEYWOROS 

DATA 

MANAGEMENT 

SYSTEM 



12 

C-EASY-SUB 

DMABRT 

LFNBF 

LFNZF 

lOMAPF 

lOMCLS 

13 

C=EASY-SUB 

lOMCPF 

lOMDPF 

lOMEOF 

lOMEPF 

lOMEVT 

19 

C-EASY-SUB 

lOMFET 

lOMOPN 

lOMPOO 

lOMPor 

lOMPRU 

15 

C-EASY-SUB 

lOMPPF 

lOMQFC 

lOMRPF 

lOMROR 

lOMWTR 

16 

C-EASY-SUB 

lOMTAB 

lOMXEI 




17 

C-TEST 

TESTCIO 

TESTPFM 




18 

C-USAGE 

REFER TO DMGASP REFERENCE MANUAL, 

LMSC-D6a6839 


19 

C 






50 

C 


COMMON 




21 

C 






22 

C-PROCEDURE 

lOMCOM 

COMETS 

CDMERR 



23 

•CALL 


lOMCOM 





24 'CALL OMECOM 

55 C 

56 C TYPE AND DIMENSION 

57 C 

58 INTEGER ARGI , ARGSIS), ARGSIiT) 

59 INTEGER CDLOC. DEVICX, DEVTYP, EDNI5) , EOFCOD 

30 INTEGER QFCI3), REEL, RETCOO, RING. RSKCNT 

31 INTEGER EQCODE, OPTX, OPTXA 

35 INTEGER PEN, PFNID, PFNCY, PFN8TP, PFNXR 

33 INTEGER SECTOR, SIZREC, STATUS, TAPERR, TYPEX 

3t INTEGER TYPIDX, VRN 

35 C 

36 C EQUIVALENCE 

37 C 

39 equivalence I IDOPER.ASTOSDI I )) , (IOERCD.ASTOSDI5)) 

39 EQUIVALENCE (DEVICX, ASTQSDI3)) . (TYPEX, ASTOSDC+) ) 

90 EQUIVALENCE (LCARGl ,AST0SD(5) ) , (LCARG2,AST0S0(6)) 

91 EQUIVALENCE (L0C0EV,AST0SD(7n , (SIZREC. ASTOSDISI) 

95 EQUIVALENCE (RETCQD,AST0S0(9)) , (EOFCOO.ASTOSDdOI) 

93 EQUIVALENCE ( STATUS, ASTOSD( 1 I) ) , ( TAPERR, ASTOSD( 151) 

99 EQUIVALENCE (RSKCNT. AST0SD( 131) , (hM«IXF.ASTOSO( 19)) 

95 EQUIVALENCE (DEVTYP,ASTPKT( 1 ) ) , ( SECTOR, ASTPKT (2) ) 

96 EQUIVALENCE (QFC, PFNID) , (QFC(5) ,PFN) , (QFC(3) .PFNCY) 

97 C 

98 C DATA INITIALIZATION 

99 C 

50 DATA ASTDIM /16/ 

51 DATA (ASTCNT(J) , J=1 ,7) /7*0/ 

52 DATA (ASTEQC(J),J=1,16) /16*0/ 

53 DATA (ASTLFN(J),J=1,16) 

59 A /5LTAPE1, 5LTAPE2, 5LTAPE3, 5LTAPE9, 5LTAPE7, 5LTAPE8, 

55 B 5LTAPE9, 6LTAPE10.6LTAPE1 1 ,6LTAPE12,6LTAPE13,6LTAPE19, 

56 C 6LTAPE15,6LTAPE16,6LTAPE17,6LTAPE18/ 

57 DATA (AST0SD(J),J=1,19) /IH ,13‘0/ 

58 DATA (ASTPFN(J),J=1,16) /ID'O/ 

59 DATA (ASTSEC(J) ,J=1 ,8) /9*0,69,69 , 1 . 1 / 

60 DATA (ASTUNTU) ,U=1 , 16) 

61 A /I, 5, 3, 9, 7, 8, 9,10,11,15.13,19,15,16,17,18/ 

62 DATA (ASTYPE(J) ,J=1 . 16) /16*9/ 

63 DATA (ASTWXR(J) , >1 , 16) /16*0/ 

69 DATA (ASTWXW(J) ,J»1 , 16) /16*Q/ 

65 DATA PFNRP /30/ 

66 DATA DMERCD, DMERCM, DMERLC, DMERPM, lOMERH /5*0/ 

67 C 

68 C 

69 C INITIALIZATION/CHECKOUT CODE BLOCK 

70 C COMMON TO ALL ENTRY POINTS 

71 C 

72 100 CONTINUE 

73 ASSIGN 550 TO LJ DEVX 

79 150 CONTINUE 

75 DO 160 I -5,17 

76 ASTOSD(I) = 0 

77 160 CONTINUE 

79 DEVICX - ARGI 

79 LDl - DEVICX 

80 IF (LDl) 6100,6100, 180 

81 180 IF (LDl - ASTDIM) 500, 500,6100 

82 200 CONTINUE 

83 TYPEX • ASTYPE(LDl) - 9 

89 TYPIDX - TYPEX 

85 SECTOR = ASTSEC(TYPEXt5) 

86 EQCODE = ASTEQC(LDI) 


I 
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87 

68 

09 

90 

91 
96 
93 
9H 

95 

96 

97 

98 

99 

100 C 

101 C 
106 C 

103 

104 

105 

106 C 

107 C 
100 C 

109 €■ 

110 


NOZL 30 
LFN = 

PFN - 
PFNID 
OPTX = 
OPTXA = 

GO ro L. 

650 CONTINUt 

NEXT ^ 

LIMIT •• 
COLOC ■- 
LOCDFV 
LOCREC 
NEt-lOC 


DMGASP 
ASriFNlLDP 
ASTPFNUDI ) 
ASrOFRlLDl ) 
ASTOPTILDI 5 
lABS(OPTX) 

J OEVX, (65C 

AsrNxniDi I 
ASTI. IMfLOl I 
ASTI OCM.DI ) 

CDI OC 
lOlDfA • ! 

I OCRI 


1000, 1800) 


Vf PII \ 1)1- Vlu IS AL I [ VL 


IF llAKOi.if 
Gu 10 1 . 

800 CONllNiil 


lU, lO 
1 AMs. 


iGUlj, 


(.iiO 


10 6600 

3000. 3500. 4000) 


=ENTRY 

T'SaGL 

PURPOSE' 

USAGE 


DMDAS 

Gf'E SFi'IiON 3 1 Of 


1 1 1 

c 



1 1? 

c 

M + 4 t ♦ t 

M t 4 4 ++ f4-+ f 4 

1 13 


ENTRY 

OM 0 AS 

114 

C 

+ + + +4+4- + + 

44 44 + f+f + + -4 4' 

1 15 

c 



1 16 


I DOPER 

6HDMDAS1' 

1 17 


ASSIGN 1000 :0 LJ DC' 

118 


GO TO 150 


119 

1000 

CONTINUE 


120 

c 



121 

c 

IF DEVICE IS 

122 

C 



123 


ir (EQCooi: 

: .EQ. 0) 

124 


ASSIGN lino ro lj fi 

125 


GO TO 1900 

126 

1 100 

CONTINUE 


127 


EON( 1 1 = 

ARG5(1) 

128 


EDN121 = 

ARG6(B) 

129 


TYPEX = 

ARG3(1 1 

130 


OPTX ■■■■ 

ARG3(6) 

131 


OPTXA - 

lABS(OPTX) 

132 


LIMIT « 

ARG3(3) 

133 


IP (LIMIT 

.LE. 0) 

134 


REEL = 

ARG3(4) 

135 


IF (REEL . 

EQ. IH ) 

136 


SECTOR ■= 

ASTSEC(TYPE 

137 


NEXT • 

0 

138 

c 



139 

c 

IF EONAME IS 

140 

c 




E'NTRY 

DMGASr REF. MNANUAl . LMSC -D666839 
i.)fn.ARl iASSICN, OF’F.N) AN AUXILIARY STORAGE DEVICE 
Sl'.T. SLCMON 3.1 or DMGASP RI.T . MANUAL. LMSC-0666B39 


IF DEVICE IS CURRENTLY ACTIVE, CLOSE IT, THEN OPEN 
GO TO 1 100 


14-1 

146 

143 

144 

145 

146 

147 

148 

149 

150 

151 
156 

153 

154 

155 

156 

157 
156 

159 

160 
161 
166 

163 

164 

165 

166 

167 

168 

169 

170 

171 
176 
173 


CALL 


LIMIT = 666144 

REEL = 0 


lOM GFC (EDN, QFO 

BRANCH ACCORDING TO EQUIPMENT REQUEST INDEX 


NTRKS = 7 

IF fTYPEX+l) 


1600.1550.1400 


MAGNETIC TAPE DEVICE 


1500 


CONTINUE 
NTRKS = 9 

I CONTINUE 
RING = 0 

IF ( lABS(OPTX)-! ) 
1580 CONTINUE 

REEL = I 

CONTINUE 
RING = 1 

CONTINUE 
CALL 

GO TO 1600 


1650 


1300 

1360 


1680, 1300.1360 


lOM RMT (LFN, VRN, RING, 0. NTRKS. 0) 


C 

C 

C 

c 

c 

1400 


1460 


DIRECT ACCESS DEVICE 


CONTINUE 

LFN = ASTLFN(LDI) 

IF (PFN .EQ. 0) 

IF (REEL .NE. 0) 
CONTINUE 


GO TO 1460 

LFN = LFNZF(REEL) 
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: 74 

1 76 

177 

178 

179 

180 
’81 
18£? 

183 

184 

185 
188 

187 

188 

189 

190 

191 
;9c? 

193 

194 

195 

196 

197 
190 
199 

?ao 

c?C! 

coa 

903 

?04 

905 

2C6 

eo7 

c?08 

?09 
610 
ei 1 
61P 

613 

614 

215 

216 

217 

218 

219 

220 
221 
222 
r'^~j 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 

259 

260 


M0,'L3D - DMGASP 

C 

!F (TYF^EX - 2) 1440.7100,7100 

1m40 continue 
C 

C SECTOR-ADORCSSABLE MASS STORAGE 


c 

c 


c 

c 

c 


IE (OPTXA .LE. 2) GO TO 1500 

P"N V- ANOIPFN.-777777B) '.OR. PFNCY .OR. 64«PFNRP 

ASIPFN l.Dl ) ■■ PFN 

ATTACH PERM PILE TO RUN IF OPTX =3.4 


MODE OPTXA - 

I.MODE CT, C) 
li' (ASTSYS .NP, O; 
CAL L i OM APE 

•F ;.V^'''US. ME. Oi 
NEXT -• lOM PRvj 

1C iCjo 


GO TO 1450 
MODE = lABS(MODE) 
(LFN. PFN, PFNID, MODE) 

GO TO 7100 

'i.FN 


IF MEN PERM riLE REQUESTED (OPTX GT 5). ISSUE A 
rQi.‘-PMFNr REQUEST ON SCOPE. OR A DEFINE REQUEST ON NOS 


! 45C • i.CTTl I' 

ir fA/jr- 

^'■1 . ■ C Q) 

Mcr 

MODI OPT XA-t 

IF <ast; 

VO .ml. 0) 

IF 

'..iS ME n ) 

c 

r 

OPEN !JlL 


CALL lOM RPF (LFN) 

CALL lOM DPF ( LFN. , PFN . . MCT , 0) 
GO TO 7100 


1500 CONTtNU'' 

CAL! iOM OPN (I i N) 

C 

1550 CONTINUE 
1600 CONTINUE 
C 

C INSt.lvI UEVICE DESCRlPfORS IN AUX STORAGE TABLE 

r- 


c 

C TEMPORARY FIX TO OMGASP JAN1980 
C TO ALLEVIATE PROBLEM WITH CHANGE IN 
C EQUIPMENT COOES ON THE NOS SYSTEM 


DEVTYP^-1 
Asrpn-moi i 
AbroFRa.Di ) 
ASTPFNILDI ) 
ASTLENiLOI ) 
ASTEQCCLDI ) 
ASTYPE(LDI ) 
ASTOPT(LOI ) 
ASTLIMfLDl ) 
ASTLOCILDI ) 
ASTNXTfLDI ) 
ASTWXR(LD1 ) 
ASTWXW(LDl ) 
GO TO 5000 


LFN 

^ PFNID 
^ PF'N 
^ LFN 
DEVTYP 
= TYPEX + 4 
= OPTXA 
= LIMIT 
= 0 

-- NEXT 
= 0 
.r: 0 


C 

C=ENTRY OMFAST DMFAST ENTRY 

C=PURPOSE FREE (CLOSE, DEACTIVATE) AN AUXILIARY STORAGE DEVICE 
C*USAGE SEE SECTION 3.2 OF DMGASP REF. MANUAL. LMSC-D626839 
C 

C +T + + '<‘+ + + + + ++‘-f+- + +' + +4- + + + 


ENTRY DM F AST 

C ++++ + + ++ +++++ +++ ++++♦• + 

C 


I DOPER “ 6HDMFAST 
ASSIGN 5000 TO LJ FAST 

ASSIGN leoo TO U OEVX 

GO TO 150 
1800 CONTINUE 
C 

IF (AR0?(D) 1850,1900,1950 

C 

C EVICT CONTENTS OF FILE (ERASE! 

C 

1850 CONTINUE 

CALL IOM EVT (LFN) 

AS’'NXT(LOI) ‘■-■0 
GO TO 5000 


C 

C RELEASE file I- ROM JOB (FREE DEVICE). IF OPTX OE 5, 

C CATALOG NEW PERM FILE IF ON SCOPE. 

C 

1900 CONTINUE 

IF (ASTSYS .NE. 0) (30 TO 1930 
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IF (OPTXA .LE. ai GO TO 1930 

IF (OPTXA .GE. 5) GO TO I9E0 

IF (ASTWXW(LOI) .NE. 0) 

SCALE lOM EPF (LFN, PFN, 0, 0) 

GO TO 1930 
1990 CONTINUE 

PFNXR = 0 

CALL ION CPF (LFN. PFN, PFNID, PFNXRI 


IF (STATUS .NE, 01 
1930 CONTINUE 


GO TO 7100 


C CLOSE FILE 

C 

CALL lOM CLS (LFN) 

ASTEQC(LDI) = 0 
ASTPFN(LDI) = 0 

GO TO LJ FAST, (1100, 5000) 

C 

C PURGE PERMANENT FILE (OECATALOGUE) 

C 

1950 CONTINUE 

CALL lOM PPF (LFN, PFN, 0, 0) 

ASTEQC(LDI) = 0 
ASTPFN(LDI) = 0 
GO TO 5000 

C=ENTRY DMPAST DMPAST ENTRY 

C=PURPOSE POSITION AUXILIARY STORAGE DEVICE 

C=USAGE SEE SECTION 3.3 OF OMGASP REF. MANUAL, LMSC-D6e6839 
C 

C +++++-«-t + ++++++++++-++++ 

ENTRY DM P AST 

C 

I DOPER ■= 6HOMPAST 

ASSIGN 9500 TO LJ TASK 
GO TO 100 
9500 CONTINUE 

LCARGl « ARG9(1) 

LCARG9 « ARG3(1) „ 

IF (TYPEX ,GE. 0) 60 TO 9000 

C 

C POSITION MAGNETIC TAPE 

C 

C CALL lOM POT (LFN. LOCOEV, LCARGl, LCARG9) 

ASTLOC(LDI) • LOCOEV 

IF (STATUS) 6t00, 5000, 6400 

C 

C POSITION DIRECT ACCESS DEVICE 

C 

9900 CONTINUE 

CALL lOM POD (LOCDEV, LCARGl, LCARG9, SECTOR) 

IF (LOCOEV) 6500,9900,9900 

9900 IF (LOCOEV - LIMIT) 9950,9950.6500 

9950 ASTLOC(LDI) - LOCDEV 
GO TO 5000 
C 

C«ENTRY DMRAST DMRAST ENTRY 

C-PURPOSE READ RECORD FROM AUXILIARY STORAGE DEVICE 

C-USAGE SEE SECTION 3.4 OF OMGASP REF. MANUAL. LMSC-D696839 

C 

C ++++++++++++++++++++++ 

ENTRY DM R AST 

C ++++++++++++++++++++++ 

C 

IDOPER = 6HDMRAST 
ASSIGN 3000 TO LJ TASK 
GO TO 100 
3000 CONTINUE 

SIZREC - ARG3U) 

IF (SIZREC) 6600,6600,3100 

3100 CONTINUE 

IF (SECTOR ,EQ. 0) GO TO 3900 

NEWLOC • NEWLOC + (SlZREC-1 ) /SECTOR 
IF (NEWLOC - NEXT) 3900,3900,6700 

3900 CONTINUE 


READ DEVICE AND CHECK STATUS WORD 

CALL lOM RDR (LFN. ARG9, SIZREC, LOCREC, TYPEX) 

IF (STATUS ,GT. I) GO TO 7000 

UPDATE DEVICE STATE AND ACCOUNTING PARAMETERS 

ASTCNT(5) = ASTCNTI5) + 1 
ASTWXR(LOI) = ASTWXR(LDI) + SIZREC 
GO TO 3900 
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3't8 

3>f9 

350 

351 

352 

353 
35>t 

355 

356 

357 

358 

359 

360 

361 

362 

363 
36>t 

365 

366 

367 

368 

369 

370 

371 

372 

373 
37>t 

375 

376 

377 

378 

379 

380 

381 

382 

383 
38>f 

385 

386 

387 

388 

389 

390 

391 

392 

393 
39<* 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 

434 


N0ZL30 - DMGASP 

C 

C=ENTRY DMWAST DMWAST ENTRY 

C=PURPOSE WRITE RECORD ON AUXILIARY STORAGE DEVICE 

C=USAGE SEE SECTION 3.5 OF DMGASP REF. MANUAL, LMSC-0626839 

C 

c ++++++++++++++++++++++ 


c 

c 


3500 


3550 


C 

C 

C 

C 


ENTRY DM W AST 

++++++++++++++++++++++ 


1 DOPER » 6HDMWAST 
ASSIGN 3500 TO LJ TASK 
GO TO 100 
CONTINUE 

SIZREC « ARG3(1) 

IF (SIZREC) 6600,6600,3550 

CONTINUE 

IF (OPTXA .EQ. 3) GO TO 6900 

IF (SECTOR .EQ. 0) GO TO 3800 

NEWLOC = NEWLOC + (SlZREC-1 ) /SECTOR 
IF (NEWLOC .GT. LIMIT) GO TO 6800 

IF (TYPEX ,EQ. 3) GO TO 3800 


IF RECORD IS TO BE WRITTEN BEYOND CURRENT EOI ON 
MASS STORAGE DEVICE. EXTEND EOI BY DUMMY WRITES 


MORE = LOCDEV - NEXT 

IF (MORE) 3800.3700,3600 

3600 CONTINUE 

CALL lOM XEI (LFN, MORE) 

3700 CONTINUE 

LOCREC = 0 

3800 CONTINUE 

CALL lOM WTR (LFN, ARG2, SIZREC, LOCREC, TYPEX) 

IF (STATUS .GT. 1) GO TO 7000 

C 

C UPDATE DEVICE STATE AND ACCOUNTING PARAMETERS 


ASTCNT(4) = ASTCNTI4) + 1 
ASTWXW(LDI) = ASTWXW(LDI) + SIZREC 
3900 CONTINUE 

ASTLOC(LDl) = NEWLOC 
ASTNXT(LDI) = MAXO (NEWLOC, NEXT) 

ASTCNT(6) = ASTCNT(6) + SIZREC 

ASTCNT(7) = ASTCNT(7) + NWRDXF 

GO TO 5000 
C 

C=ENTRY DMEAST DMEAST ENTRY 

C=PURPOSE WRITE EOF ON MAGNETIC TAPE 

C=USAGE SEE SECTION 3.6 OF DMGASP REF. MANUAL, LMSC-D626839 
C 


ENTRY DM E AST 

C 


4000 

C 

C 

C 

c 

c 

c 

c 

c 

c 

c 


c 

c 


I DOPER = 6H0MEAST 
ASSIGN 4000 TO LJ TASK 
GO TO 100 
CONTINUE 


WRITE TWO END-OF-FILE MARKS AND BACKSPACE TAPE 
OVER LAST ONE 

CALL WRTEOF (LFN) 

CALL WRTEOF (LFN) 

CALL eSKIPF (LFN, 1) 

UPDATE DEVICE LOCATION 

LOCDEV = AND (LOCDEV, 7700006) + lOOOB 
ASTLOC(LDI) = LOCDEV 
ASTNXT(LOI) • LOCDEV 
GO TO 5000 


C-ENTRY (3MLAST OMLAST ENTRY 

C'PURPOSE LIST lOM INFORMATION 

C=USAGE SEE SECTION 3.7 OF DMGASP REF. MANUAL, LMSC-D626839 
C 

c +++♦++++++++++++++++•»■+ 


ENTRY DM L AST 


C 

c 


IF (ARGI .NE. 0) 

IF (AROaU) .NE. 0) 
IF (ARG3(1) .NE. 0) 
GO TO 5000 


CALL lOM OSD 
CALL lOM FET 
CALL lOM TAB 
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t35 

C=6NTRY DMNAST OMNASr ENTRY 

H36 

C=PURPOSE CHANGE INTERNAL FILE NAME(S) 

437 

C=USAGE SEE SECTION 5.9 OF DMGASR REF. MANUAL, LMSC-D696839 

438 

c 


439 

C 

++++++-»‘++++<f+ ++++4-+-»"f+ 

440 


ENTRY DM N AST 

441 

c 

+++++++-M-++ +++++++ + + + 4 

449 

c 


443 


ASTLFN(LDI) = LFN2F(ARG3(1). AND. MASK (491) 

444 


NLDI « ARG2(I) - 1 

445 


IF (NLDI .LE. 0) GD TO 5000 

446 


DO 4600 J = 1 .NLDI 

447 

4600 

ASTLFN(LDI+J) » LFNINC(ASTLFN(LDH-J-1 1 1 

448 

C 


449 

5000 

CONTINUE 

450 


RETURN 

451 

c 


459 

c 


453 

c 

ERROR EXITS 

454 

c 


455 

c 


456 

c 

illegal device INDEX 

457 

c 


458 

6100 

lOERCD = 1 

459 


GO TO 0000 

460 

c 


46! 

c 

ATTEMPT TO POSITION, READ OR WRITE INACTIVE DEVICE 

469 

c 


463 

6200 

lOERCD = 2 

464 


GO TO 8000 

465 

c 


466 

c 

RESERVED ERROR CODE 

467 

c 


468 

C63Q0 

lOERCD = 3 

469 

c 

GO TO 8000 

470 

c 


471 

c 

ILLEGAL TAPE POSITIONING 

476 

c 


473 

6400 

lOERCO = 4 

474 


GO TO 8000 

475 

c 


476 

c 

ILLEGAL MASS STORAGE / ECS POSITIONING 

477 

c 


470 

6500 

lOERCO » 5 

479 


GO TO 8000 

480 

c 


481 

C 

ILLEGAL RECORD SIZE 

489 

c 


483 

6600 

lOERCO « 6 

484 


GO TO 8000 

485 

C 


406 

c 

ATTEMPT TO READ MASS STORAGE AREA BEYOND EDI 

487 

C 


488 

6700 

lOERCD = 7 

409 


GO TO 8000 

490 

C 


491 

C 

DEVICE OVERFLOW ON WRITE OP 

492 

c 


493 

6800 

lOERCD = a 

494 


ASTLIMILOn » -ASTLIM(LDI) 

495 


GO TO 8000 

496 

c 


497 

c 

ATTEMPT TO WRITE ON PROTECTED FILE 

498 

c 


499 

6900 

lOERCD « 9 

500 


GO TO 8000 

501 

c 


509 

c 

MISCELLANEOUS ERROR DETECTED BY I/O HANDLER 

503 

c 


504 

7000 

lOERCD = 10 

505 


GO TO 8000 

506 

c 


507 

c 

UNABLE TO HONOR CONTROL CARD REQUEST 

508 

c 


509 

7100 

lOERCD * 11 

510 


GO TO 8000 

511 

c 


519 

c 

CONTROL CARD FORMAT ERROR 

513 

c 


514 

C7200 

CONTINUE 

515 

C 


516 

C 

POSTMORTEM ERROR PROCEDURE 

517 

c 


518 

8000 

CONTINUE 

519 


IF (lOMERH - 1) 5000,8500,8500 

590 

8500 

CONTINUE 

591 


CALL lOM OSD 
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58a 

IF (lOERCD .GE. 10) 

CALL 

523 

IF (lOMERH .GE, 2) 

CALL 

52^ 

IF (lOMERH .GE. 3) 

CALL 

525 

CALL lOFATE 


526 

GO TO 5000 


527 

END 



lOM FET 
lOM TAB 
DM ABRT 
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1 

•DECK 

lOMCIO 



a 

• =DECK 

lOMClO 

lOMCIO ASSEMBLY 


3 


I DENT 

lOMCIO 


H 


TITLE 

COMBINED INPUT/OUTPUT FUNCTIONS 




SPACE 

3 


6 

•CALL 

lOMACTL 



7 


IFEQ 

OS, NOS • 


8 


«4«4««*4<«««««444 

(NOS) 

9 

• EXTERNAL TEXT 

COMMON DECKS • 

(NOS) 

10 



4«44«««#««««««444 

(NOS) 

1 1 

* 

LIST 

X 4 

(NOS) 

\a 


XTEXT 

COMCCIO * I/O REQUEST PROCESSOR 

(NOS) 

13 


XTEXT 

COMCLFM • LOCAL FILE MANAGER REQUESTS 

(NOS) 

IH 


XTEXT 

COMCSYS • SYSTEM REQUEST ROUTINES 

(NOS) 

15 


END IF 

4 


16 


4««*««<4t<444«4«4<«*«<«<««4« 


17 

COMMON 

SPACE 

2 


IB 

**♦ 

COMMON BLOCK DECLARATIONS 


19 





50 

* 




51 

• ^PROCEDURE CDMASTA CDMERRA CDMETSA 


52 

•CALL 

CDMASTA 


23 

•CALL 

CDMERRA 


24 


USE 

/COMPAQ/ 


25 

Burs 1 2 

SET 

300B 


56 

0UEPRU 

SET 

8UFSIZ/100B 


57 

CMSIZ 

BSSZ 

I CURRENT CM FL 


28 

BCSIZ 

BSS 

1 BLANK COMMON SIZE 


29 

REQCM 

BSS 

1 REQUESTED CM FL 


30 

LWAREC 

BSS 

I 


31 

PAD 

BSS 

0 


32 

PADDING 

BSS 

0 


33 

BUFEER 

BSS 

BUFSIZ UTILITY BUFFER AREA 


34 


USE 

// 


35 

BCFWA 

BSS 

1 


36 

* 




37 


USE 

0 


38 


SPACE 

3 


39 

SYSREQ 

TITLE 

MISCELLANEOUS SYSTEM ACTION REQUESTS 


40 

«««««««» 

4<<4444<44< 

44444<««<«4<«4<4«4<f4«44«««««4«t4f4444444444444 

4 4 4 4 4 4 

41 

* 



4 

45 

4 

MISCELLANEOUS REQUESTS ISSUED TO MONITOR 

4 

43 

4 



4 

44 

4 

AUTHOR - 

C. A, FFLIPPA, NOV 1975 

4 

45 

• 

UPDATE - 

OCTOBER 1977 (SCOPE/NOSI 

4 

46 

* 



4 

47 


44444«<44«4 


4 4 4 4 4 4 

48 

9 



4 

49 

• 

AN ENTRY POINT SUMMARY FOLLOWS. 

4 

50 




4 

51 

• 

DMABRT 

CAUSES ERROR TERMINATION OF JOB 

< 

5? 

4 



4 

53 

■* 

DMCLOK 

RETURNS CURRENT READING OF SYSTEM CLOCK IN 

4 

54 

* 


DISPLAY CODE FORMAT HH.MM.SS 

4 

55 

4 



4 

56 

4 

DMCMFL 

TO ADJUST CENTRAL MEMORY FIELD LENGTH (CM FL 1 

4 

57 

• 


OR TO REQUEST INFORMATION ON CURRENT CM FL . 

4 

58 




4 

59 

• 

DMCMFLS 

COMPASS-CALLABLE. REGISTER-RESTORING VERSION 

4 

60 

4 


OF DMCMFL. 

« 

61 

4 



4 

62 

• 

DMDATE 

RETURNS CURRENT DATE IN DISPLAY CODE FORMAT 

4 

63 

• 


MM/DD/YY AND CLOCK READING HH.MM.SS 

4 

64 

« 



4 

65 

4 

OMRUNT 

RETURNS CP TIME USED BY JOB. ON SCOPE, IT 

4 

66 

4 


ALSO RETURNS 10 TIME AND CP TIME LIMIT. 

4 

67 

« 



4 

68 

*<l«444«« 

4i>444444<4« 

4*44<444444444«44«4444««4«4444««444«4«4«<4«44«4«4«(4 

69 

DMABRT 

SPACE 

2 


70 

4 4* 

DMABRT 



7! 

4 




72 

4 

ENTRY POINT TO FORCE ABNORMAL JOB TERMINATION 


73 

4 




74 

4 

fortran REFERENCES. 


75 

4 




76 

4 

CALL 

DMABRT 


77 

4 




78 


ENTRY 

DMABRT 


79 

DMABRT 

BSS 

1 ENTRY POINT 


80 


ABORT 

L ASCI ATE OGNl SPERANZA 


81 

4 


VOl CHE ENTRA TE 


82 

DMCLOK 

SPACE 

2 


03 

4 < 4 

DMCLOK a 

ME) 


84 

4 




95 

4 

ENTRY POINT TO READ SYSTEM CLOCK 


86 

* 





I 
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lOMCIO 



87 


CALL 

DMCLOK (TIME) 



88 

« 





89 

« 

TIME 

CURRENT CLOCK READING IN DISPLAY CODE FORMAT 


90 

« 


HH.MM.SS (OR ♦HH.MM.SS IF ELAPSED TIME SINCE 


9t 

* 


DEADSTART IS 

RETURNED) 


92 

« 





93 


ENTRY 

DMCLOK 



9H 

DMCLOK 

BSS 

1 



95 


BX5 

XI 

(X5) = ADORESS(TIME) 

(FTN) 

96 


SBl 

I 



97 


CLOCK 

TIMLOC 

CLOCK MACRO 


98 


SAI 

TIMLOC 



99 


BX6 

XI 



too 


SAG 

X5 

STORE TIME 


101 


EQ 

DMCLOK 

RETURN TO CALLING PROGRAM 


102 

TIMLOC 

EQU 

PAO+ITitB 



103 

DMCMSZ 

SPACE 

2 



10^ 


DMCMSZ 

(REQCM, CMSIZ, 

BCSIZ) 


105 

• 





106 

« 

ENTRY POINT TO MODIFY 

CENTRAL MEMORY FIELD LENGTH, OR 


107 

< 

TO GET 

INFORMATION ABOUT CM FIELD LENGTH, 


108 

* 





109 

* 

FORTRAN REFERENCE - 



110 

* 





111 

* 

CALL 

DMCMSZ (REQCM, CMSIZ, BCSIZ) 


112 






113 


WHERE 




1 






115 

« 

REQCM 

DESIRED NEW 

CM FL IN WORDS IF REQUESTING CORE 


1 16 

« 


EXPANSION OR 

CONTRACTION. ZERO TO REQUEST 


117 



INFORMATION 

ABOUT CURRENT CMSIZ/BCSIZ. 


lie 

« 





119 

« 

CMsrz 

CENTRAL MEMORY FL ON EXIT FROM THIS ROUTINE. 


120 

« 


IF REQCM GT 

0, AND THE REQUEST IS SUCCESSFUL, 


121 

« 


CMFL IS REQCM ROUNDED UP TO NEAREST lOOB MULTIPLE. 

122 

* 





123 

* 

BCSIZ 

BLANK COMMON 

1 SIZE ON COMPLETION OF REQUEST. 


124 

« 





125 


ENTRY 

DMCMSZ 



126 

DMCMSZ 

BSS 

1 

ENTRY/EXIT POINT 


127 


SB7 

1 

(B7) = 1 


128 


SA2 

A1+B7 

(XB) = ADDRESS! CMSIZ) 

(FTN) 

129 


SAI 

XI 

(XI) = REQCM 

(FTN) 

130 


MXO 

-180 


(FTN) 

131 


SA3 

A2+B7 

(X3) = ADDRESS(BCSIZ) 

(FTN) 

132 


BX6 

-X0*X1 

LIMIT REQCM TO B**IB-I 


133 


LX7 

X3 

(X7) - ADDRESS (BCSIZ) 


134 


BXl 

X6 

KEEP REQCM IN (XI) 


135 


SA6 

REQCM 

SAVE REQCM ON COMMON BLOCK 


136 


LX6 

30D 



137 


SA6 

MEMREQ 

SET UP REQUEST WORD 


138 


SB6 

B7+B7 

(B6) = 2 


139 


BX6 

X2 

(X6) - ADDRESS! CMSIZ) 


140 


SA7 

A6+B6 

SAVE ADDRESS! BCSIZ) 


141 


SA6 

A6+B7 

SAVE ADDRESS (CMSIZ) 


142 


ZR 

XI. DMCMSZ 1 

SKIP PRINT IF REQCM=0 


143 


SA5 

RFLMESS+1 



144 


RJ 

=XNC0CTL$ 

ENCODE REQCM INTO (X6) 


145 


SA4 

RFLMESS 



146 


SA6 

ASTMSG+2 

SET ASTMSG(3) 


147 


LX7 

X5 



148 


BX6 

X4 



149 


SA7 

A6-B7 

SET ASTMSG(B) 


150 


SA6 

A7-B7 

SET ASTMSG(I) 


151 


RJ 

«XI0MESSG 

PRINT REQUESTED CML MESSAGE 


152 

DMCMSZ 1 

BSS 

0 



153 


SBl 

1 



154 


MEMORY 

CM. MEMREQ, R, ,1 MEMORY MACRO 


155 


SAI 

MEMREQ 

(XI) =■ REQUEST/REPLY WORD 


156 


SB4 

BCFWA 

(S'*) . FWA OF BLANK COMMON 


157 


SA2 

Al+Bl 

(X2) <= ADDRESS (CMSIZ) 


158 


MXO 

-180 



159 


AXl 

30D 

RIGHTADJUST CURRENT FL 


160 


SA3 

A2+B1 

(X3) ■= ADDRESS(BCSIZ) 


161 


SB4 

Bl-B^f 



162 


SB6 

Bl+Bl 

(B6) = 2 


163 


BX6 

-X0*Xl 

(X6) = CMSIZ = CURRENT CM FL 


164 


SX7 

X6+B4 

(X7) = BCSIZ ■= CMSIZ-BC(O) 


165 


SA4 

NFLMESS 



166 


SA6 

CMSIZ 

STORE CMSIZ IN /CDMPAD/ 


167 


SA5 

A4+B1 



168 


SB4 

X7 

SAVE BCSIZ IN (B't) FOR PRINT 


169 


SA7 

A6+B1 

STORE BCSIZ IN /CDMPAD/ 


170 


SA6 

X2 

STORE CMSIZ IN BND ARG OF DMCMSZ 

171 


SA7 

X3 

STORE BCSIZ IN 3RD AR(3 OF DMCMSZ 

172 


BX6 

X4 



173 


SA6 

ASTMSG+1 

PLACE TEXT IN ASTMSG(2) 
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174 


LX7 

X5 


175 


SA7 

A6*B6 

PLACE TEXT IN ASTMSG(4) 

176 


RJ 

*XNCOCTL$ 

OCTAL ENCODE CMSIZ IN (X6) 

177 


SA6 

A7-BI 

PLACE ENCODED CMFL IN ASTMSG(3) 

178 


SXl 


(XI) = BCSIZ 

179 


RJ 

=XNCOCTL$ 

OCTAL ENCODE BCSIZ IN (X6) 

180 


SA6 

A7+B1 

PLACE ENCODED BCSIZ IN ASTMSG(5) 

181 


RJ 

“XIOMESSG 

PRINT INFORMATIVE MESSAGE 

186 


EQ 

DMCMSZ 

RETURN TO CALLING PROGRAM 

183 

MEMREQ 

EQU 

PAD+170B 


184 

RTLMESS 

DIS 

8,0t++ REQ CMSIZt 

185 

NFLMESS 

DIS 

a. JOB CMSize.. 

BC SIZES 

186 

DMCMSZS 

SPACE 

a 


187 

*«« 

DMCMSZS 



188 

« 




189 

« 

COMPASS- 

-CALLABLE, REGISTER-RESTORING, GROIN-KICKING 

190 

« 

VERSION 

or DMCMSZ. 


191 

« 




196 

« 

COMPASS 

REFERENCE - 


193 

« 




194 

« 

(X7) = 

REQCM (SEE DMCMSZ) 

195 

« 

RJ 

GETCMLS 


196 

« 




197 


REGISTER UTILIZATION - 


198 

« 

ENTRY REGISTER SET ASSUMED - (BI)*(B7)«l, (B6)»S 

199 

« 

XI ,X6,A1 ,A8,A3,A4,A5,A6 

A7 DESTROYED 

800 

« 

XO.XS.XS.X^.XS.BS.BS.B^t.BS PRESERVED 

601 

« 

(B1).(B6).(B7) RESTORED 

TO 1,8,1, RESPECTIVELY. 

606 


(XI) = CMS 12 = CURRENT CM FL ON RETURN FROM DMCMSZS. 

603 





604 


ENTRY 

DMCMSZS 


505 

DMCMSZS 

assz 

I 


506 


SA7 

REQCM 

STORE (X7) IN REQCM WORD 

507 


SB7 

I 


608 


LX6 

X5 


809 


8X7 

XH 


510 


SA6 

SAVE+l 

(X5) TO SAVE+l 

811 


SB6 

S7+B7 


616 


SA7 

A6+B7 

(X4) TO SAVE+8 

613 


BX6 

X3 


814 


LX7 

xa 


515 


SA6 

A6^B6 

(X3) TO SAVE+3 

816 


BX6 

xo 


517 


SA7 

A7+B6 

(X8) TO SAVE+4 

818 


SA6 

A6-*-B6 

(XO) TO SAVE+5 

819 


SX6 

B5 


680 


SX7 



681 


SA6 

A6+B7 

(B5) TO SAVE+6 

568 


SX6 

B3 


563 


SA7 

A6+07 

(B4) TO SAVE+7 

684 


SX7 

sa 


665 


SA6 

AB-t’Se 

(B3) TO SAVE+B 

866 


SA7 

A7+B6 

(B8) TO SAVE+9 

587 


SAl 

REQCMADS 

(Al) POINTS TO ARG ADS LIST 

668 


RJ 

DMCMSZ 

EXECUTE DMCMSZ 

869 


SB7 

I 

ra;STORE (B7) • 1 

630 


SAl 

SAVE+9 


531 


SB6 

B7+B7 

RESTORE (B6) • 6 

838 


SA8 

AI-B7 


833 


SA3 

AI-B6 


834 


SA4 

Aa-BS 


835 


SB8 

XI 

RESTORE (B8) 

636 


SAl 

AH-B7 


837 


SB3 

xa 

RESTORE (B3) 

838 


SAB 

A1-B7 

RESTORE (X8) 

839 


SS4 

X3 

RESTORE (B4) 

640 


SA3 

A3-B7 

RESTORE (X3) 

841 


SB5 

XH 

RESTORE (B5) 

648 


5A4 

A3-87 

RESTORE (X4) 

843 


BXO 

XI 

RESTORE (XO) 

844 


SAl 

CMSIZ 

(XI) • CMSIZ ON RETURN 

845 


SA5 

Aif-87 

RESTORE (X5) 

846 


SBl 

B7 

RESTORE (01) • 1 

847 


EQ 

DMCMSZS 

RETURN 

840 

SAVE 

EQU 

PADOING+IOOB 


849 

REQCMADS 

VFD 

i+a/0,I8/REQCM 

ADDRESS (REQCM) 

850 

CMSIZADS 

VFD 

ifa/o,i0/CMsiz 

ADDt«:SS(CMSIZ) 

851 

BCSIZADS 

VFD 

‘ta/0,18/BCSIZ 

ADDRESS(BCSIZ) 

858 

DMCONV 

SPACE 

a 


853 

««« 

DMCONV 



854 

4 




855 


ENTRY 

DMCONV 


856 

DMCONV 

BSS 

I 


857 


SX6 

1 


858 


SAB 

DMERCM 


859 


EQ 

DMCONV 



860 * 


(FTN) 
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86 1 

DMDATE 

SPACE 

8 



868 

*<4 

DMDATE 

(DATIM) 



863 






ee** 

« 

ENTRY POINT TO RETRIEVE CURRENT DATE AND TIME 


865 

« 





866 

t 

CALL 

DMDATE (DATIM) 



867 

« 





868 

« 

DATIM 

A TWO-WORD ARRAY. CURRENT DATE WILL BE 


869 

« 


RETURNED IN DATIM(l) IN DISPLAY CODE FORMAT 


870 

« 


MMDDYY LEFTJUSTIFIEO WITH BLANK FILL. 


871 

« 


THE CURRENT TIME WILL BE STORED IN DATIM(S) 


878 

« 


IN FORMAT HHMMSS ALSO LEFTJUSTIFIED BLANKFILLED. 

873 






871* 


ENTRY 

DMDATE 



875 

DMDATE 

BSSZ 

1 

ENTRY/EXIT POINT 


876 


BX5 

XI 

(X5) » ADDRESS(DATIM) 

(FTN) 

877 


5B1 

1 

(Bl) = 1 


870 


DATE 

TIMLOC 

DATE MACRO 


879 


CLOCK 

TIMLOC+1 

CLOCK MACRO 


880 


SAl 

TIMLOC 



881 


SAif 

«HR 



888 


MXO 

la 



883 


sea 

6 



88‘t 


LXl 

6 



885 


Lxa 

Ba,xi 



886 


BXl 

X0*Xl 



887 


LX3 

Ba,xa 



888 


LXO 




889 


BX2 

xo^»xa 



890 


LXO 

H8 



891 


BX3 

X0*X3 



898 


BX6 

xuxa 



893 


SAl 

Al+Bl 



891* 


BX6 

X6+X3 



895 


BX6 

X6+X‘* 



896 


MXO 

la 



897 


SA6 

X5 

STORE DATIM(I) 


898 


LXl 

6 



899 


Lxe 

Ba,xi 



300 


LX3 

Ba.xa 



301 


6X1 

X0*X1 



308 


LXO 

48 



303 


Bxa 

xo«xa 



30** 


LXO 

48 



305 


BX3 

X0*X3 



306 


BX7 

xi+xa 



307 


BX7 

X7+X3 



308 


BX7 

X7+X4 



309 


SA7 

X5+B1 

STORE DATIM(8) 


310 


EQ 

DMDATE 

RETURN TO CALLING PROGRAM 


311 

DMFATE 

SPACE 

a 



318 

««« 

DMFATE 




313 

« 





31** 


ENTRY 

DMFATE 



315 

DMFATE 

BSS 

1 



316 


SAa 

DMSERRJ 



317 


SAl 

DMSERRL 


(FTN) 

318 


MXO 

-18 



319 


Bxa 

-xo^xa 



380 

DMSERRJ 

ZR 

Xa^DMABRT 

DIRECT ABORT IF NO USER-SPEC ROUTINE 

381 


RJ 

0 

TRANSFER TO DMTERM-SPECIFIED 

ENTRY 

388 

DMSERRL 

VFD 

4a/O.10/*3HDMS 



383 


VFO 

4a/O,10/DMERCO 



384 

DMHAST 

SPACE 

a 



385 

««« 

DMHAST 

(lERH, UPGERR, 0) 


386 

* 





387 


ENTRY 

DMHAST 



388 

DMHAST 

BSS 

1 



389 


SAP 

Al + 1 


(FTN) 

330 


SAl 

XI 

(XI) * lERH 

(FTN) 

331 


MXO 

-18 



338 


SA5 

lOMERRJ 



333 


BX7 

XI 



334 


SA3 

X8 

(X3) ■= VALUE (UPGERR) 


335 


BX6 

X0*X5 

MASK OUT BJ ADDRESS FIELD 


336 


SA7 

lOMERH 

SET lOM ERROR HANDLING FLAG 


337 


SA6 

A5 



338 


ZR 

X3, DMHAST 

EXIT IF ZERO SECOND ARGUMENT 


339 


Bxa 

-X0*X8 



340 


BX6 

X6+X8 



341 


SA6 

A6 

STORE TRANSFER TO UPGERR 


348 


EQ 

DMHAST 



343 






344 

DMRUNT 

SPACE 

8 



345 

««« 

DMRUNT 

(CPTIME, lOTIME, 

CPTLIM) 


346 

« 





347 

4 

ENTRY POINT TO OBTAIN PROGRAM TIMING INFORMATION 



PAGE 107 


N0ZL30 - 


lOMCIO 


34B 





3't9 

« 

CALL 

DMRUNT (CPTIME, lOTlME. TIMLIM) 

350 





351 

« 

CPTIME 

ELAPSED CP 

TIME IN F.P. SECONDS 

35B 

* 




353 

f 

lOTIME 

ELAPSED I/O 

TIME IN F.P. SECONDS 

35t 

« 




355 

« 

TIMLIM 

JOB CP TIME 

LIMIT IN F.P. SECONDS 

356 





357 


ENTRY 

DMRUNT 


358 

DMRUNT 

assz 

1 


359 


SB7 

1 


360 


SAP 

AI+B7 

(FTN) 

361 


SBl 

X! 

(FTN) 

368 


SA3 

AB+B7 

(FTN) 

363 


SB8 

XB 

(FTN) 

3611 


SB3 

X3 

(FTN) 

365 


MX6 

0 


366 


SB! 

B7 


367 


SA6 

TIMLOC+1 


368 


TIME 

TIMLOC 

GET TIME LIMIT, AND CP TIME 

369 


IFEQ 

OS, SCOPE 


370 


lOTIME 

TIMLOC+1 

GET 10 TIME (SCOPE) 

371 


ENOIF 



378 


SAI 

TIMLOC 

(XI) = 84/CPTLIM,36/CPTlME(SEC,MSEC) 

373 


MXO 

BHD 


3711 


SAB 

A1+B7 

(X8) = 84/10TLIM,36/I0TIME(SEC,MSEC) 

375 


BX6 

X0«X1 

(X6) = ISOLATED TIMLIM FIELD 

376 


6X1 

“XO+Xl 

CLEAR CPTLIM FIELD 

377 


LX6 

BHD 


378 


BXB 

-X0*XB 

CLEAR lOTLIM FIELD 

379 


MXO 

-IBD 


380 


PX6 

X6 


381 


NX6 

X6 


388 


BX3 

-X0«X1 

(X3) • CPTIME MSEC (INTEGER) 

383 


BXi+ 

-X0»XB 

(X4) = lOTIME MSEC (INTEGER) 

38‘> 


SA6 

B3 

STORE CP TIME LIMTI 

385 


SX5 

lOOOD 


386 


AXl 

IBO 

RIGHT JUSTIFY CPTIME SECS 

387 


AX2 

IBD 

RIGHTJUSTIFY lOTIME SECS 

398 


OX! 

XMX5 

(XI) » CPTIME SECS TO MILLISEC 

389 


oxs 

xe*x5 

(XI) - lOTIME SECS TO MILLISEC 

390 


SA5 

>0.001 

(X5) = MSEC TO SEC CONV FACTOR 

391 


IXl 

X1+X3 


398 


ixa 

XB+XH 


393 


PXl 

X! 


39‘f 


pxe 

XB 


395 


NXl 

XI 


396 


NXB 

XB 


397 


RX6 

XMX5 


398 


RX7 

XS«X5 


399 


SAB 

BI 

STORE ELAPSED CP TIME (F.P. SECS) 

ifOO 


SA7 

BB 

STORE ELAPSED 10 TIME (F.P. SECS) 

Ml 


EQ 

DMRUNT 

RETURN TO CALLING PROGRAM 

>t08 

DMTERM 

SPACE 

B 


t03 

« 




HO'* 

««« 

DMTERM 

(UPGERR) 


405 

« 




406 


ENTRY 

DMTERM 


407 

DMTERM 

BSS 

1 


408 


SAB 

DMSERRJ 


409 


MXO 

-18 


410 


BXB 

X0«XB 


411 


BX6 

Xl+XB 


418 


SAB 

AB 


413 


EQ 

DMTERM 


414 

DMUSER 

SPACE 

B 


415 

««« 

DMUSER 

(NAME) 


416 

« 




417 


ENTRY 

DMUSER 


418 

DMUSER 

BSS 

1 


419 


SAI 

XI 

(FTN) 

480 


BXB 

XI 


481 


SAB 

TRSTAK 


488 


EQ 

DMUSER 


483 

I OF ate: 

SPACE 

B 


484 

««« 

lOFATE 



485 

« 




486 


ENTRY 

I OF ATE 


487 

I OF ATE 

BSS 

I 


488 


SAB 

lOMERRJ 


489 


SAI 

lOMERRL 

(FTN) 

430 


MXO 

-18 


431 


BXB 

-X0*XB 


438 

lOMERRJ 

ZR 

XB. lOFATE 

RETURN IF NO USER-SPECIFIED ROUTINE 

433 


RJ 

0 

ELSE JUMP TO IT 

434 


EQ 

lOFATE 



I 
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•+36 

t37 

■+38 

't39 

4-tO 

‘♦tl 

'♦‘♦3 

tW 

10M5RRL 

« 

«««««««« 

* 

* . . 

* 

< 

« 

VFD 45/0, ie/=3HIOM 

VFD 45/0, 10/DME:RCD 

TITLE PROCEDURES FOR PHYSICAL DATA TRANSMISSION 

*«•««««•«««««*««« 4 «*4«« ««««««««« 

PROCEDURES INVOLVING ACTUAL DATA TRANSFER BETICEN • 

CENTRAL MEMORY AND AUXILIARY STORAGE ^ 

AUTHOR - C. A. FELIPPA, SEPT. 1975 * 

UPDATE - NOVEMBER 1977 # 






‘t't? 

« 



« 

tts 

« 

ENTRY POINT SUMMARY - 

« 

4^9 




4 

tso 

* 

lOMEOF 

WRITES AN ENO-OF-FILE MARK 

4 

>+51 

* 



4 

't5S 

t 

lOMPRU 

GET MASS STORAGE FILE SIZE (IN PRUS) 

§ 

^t53 

* 



4 

^54- 

* 

lOMRDR 

TRANSFERS A DATA BLOCK (RECORD) FROM AN AUX 

4 

455 



STORAGE DEVICE CHARACTERIZED BY A DMGASP DEVICE 

4 

456 

« 


TYPE INDEX. TO MAIN STORAGE. (ALT ENTRY ROMS 

4 

457 



ASSUMES SECTOR-ADDRESSABLE MASS STORAGE) . 

4 

450 

• 



4 

459 


lOMWTR 

TRANSFERS A DATA BLOCK (RECORD) FROM MAIN 

4 

460 



STORAGE TO AN AUX STORAGE DEVICE CHARACTERIZED 

4 

761 

* 


A DMGASP DEVICE TYPE INDEX. (ALT ENTRY WTMS 

4 

762 



ASSUMES SECTOR-ADDRESSABLE MASS STORAGE.) 

4 

463 

* 



4 

464 

t 

lOMXEI 

EXTENDS EOI BY WRITING DUMMY PRUS 

4 

465 

« 



4 

466 




4444 

467 

lOMEOF 

SPACE 

5 


466 


lOMEOF 

(LFN) 


469 

< 




470 

t 

WRITE AN END-OF-FILE MARK AT CURRENT DEVICE POSITION 


47 1 

* 




475 


FORTRAN 

REFERENCE - 


473 

* 




474 

* 

CALL lOMEOF (LFN) 


475 





476 

• 

WHERE 



477 

« 




478 

* 

LFN 

LOGICAL FILENAME 


479 

* 




480 


ENTRY 

lOMEOF 


481 

lOMEOr 

BSSZ 

1 


485 


SX5 

0 1 07B R-BI T=0 , EP-B I T= I , XP-BI T=0 . FETL=7 


483 


MX4 

0 


484 


SX3 

Xa DUMMY BUFFER ADDRESS 


485 


MX5 

0 


486 


SX6 

BO 


487 


RJ 

=XFETSET$ ESTABLISH FET 


488 


WRITEF 

FET.R WRITE W/EOF MACRO 


489 


RJ 

=XFETRETS GET RET/AT CODES 


490 


EQ 

lOMEOF RETURN TO CALLING PROGRAM 


491 

lOMPRU 

SPACE 

5 


79a 

««« 

lOMPRU 

(LFN) 


493 

* 




494 

* 

OBTAIN LENGTH OF MASS STORAGE FILE IN PRUS 


495 

• 




496 

* 

FORTRAN 

REFERENCE - 


497 

* 




498 

* 

NPRU = 

lOMPRU (LFN) 


499 

« 




500 

« 

WHERE 



50! 





5oa 


LFN 

LOGICAL FILENAME 


503 

4 




504 

» 

lOMPRU 

CURRENT FILE SIZE IN PRUS 


505 

4 




506 

f 

REMARK - 

THE NOS PRU COUNT (AS RETURNED BY THE LENGTH CO 


507 

♦ 

IS ALWAYS ONE MORE THAN THE SCOPE COUNT (AS RETURNED BY 


508 

« 

THE STATUS MACRO). NO REASONS FOR THIS DISCREPANCY ARE 


509 

* 

KNOWN (WHEN DOES A CDC O/S EVER MAKES SENSE, ANYWAY). 


310 

4 

THIS FUNCTION CORRECTS THE NOS COUNT BY SUBSTRACTING 1. 


51 1 

« 




5ia 


ENTRY 

lOMPRU . 


513 

lOhlPRU 

BSS 

1 ENTRY/EXIT 


517 


SB7 

1 (87) = 1 


515 


IFEQ 

OS. SCOPE 


516 


MX6 

1 ( SCOPE ) 

517 


SAl 

XI (XI ) - LFN (SCOPE) 

518 


LX6 

39D (X6) = LIST HEADER = a7/a.36/0(SCOPE) 

519 


MXO 

72D (SCOPE) 

sao 


SA6 

FET PUT LIST HEADFR IN FET(I) (SCOPE) 

551 


BX7 

X0*XI (SCOPE) 
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5SS 


MX6 

0 


(SCOPE) 

523 


SA7 

A6+B7 

STORE LFN IN FET(2) 

(SCOPE) 

52*+ 


SA6 

A7+B7 

CLEAR FET(3) 

(SCOPE) 

525 


STATUS 

FET.3,R 

ISSUE STATUS REQUEST 

(SCOPE) 

526 


SAl 

FET+2 

(XI) = WORD WITH PRU COUNT 

(SCOPE) 

527 


MXO 

-24D 


(SCOPE) 

528 


BX6 

-XO«Xl 

MASK OUT PRU COUNT FIELD 

(SCOPE) 

529 


ELSE 




530 


MX4 

0 


(NOS) 

531 


SX? 

1002B 


(NOS) 

532 


SX3 

PAD 


(NOS) 

533 


SX5 

BO 


(NOS) 

534 


MX6 

0 


(NOS) 

535 


RJ 

^XFETSETS 

ESTABLISH A FET 

(NOS) 

536 


SKI PEI 

FET.R 

POSITION FILE TO EOl 

(NOS) 

537 


STATUS 

FET.P 

GET FNT/FST ENTRIES 

(NOS) 

538 


SAl 

FET4-6 

(XI) = FET(7) = FST ENTRY 

(NOS) 

539 


MXO 

-12D 


(NOS) 

540 


AXl 

12D 

RIGHT JUSTIFY SECTOR COUNT FLD 

(NOS) 

541 


BX6 

-X0*XI 

1X6) = CURRENT SECTOR NO. 

(NOS) 

542 


AXl 

120 

RIGHJUSTIFY CURRENT TRACK FLD 

(NOS) 

543 


BX2 

-X0"X1 

(X2) = CURRENT TRACK NO. 

(NOS) 

544 


AXl 

12D 

RIGHTJUSTIFY FIRST-TRACK FIELD 

1 (NOS) 

545 


SX3 

2140 

(X31 ^ SECTORS PER TRACK 

(NOS) 

546 


DXl 

-XO*Xl 

(XI) = FIRST TRACK VALUE 

(NOS) 

547 


1X2 

X2-X1 

(X2) TRACK COUNT 

(NOS) 

548 


SX4 

Bl 

(X4) = I 

(NOS) 

549 


DX2 

X.?«X3 

CONVERT TRACK OlFF TO SECTORS 

(NOS) 

550 


1X6 

X2+X6 

(X6) = SECTORS (PRU) COUNT 

(NOS) 

551 


1X6 

X6 X4 

MAKE COUNT SCOPE COMPATIBLE 

(NOS) 

552 


PL. 

X6, lOMPRU 


(NOS) 

553 


MX6 

0 

IF COUNT NEGATIVE. SET (X6) 

0 (NOS) 

554 


END If 




555 


EG 

iOMPRU 

RETURN 


556 

* 





557 

lOMRDR 

SPACE 

2 



558 

# # n 

lOMROR 

(LFN. A, N. 

LOCR. TYPEX) 


559 

^ * 

RO MS 

(LFN. A. N. 

LOCR) 


560 

« 





561 

• 

ENTRY TO READ A RECORD 

1 FROM AUXILIARY STORAGE 


56? 






563 

* 

FORTRAN 

REFERENCF - 



564 

• 





565 

* 

CALL 

lOMFIDR (LFN. A, N, LOCR. TYPEX) 


566 

* 





567 

« 





568 

♦ 

WHERE THE FUNCTION OF 

THE ARGUMENTS IS IDENTICAL TO 


569 

* 

THOSE OF lOMWTR (SEE BELOW) 


570 

* 





571 


ENTRY 

lOMRDR 



S72 

• 

ENTRY 

1 OMRDR . ROMS 



573 

ROMS 

B5S 

1 

STAGS -COMPATIBLE ENTRY POINY 


574 


SA5 

ROMS 

FETCH RETURN INSTRUCTION 


575 


SB7 

1 



576 


0X7 

X5 



577 


SA3 

A1+B7 

(X3) ADDRESS(A) 

(FTN) 

578 


SA4 

A3+B7 

(X4) = ADDRESS (N) 

(FTN) 

579 


SA2 

A4+B7 

(X2) = ADDRESS (LOCR) 

(FTN) 

580 


SA4 

X4 

(X4) ^ N 

(FTN) 

581 


SB4 

X2 

(B4) - ADDRESS(LOCR) 

(FTN) 

582 


SA7 

lOMRDR 

STORE RETURN INSTR 


583 


NO 

X4, lOMRDR 

EXIT IF N LT 0 


584 


EQ 

ROSAMS 

TO SECTOR-ADDRESSABLE MS SECTION 

585 

* 





586 

lOMRDR 

BSSZ 

1 

MAIN ENTRY POINT TO READ A RECORD 

587 


SB7 

1 

(B7) = 1 


588 


SB6 

B7+B7 

(B6) = 2 


599 


SA4 

A 1+86 

(X4) = AODRESS(N) 

(FTN) 

590 


SA3 

Af +B7 

(X3) = ADDRESS(A) 

(FTN) 

591 


SA5 

A4+B6 

(X5) = ADDRESS (TYPEX) 

(FTN) 

592 


SA2 

A4+B7 

(X2) = ADDRESS (LOCR) 

(FTN) 

593 


SA4 

X4 

(X4) = N 

(FTN) 

594 


SA5 

X5 

(X5) = TYPEX 

(FTN) 

595 


SB4 

X2 

(B4) = ADDRESS (LOCR) 

(FTN) 

596 


SB5 

X5 

(B5) = TYPEX 


597 


NG 

X4, lOMRDR 

EXIT IF N LT 0 


598 


GT 

B5,B6.ROECS 

TO ECS-REAO SECTION IF TYPEX = 

3 

599 


EO 

95,B6.RDWAMS 

TO WAMS SECTION IF TYPEX = 2 


600 


LT 

B5.B0.RDTAPE 

rO TAPE-READ SECTION IF TYPEX 

LT 0 

601 

* 





602 

* 

READ RE- 

:0R0 FROM SrCTOR-ADDRESSASLF MASS STORAGE 


603 

* 





604 

ROSA; 16 

BS5 

0 



605 


6X5 

X4*"'7B 

(X5) - N 1- (64-1), (64=PRU SIZE) 

606 


3X.? 

! : o4R 

R-Bl r=l .EP-BIT- 1 .XP-BIT-O.FETL 

=4 

607 


AXE 


(X5) = (N+63)/64 


600 


SX6 

B7 

LIMIT = AOS(BUFFER) tNWXF+l 
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lOMCIO 


609 


LX5 

6 

(X5) ^ NWXF = 6‘tM(N+63)/6t) 

610 


IXO 

X5-X4 

(XO) = NWXF-N = NWPAD 

611 


BX4 

X5 

<X4) = NWXF FOR FET ASSEMBLY 

612 


MX5 

0 

(X5) = 0 TO MARK READ CONDITION 

613 


1X7 

X3^X4 

(X7) = ADDRESS ( A) +NWXF 

614 


582 

XO 

(B2) = NWPAD 

615 


SB5 

X7 

(B5) ■= AOORESS(A(NWXF+m 

616 


RJ 

*XFETSETS 

ESTABLISH FET 

617 


SA4 

B4 

(Xif) = LOCR • PRU ORDINAL 

610 


SAl 

CMSIZ 

(XI) * CURRENT CM FL 

619 


BX6 

X4 

(X6) « LOCR 

620 


SA6 

FET+6 

PRU ORDINAL TO FET(7) 

621 


NZ 

XI. RDSAMSl 

SKIP IF CMSIZ CONTAINS NZ VALUE 

622 


MX7 

0 

ELSE CLEAR (X7) TO FLAG CMSIZ REQUEST 

623 


RJ 

«XOMCMSZ$ 

AND OBTAIN CURRENT JOB SIZE 

624 

RDSAMSl 

BSS 

0 


625 


2Q 

B2.RDSAMS4 

OMIT PADDING PROCESSING IF NWPAD=0 

626 


SB3 

XI 

(B3) = CMSIZ 

627 


SX7 

85 

(X7) = address ( A (NWXF+ 1) ) 

628 


GE 

B3.B5.RDSAMS2 

OMIT FL EXPANSION IF FL GE IN 

629 


RJ 

=XDMCMSZ$ 

ELSE EXPAND CM TO (X7) WORDS 

630 

RDSAMS2 

BSS 

0 


631 


SA7 

PADOlNG-l 

(A7) POINTS TO PADDING(O) 

632 


SA2 

B5 

(A2) POINTS TO A(NWXF+1) 

633 


SB3 

BO 

INITIALIZE WORD XFER COUNTER 

634 

RDSAMS3 

BSS 

0 


635 


SA2 

A2-B7 

(XE) = A(NWXF+1-J) 

636 


SB3 

B3+B7 

INCREMENT COUNTER 

637 


BX7 

X2 


638 


SA7 

A7+B7 

STORE IN PADOING(J) 

639 


LT 

B3.B2.RDSAMS3 

CYCLE 

640 


SA5 

A7 

(A5) = EXIT (A7) FOR RESTORE LOOP 

641 


SX5 

A2 

(X5) = EXIT (AE) FOR RESTORE LOOP 

642 

RDSAMS4 

BSS 

0 


643 


IFEQ 

OS, NOS 


644 


SXO 

82 

SAVE (BE) = NWPAD IN (XO) (NOS) 

645 


ENDIF 



646 


READNS 

FET,R 

READ IGNORING EOR 

647 


IFEQ 

OS. NOS 


648 


SB2 

XO 

RESTORE (BE) = NWPAD (NOS) 

649 


ENOIF 



650 


RJ 

=XFETRET$ 

GET RETURN DATA FROM FET 

651 


EQ 

B2. lOMROR 

SKIP PAD-RESTORE IF NWPAD = 0 

652 


SA3 

A5 

(X3) = LAST WORD SAVED IN PADDING 

653 


SB2 

B2-B7 


654 


BX6 

X3 


655 


SA6 

X5 

RESTORE A(N+1) 

656 


LE 

B2.I0MRDR 

EXIT IF NWPAD * 1 

657 

RDSAMS6 

BSS 

0 


658 


SA3 

A3-B7 

(X3) = NEXT SAVED WORD 

659 


SB2 

B2-B7 

DECREMENT COUNTER 

660 


BX6 

X3 


661 


SA6 

A6+B7 

RESTORE A(N+J) 

662 


GT 

B2.RDSAMS6 

CYCLE UNTIL (BE) = 0 

663 


EQ 

lOMRDR 

RETURN TO CALLING PROGRAM 

664 





665 

* 

READ RECORD FROM (SIMULATED) WORD-ADDRESSABLE 

666 

< 

MASS STORAGE DEVICE (NOT 

YET IMPLEMENTED) 

667 

4 




668 

RDWAMS 

BSS 

0 


669 


EQ 

NRNAMS 

ISSUE OF. MESSAGE AND ABORT 

670 

’I 




671 

4 

READ RECORD FROM TAPE 


672 

* 




673 

RDTAPE 

BSS 

0 


674 


SXS 

01 14B 

R-BIT»0,EP-BIT=1 ,XP-BIT=1 ,FETL=4 

675 


SX6 

lOOOB 

LIMIT * ADS(BUFFER)+N+1000B 

676 


MX5 

0 

MARK READ CONDITION 

677 


RJ 

sXFETSETS 

ESTABLISH FET 

678 


READ 

FET.R 

STANDARD READ W/RECALL 

679 


RJ 

»XFETRET5 

GET RETURN DATA FROM FET 

680 


EQ 

lOMROR 

RETURN TO CALLING PROGRAM 

681 

« 




682 

4 

READ FROM EXTENDED CORE ! 

STORAGE 

683 

4 




604 

RDECS 

BSS 

0 


685 


SA2 

B4 

(X21 « LOCR 

666 


SBl 

AO 


687 


SAG 

X3 

(AO) = ADDRESS(A) 

688 


SB3 

X4 

(B3) *= N 

689 


BXO 

X2 

(XO) = ECS SOURCE ADDRESS 

690 


SX6 

B3 

(X6) = N 

69! 


RE 

B3 

XMIT BLOCK 

692 


SA6 

NWRDXF 

SET NWRDXF 

693 


SAG 

B1 

RESTORE (AO) 

694 


EQ • 

lOMRDR 

RETURN TO CALLING PROGRAM 


695 * 
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NOZL3D - 


696 

lOMWTR 

SPACE 

2 



697 

««« 

lOMMTR 

(LFN, A, N, LOCR, TYPEX) 


696 

««« 

WTMS 

(LFN, A, N, LOCR) 


699 

« 





700 

« 

ENTRY 

TO WRITE A RECORD 

ON AUXILIARY STORAGE 


701 

« 





702 

« 

FORTRAN REFERENCE - 



703 

« 





70>* 

« 

CALL 

lOMWTR (LFN, A, 

N, LOCR, TYPEX) 


705 

• 

CALL 

WT MS (LFN, A, 

N, LOCR) 


706 

« 





707 

4 

mERE 




706 

4 





709 

4 

LFN 

LOGICAL FILENAME IF AUXILIARY STORAGE MEDIUM 


710 

4 


IS MASS STORAGE OR MAGNETIC TAPE. IGNORED IF 


711 

4 


RECORD IS TO BE WRITTEN ON ECS (LCM) . 


712 

4 





713 

4 

A 

FWA OF SOURCE 

ARRAY IN PRIMARY MEMORY 


71'* 

4 





715 

4 

N 

NUMBER OF WORDS TO TRANSMIT. N=0 IS ADMISSIBLE. 

716 

4 





717 

4 

LOCR 

RECORD ADDRESS ARGUMENT. SIGNIFICANCE DEPENDS 


716 

4 


ON EQUIPMENT TYPE. 


719 

4 





720 

4 


SECTOR-ADDRESSABLE MASS STORAGE (TYPEX=0,1) 


721 

4 


LOCR = 0 WRITE NEW RECORD AT EOI. UPON A 


722 

4 


SUCCESSFUL WRITE, THE SYSTEM RETURNS THE REL 

723 

4 


SECTOR ADDRESS (RSA) OF THE RECORD IN LOCR. 


724 

4 


LOCR GT 0. 

SPECIFIES RECORD REWRITE AT 


725 

4 


RELATIVE SECTOR ADDRESS (RSA) IN LOCR. 


726 






727 

4 


WORD-ADDRESSABLE MASS STORAGE (TYPEX*E) THIS 


726 

4 


MODE IS NOT PRESENTLY IMPLEMENTED. 


729 

4 





730 

4 


MAGNETIC TAPE 

(TYPEX LT 0). LOCR IS IGNORED 


731 

4 


AND RECORD XMISSION PROCEEDS AT CURRENT LOCATION. 

732 

4 





733 

4 


ECS/LCM (TYPEX 

»3). LOCR = FWA OF DESTINATION AREA. 

734 

4 





735 

4 

TYPEX 

DMGASP DEVICE 

TYPE INDEX (SEE DMGASP MANUAL) 


736 

4 





737 

4 

NOTES 




736 

4 

1. ENTRY WTMS (PROVIDED FOR STA(3S COMPATIBILITY) ASSUMES 

739 

4 

TYPEX *0, I.E. SECTOR-ADDRESSABLE MASS STORAGE. 


740 

4 





741 

4 

2. NO 

END-OF-RECORD IS MARKED WHEN WRITING ON A RANDOM 


742 

4 

ACCESS DEVICE (TYPEX 

GE 0). TAPE RECORDS ARE TERMINATED 

743 

4 

BY 

AN EOR MARK. 



744 

4 

(THIS M.O. SIMPLIFIES UNIVAC I/O SIMULATION) 


745 

4 





746 


ENTRY 

lOMWTR 



747 

4 

ENTRY 

lOMWTR. WTMS 



748 

WTMS 

BSS 

1 

STA6S-C0MPATIBLE ENTRY 


749 


SA5 

WTMS 

FETCH RETURN RJ INSTRUCTION 


750 


SB7 

I 

(B7) « 1 


751 


BX7 

X5 

(X7) * RET INSTR 


752 


5A3 

AI+B7 

(X3) » ADORESS(A) 

(FTN) 

753 


SAif 

A3+B7 

(X^) > ADORESS(N) 

(FTN) 

754 


SAB 

A‘t+B7 

(Xa) « ADDRESS(LOCR) 

(FTN) 

755 


SA^ 

X‘t 

(X4-) » N 

(FTN) 

756 


SB^ 

xa 

(BH) » AOORESS(LOCR) 

(FTN) 

757 


SA7 

lOMWTR 

STORE RETURN INSTR 


758 


NG 

X^, lOMWTR 

EXIT IF N LT 0 


759 


EQ 

WRSAMS 

TO SECTOR-ADDRESSABLE MS SECTION 

760 

4 





761 

lOMWTR 

BSSZ 

I 

MAIN ENTRY POINT TO WRITE A RECORD 

762 


SB7 

1 

(B7) ' 1 


763 


S86 

B7+B7 

(B6) “ 2 


764 


SAH 

AU86 

(X**) • ADDRESS(N) 

(FTN) 

765 


SA3 

AI+B7 

(X3) « ADORESS(A) 

(FTN) 

766 


SA5 

A^^B6 

(X5) = ADDRESS (TYPEX) 

(FTN) 

767 


SA2 

A*++B7 

(X2) = ADORESS(LOCR) 

(FTN) 

768 


SA^ 

X^ 

(XM-) » N 

(FTN) 

769 


SA5 

X5 

(X5) = TYPEX 

(FTN) 

770 


SB^f 

xa 

(S'*) • ADC3RESS(LOCR) 

(FTN) 

771 


SB5 

X5 

(B5) = TYPEX 


772 


NG 

X4-. lOMWTR 

EXIT IF N LT 0 


773 


GT 

B5.B6.WRECS 

TO ECS-WRITE SECTION IF TYPEX = 

3 

774 


EQ 

B5.B6.WRWAMS 

TO WAMS SECTION IF TYPEX = 2 


775 


LT 

B5.B0.WRTAPE 

TO TAPE-WRITE SECTION IF TYPEX LI 0 

776 

4 





777 

4 

WRITE RECORD ON SECTOR-ADDRESSABLE MASS STORAGE 


778 

4 





779 

WRSAMS 

BSS 

0 



780 


SX5 

X‘f^-77B 

(X5) = N + (PRUSIZ-1) 


781 


SXB 

llOHB 

R-B I T= I , EP-B I T= 1 . XP-B I T=0 , FETL=‘t 


782 


AX5 

6 

(X5) = (N+GSI/Gi* 
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NOZL3D - 

lOMCIO 


783 


SX6 

B7 

MARK LIMIT ■= AOS ( BUFFER 1+NWXF+ 1 

784 


LX5 

6 

(X5) “ NWXF * 64*((N+63)/64) 

785 


IXO 

X5-X4 

(XO) = NWXF-N • NWPAD 

786 


BX^ 

X5 

(X4) = NWXF FOR FET ASSEMBLY 

787 


1X7 

X3^X5 

(X7) => ADORESS(A)+NWXF 

788 


5BE 

xo 

(B2) - NWPAD 

789 


SB5 

X7 

(B5) - ADOB£SS(A(NWXF+I)) 

790 


RJ 

sXEETSETS 

ESTABLISH FET 

791 


SA*^ 

BH 

(X4) = LOCR 

792 


SXO 

B7 

(XO) * 1 

793 


SX6 

Bt 

(X6) » ADORESS(LOCR) 

794 


MX7 

0 

(X7) . 0 TO FLAG DMCMSZ REQUEST 

795 


ZR 

X**. WRSAMSl 

TEST FOR LOCR • 0 (WRITE AT EOI ) 

796 


IFEQ 

OS. SCOPE 


797 


BX6 

Xif 

(X6) = LOCR (SCOPE) 

798 


ELSE 



799 


LXO 

asD 

(XO) = 30/0,1/1,29/0 (NOS) 

800 


BX6 

XI++X0 

(X6) = LOCR t REWRITE BIT (NOS) 

801 


ENDIF 



802 

WRSAMSl 

BSS 

0 


803 


SAl 

CMSIZ 

(XI) = CURRENT CM FL 

804 


SA6 

FET+6 

ADS(LOCR)/LOCR TO FET(7) 

805 


NZ 

XI .WRSAMSa 


806 


RJ 

=XOMCMSZ5 

GET CURRENT CM SIZE 

807 

WRSAMSe 

BSS 

0 

OMIT PADDING PROCESSING IF NWPAD=0 

808 


EQ 

Ba.WRSAMSS 

809 


SB3 

XI 

(B3) = CMSIZ 

810 


SX7 

B5 

(X7) = ADDRESS(A(NWXF+D) 

811 


GE 

B3.B5.WRSAMS3 

OMIT FL EXPANSION IF FL GE IN 

812 


RJ 

=XDMCMSZ$ 

ELSE EXPAND CM FL TO (X7) WORDS 

813 

WRSAMS3 

BSS 

0 


814 

WRSAMS5 

BSS 

0 


815 


NZ 

Xif,WRSAMS6 

BRANCH ON LOCR = ZR/NZ 

816 


WRITE 

FET.R 

WRITE MACRO 

817 


EQ 

WRSAMS7 


818 

WRSAMS6 

BSS 

0 


819 


REWRITE 

FET.R 

REWRITE MACRO 

820 

WRSAMS7 

BSS 

0 


921 


RJ 

»XFETRET$ 

OBTAIN FET STATUS DATA 

822 


SAS 

EOICOD 

(X2) * EOI CODE 

823 


SA3 

OUTMIN 

(X3) = OUT-IN 

824 


MX6 

H20 

(X6) = FILENAME MASK 

925 


S85 

X2 

(B5) = EOI CODE 

826 


ZR 

X3.WRSAMS8 

IF IN=OUT, WRITING IS COMPLETE 

827 


SAl 

FET 

(XI) =■ FET HEADER WORD 

828 


NE 

B5.B7,WRSAMS0 

TEST FOR TRUNCATION ON HITTING EOI 

829 


SX8 

B6+B7 

(X2) - 3 

830 


BX6 

X6«Xl 

MASK OUT LFN IN (X6) 

831 


BX6 

x6+xa 

SET INTERLOCK/BINARY-MODE BITS 

932 


MX7 

0 


833 


SA6 

A1 

RESTORE FET(l) TO VIRGIN CONDITION 

834 


SA7 

NWRDXF 

RESET NWRDXF TO ZERO 

835 


WRITE 

FET.R 

ISSUE FINAL WRITE TO MOVE EOI 

836 


RJ 

•XFETRETS 

GET RETURN PARAMETERS FROM FET 

837 

WRSAMS0 

BSS 

0 


838 


EQ 

lOMWTR 

RETURN TO CALLING PROGRAM 

839 

« 




840 

« 

WRITE ON WORD-ADDRESSABLE MASS STORAGE (NOT IMPLEMENTED) 

841 





842 

MRMAM5 

BSS 

0 


843 


MESSAGE 

WAMSG, ,R 


844 


ABORT 



845 

UAMSC 

DIS 

4.WOBO-ADOBESSABI.E MODE NOT AVAILABLE 

846 


BSSZ 

1 


847 

« 




848 

« 

WRITE RECORD ON TAPE 


849 

« 




850 

WRTAPE 

BSS 

0 


851 


SX2 

01I4B 

R-B I T“0 , EP-B 1 T- 1 , XP-B I T- 1 , FETL'4 
LIMIT = ADS ( BUFFER )+N+1000B 

852 


SX6 

lOOOB 

853 


S83 

X4 

(B3) » N 

854 


BX5 

X4 

X5 « N (WRITE CONDITION) 

855 


RJ 

•XFETSETS 

ESTABLISH FET 

856 


IFEQ 

OS. SCOPE 


857 


WRITER 

FET, ,R 

WRITE W/EOR AND RECALL (SCOPE) 

858 


ELSE 



859 


WRITER 

FET.R 

WRITE W/EOR AND RECALL (NOS) 

860 


EICIF 


861 


RJ 

•XFETRETS 

GET RETURN PARAMETERS FROM FET 

862 


EQ 

lOMWTR 

RETURN TO CALLING PROGRAM 

863 

« 



864 

« 

WRITE ON 

extended core (LARGE MEMMORYl 

865 

« 




866 

WRECS 

BSS 

0 


867 


SA2 

BH 

(X2) = LOCR 

868 


SBI 

AO 


869 


SB3 

XH 

(B3) = N 
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NOZL3D 

lOMClO 



B70 


SAO 

X3 

(AO) = ADDRESS (A) 


071 


SX6 

83 

(X6) ^ N 


Qia 


BXO 

X2 

(XOI = ECS DESTINATION ADDRESS 


B73 


WE 

B3 

XMIT N-WORD BLOCK <B3) = N 


87t 


SA6 

NWRDXF 

SET NWRDXF 


875 


SAO 

B1 

RESTORE ( AO ) 


876 


EQ 

lOMWTR 

RETURN 


077 

• 





070 

lOMXEl 

SPACE 

2 



879 

« 4 4 

lOMXEI 

(LFN. NPRUS) 



B80 

4 





881 

4 

EXTEND 

EOl OF MASS STORAGE FILE BY WRITING A SPECIFIED 


88B 

* 

NUMBER 

OF DUMMY (ZERO 

FIHFD) PHYSICAL RECORD UNITS <PRUS1 . 


8B3 

* 

THIS IS 

NEEDED FOR UNIVAC SIMULATION ON THE CDC. 


884 

4 





BBS 

4 

FORTRAN 

REFERENCE - 



886 

« 





887 

4 

CALL 

lOMXEl (LFN, 

NPRUS ) ' 


888 

4 





089 

4 

WHERE 




890 

4 





891 

4 

LFN 

LOGICAL FILE 

NAME 


892 

* 





893 

4 

NPRUS 

NO. OF PRUS 

TO BE WRITTEN (MAX 2*M71 


894 

* 





BBS 

4 





896 

4 





897 


ENTRY 

lOMXEl 



898 

lOMXEI 

BSS 

1 

entry/exit 


099 


S87 

1 

(B7) = 1 


900 


SA5 

AI+B7 

(X5) = ADDRESS (NPRUS' (FTNI 


901 


SA5 

X5 

(X51 = NPRUS (PTNI 


Boe 


BX6 

XI 



903 


SA6 

LFNADS 

SAVE ADDRESS (LFN) 


90*^ 


BX7 

X5 



905 


SA7 

A6+S7 

SAVE NPRUS 


906 


BXl 

X5 



907 


RJ 

=XNCOCTLS 

ENCODE NPRUS IN rX6) 


908 


SA2 

XEIMESG 



909 


SAB 

ASTMSG+3 



910 


SA3 

A2+B7 



911 


SA9 

A3+B7 



91B 


LX7 

X3 



913 


BX6 

X9 



919 


SA7 

A6-B7 



915 


SAG 

A6+S7 



916 


BX7 

X2 



917 


SA7 

A7-B7 



918 


RJ 

=XIOMESSG 

PRINT MESSAGE 


919 


SAl 

LFNADS 

RESTORE (XI) = LFN ADDRESS 


gao 


SA5 

PRUXEI 

RESTORE (X5) = NPRUS 


991 


SX2 

U04B 



992 


SX3 

BUFFER 

(X3) = ADDRESS (BUFFER) 


993 


SX4 

BUFSIZ 

(X9) = BUFFER SIZE (WORDS) 


929 


BX5 

X4 

(X5) = (X9) FOR WRITE MODE 


925 


MX6 

0 



926 


SB4 

X4 

(B4) « BUFSIZ 


927 


RJ 

«XFETSET$ 

ESTABLISH FET 


928 


MX6 

0 

CLEAR (X6) 


929 


SB2 

87 

INITIALIZE COUNTER (B2)=l 


930 


SA6 

BUFFER 

INITIALIZE (A6) 


931 

XTEOIl 

BSS 

0 



939 


SB2 

B2+B7 

COUNT 


' 933 


SA6 

A6+B7 

CLEAR BUFFER WORD 


934 

935 

4 

LT 

B2,B9,XTE0I1 

CYCLE UNTIL BUFFER IS CLEARED 


, 936 

XTE0I2 

BSS 

0 



937 


SA5 

PRUXE 1 

(X5) = REMAINING PRUS TO WRITE 


936 


SAl 

FET 

(XI) » FET HEADER 


939 


MXO 

44D 



990 


SB3 

BUFPRU 



991 


SB5 

X5 

(S5) = REMAINING PRUS 


992 


LXO 

2 

(XO) = MASK FOR LFN AND MODE/ITLOCK 


943 


SX6 

B5-B3 

DECREMENT REM.PRU COUNTER 


999 


BX7 

X0«X1 

(X7) = FET HEADER WORD 


945 


5A6 

PRUXE I 



996 


SA7 

A1 

STORE FET HEADER 


997 


SX6 

B3 

ASSUME FULL BUFFER WRITE 


99B 


SX7 

BUFFER- I 

(X7) = ADDRESS (BUFFER- 1) 


999 


LT 

B5, lOMXEI 

EXIT IF (B5) LE 0 


950 


GE 

B5.B3,XTE0I3 

TEST FOR LAST PARTIAL WRITE 


951 


SXS 

B5 



952 

XTE0I3 

BSS 

0 



953 


SA7 

FET.6 

ADDRESS ( BUFFER- 1 ) TO FET (7) 


959 


SX7 

X7+B7 

(X7) := ADDRESS (BUFFER) 


955 


LX6 

6 

CONVERT PRUS TO WORDS 


956 


SA6 

NWXWRT 

TO GET CORRECT NWRDXF 


1 
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NO?L 3D - 

lOMClO 

957 

SA7 

FEF + 3 

.-'58 

1X6 

X6+X7 

959 

SA6 

A'^-B7 

960 

WRI TE 

FET.R 

961 

RJ 

«XFETRETS 

96E 

N? 

XI . lOMXEI 

963 

EQ 

XTEOie 

964 XEIMESG 

DI5 

3.EOI TO BE 

965 

SPACE 

3 

966 

END 



RESET (OUT) - ADDRESS (BUFFER) 
(X6) = ADDRESS ( BUFFER )+NWXE 
RESET ( IN) 

WRITE BUFFER 
GET FET RETURN DATA 
ABANDON PROCESS !F ERROR 
CYCLE 
XTENDED BY PRUS 
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N0ZL3D 

lOMFAP 


1 

•DECK 

lOMFAP 


2 

• =DECK 

lOMFAP lOMFAP ASSEMBLY 


3 


I DENT 

lOMFAP 


1+ 

FILACT 

TITLE 

FILE ACTIVITY AND POSITIONING OPERATIONS 


5 

•CALL 

lOMACTL 


6 


IFEQ 

OS. NOS • 


7 


4444444444444444444444444444 

(NOS)+ 

8 

• EXTERNAL TEXT COMMON DECKS • 

(NOS) 

9 


444444444 

*444444444*44*4*44* 

(NOS) 

10 

# 

LIST 

X * 

(NOS) 

11 


XTEXT 

COMCSYS • SYSTEM REQUEST ROUTINES 

(NOS) 

12 


XTEXT 

COMCCIO • I/O REQUEST PROCESSOR 

(NOS) 

13 


END IF 

* 




444444444 

*i|4*4444>4**4444444 


15 

COMMON 

SPACE 

2 


16 

4 4 4 

COMMON 

BLOCK DECLARATION 


17 

4 




18 

• =PROCEDURE CDMASTA 


19 

•CALL 

COMAS 1 A 


20 


USE 

0 


21 


SPACE 

3 


22 

44444444 

44444444 * 

44**44444*4**4***44444*44**4*444*44444444*4*4*44 

444*444 

23 

4 



4 

24 

4 

FILE ACTIVITY FLECTIONS PROVIDE CONTROL OVER DYNAMIC 

4 

25 

* 

ASSIGNMENT OF PERIPHERAL EQUIPMENT, OPENING, CLOSING 


26 

4 

ERASING. AND POSITIONING OF LOGICAL/ ILLOGICAL FILES 

4 

27 

4 



4 

28 

44444444 

444444444 

**444444*4***44*444*444**44444444444*4*444444444 

4444*4* 

29 

4 



4 

30 

4 

PROGRAMMED QY C.A. FELIPPA, NOV 1975 

4 

31 

4 


/ 

* 

32 

4 

UPDATE 

- NOV 1977 

4 

33 

4 



4 

34 

4 

A FUNCTION SUMMARY FOLLOWS. 

4 

35 

4 



4 

36 

4 

BSKIPR 

BACKWARD SKIP LOGICAL RECORDS 

4 

37 

4 



4 

38 

4 

BSK I PF 

BACKWARD SKIP FILES 

4 

39 

4 



« 

40 

4 

FSKIPR 

FORWARD SKIP LOGICAL RECORDS 

4 

41 

4 



4 

42 

4 

FSKIPF 

FORWARD SKIP FILES 

4 

43 

4 



4 

44 

4 

lOMCLS 

CLOSES A LOGICAL FILE WITH RETURN. 

4 

45 

4 



4 

46 

4 

lOMEVT 

DISCARDS CONTENTS OF FILE. LOGICAL FILENAME 

4 

47 

4 


REMAINS ATTACHED TO JOB CONTROL POINT. 

« 

48 

4 



* 

49 

4 

lOMOPN 

OPENS A LOGICAL FILE. 


50 

4 



* 

51 

4 

lOMPOD 

POSITIONS DIRECT ACCESS DEVICE ACCORD I NO TO 

4 

52 

4 


DMGASP LOCATION PARAMETERS 

4 

53 

4 



4 

54 

4 

lOMPOT 

POSITIONS MAGNETIC TAPE DEVICE ACCORDING TO 


55 

4 


DMGASP LOCATION PARAMETERS 

4 

56 

4 



* 

57 

4 

lOMREW 

POSITION FILE TO BOI (REWIND) 

* 

56 

4 



4 

59 

4 

lOMRMT 

REQUESTS MAGNETIC TAPE ASSIGNMENT 

4 

60 

4 


(PRESENTLY DEACTIVATED) 

4 

61 

4 



4 

62 

44444444444444444 

4444**444444*44444444444444*44«444«4«44««444*««4««««44« 

63 

lOMCLS 

SPACE 

2 


64 

4 4 4 

lOMCLS 

(LFN) 


65 

4 




66 

4 

ENTRY POINT TO CLOSE A LOGICAL FILE. THIS OPERATION 


67 

4 

TERMINATES FILE ACTIVITY. 


68 

4 




69 

4 

FORTRAN 

REFERENCE - 


70 

4 




71 

4 

CALL 

lOMCLS (LFN) 


72 

4 




73 

4 

WHERE 



74 

4 




75 

4 

LFN 

LOGICAL FILENAME 


76 

4 




77 


ENTRY 

lOMCLS 


78 

lOMCLS 

BSS 

1 ENTRY/EXIT POINT 


79 


SX2 

0 1 04B R-BI T=0 . EP-B I T= I , XP-B I T»0 .FETL 


80 


MX4 

0 N * 0 


81 


SX3 

XI DUMMY BUFFER ADDRESS 


82 


MX5 

0 


83 


SX6 

BO 


84 


RJ 

=XFETSET$ ESTABLISH FET 


85 

1 - 

SA2 

=7HRETURN, 


86 


RJ 

FAMESG PRINT INFORMATIVE MESSAGE 
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N0ZL30 

lOMFAP 


87 


CLOSE 

FET.RETURN.R 

CLOSE WITH RETURN 

88 


SA5 

lOMCLS 

FETCH RETURN INSTRUCTION 

89 


EQ 

FAEXIT 

TO EXIT SECTION 

90 

« 




91 

lOMEVT 

SPACE 

2 


98 

#«« 

lOMEVT 

(LFNI 


93 

« 




9H 

« 

ENTRY POINT TO EVICT (ERASE IN UNIVAC PARLANCE) A FILE 

95 

* 




96 


FORTRAN REFERENCE - 


97 

« 




98 


CALL 

lOMEVT (LFN) 


99 

« 




too 

« 

WHERE 



tot 

« 




102 

« 

LFN 

LOGICAL FILE 

NAME. CONTENTS OF LFN ARE 

103 



DISCARDED. FILE IS NOT RELEASED FROM JOB. 

lOif 

« 




105 


ENTRY 

lOMEVT 


106 

lOMEVT 

BSSZ 

t 

ENTRY/EXIT POINT 

107 


sxa 

0104B 

R-BI T»0 , EP-BI T= 1 , XP-BI T=0 ,FETL 

108 


MX^ 

0 

N = 0 

109 


SX3 

XI 

DUMMY BUFFER ADDRESS 

110 


MX5 

0 


111 


SX6 

BO 


112 


RJ 

«XFETSET$ 

ESTABLISH FET 

113 

+ 

SA2 

=7HEVICT, 


n't 


RJ 

FAMESG 

PRINT INFORMATIVE MESSAGE 

115 


EVICT 

FET.R 

EVICT MACRO 

116 


SA5 

lOMEVT 

FETCH RETURN INSTRUCTION 

117 


EQ 

FAEXIT 

TO EXIT SECTION 

118 

« 




119 

lOMOPN 

SPACE 

a 


120 

««« 

lOMOPN 

(LFN) 


121 

« 




122 

« 

ENTRY POINT TO OPEN A FILE. THIS FUNCTION IS PRIMARILY 

123 

« 

DESIGNED FOR ACQUIRING 

DEVICE ATTRIBUTE INFORMATION 

12‘t 

« 




125 

n 

FORTRAN REFERENCE - 


126 

« 




127 

« 

CALL 

lOMOPN (LFN 


128 

« 




129 

« 

WHERE 



130 

« 




131 

« 

LFN 

LOGICAL FILENAME (1-7 CHARS, LJ ZEROFILLED) 

132 

« 


ON RETURN, FNT POINTER INSERTED IN BITS 0-11 

133 

« 




13>t 

« 

VALUES RETURNED IN COMMON BLOCK /CDMAST/ INCLUDE 

135 

« 

DEVTYP 

CDC DEVICE CODE (12 BITS) 

136 


PRUSIZ 

PRU SIZE FOR 

DEVICE TO WHICH LFN IS ASSIGNED 

137 

« 

FNTPNT 

FNT POINTER, 

INSERTED IN LOW 12 BITS OF LFN 

138 

« 




139 


ENTRY 

lOMOPN 


mo 

lOMOPN 

BSSZ 

1 

ENTRY/EXIT POINT 

mi 


MX!* 

0 

N • 0 

m 2 


SX2 

OlOW 

R-BI T*0 , EP-BI T» 1 , XP-B 1 T-0 , FETL 

m3 


MX5 

0 


mt 


8X3 

XI 

DUMMY BUFFER ADDRESS 

m5 


SX6 

80 


me 


RJ 

-XFETSETS 

ESTABLISH FET 

1H7 


8X7 

XI 


m8 


SA7 

LFNADS 

SAVE LFN ADDRESS 

m9 


SA2 

•5H0PEN, 


150 


RJ 

FAMESG 

PRINT INFORMATIVE MESSAGE 

151 


OPEN 

FET,,R 

ISSUE OPEN MACRO 

152 


SAl 

LFNADS 

(XI) - LFN ADDRESS 

153 


SA2 

FET+1 

(X2) » FET(2) 

15>t 


SB7 

81 


155 


MXO 

-120 


156 


SA3 

XI 

(X3) - LFN 

157 


SAIT 

FETm 

(X4) >= FET(5) 

158 


LX2 

120 

RIGHT JUSTIFY DEVICE-TYPE FIELD 

159 


LXiI 

120 

RIGHT JUSTIFY FNT POINTER 

160 


8X6 

-X0*X2 

EXTRACT DEVICE TYPE 

161 


8X7 

-XO•X^ 

EXTRACT FNT POINTER 

162 


SA6 

DEVTYP 


163 


MXO 

■*20 


16>* 


8X3 

X0*X3 

CLEAR BITS FOLLOWING LFN 

165 


LXif 

30D 

RIGHTJUSTIFY PRU SIZE FIELD 

166 


8X6 

X3+X7 

INSERT FNT POINTER 

167 


SA6 

A3 

STORE (LFN/FNTPNT) 

168 


MXO 

-15D 


169 


8X6 

-XO'Xi* 


170 


SAG 

PRUSIZ 


171 


SA5 

lOMOPN 


172 


EQ 

FAEXIT 

TO EXIT SECTION 

173 

lOMPOD 

SPACE 

2 
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N0ZL30 - 

lOMFAP 



174 

• «« 

lOMPOO 

(CDLOC, LCARGI, LCARG2, SECTOR 1 


175 

« 





176 

« 

ESTA8LISH NEW POSITION OF DIRECT ACCESS DEVICE 


177 

« 





178 


FORTRAN REFERENCE - 



179 

« 





180 

« 

CALL 

lOMPOO (CDLOC, LCARGI, LCARG2, SECTOR) 


181 

« 





182 

« 

WHERE 




183 

« 





184 

« 

CDLOC 

ON ENTRY, CURRENT DEVICE LOCATION (SECTORS) 


185 

« 


ON EXIT, UPDATED DEVICE LOCATION (SECTORS) 


186 

« 





187 

« 

LCARGI 

FIRST LOCATION ARGUMENT IN DMPAST 


188 

f 





189 


LCARG2 

SECOND LOCATION ARGUMENT IN DMPAST 


190 

* 





191 

4 

SECTOR 

DEVICE SECTOR SIZE IN WORDS 


192 

« 





193 


ENTRY 

lOMPOD 



194 

POSOAO 

BSS 

0 



195 

lOMPOO 

BSSZ 

1 

ENTRY/EXIT 


196 


SB7 

1 

(B7) = 1 


197 


SB6 

B7+B7 

(B6) « E 


198 


SAB 

A1+B7 


(FTN) 

199 


SA3 

A1^B6 


(FTN) 

200 


SA4 

AE-fB6 


(FTN) 

201 


SAl 

XI 

(XI) = CDLOC 

(FTN) 

202 


SAB 

XE 

(XE) » LCARGI 

(FTN) 

203 


SA3 

X3 

(X3) * LCARGS 

(FTN) 

204 


SA4 

X^ 

(XH) * SECTOR 

(FTN) 

205 


BX7 

XE 

(X7) » LCARGI 


206 


SB3 

X3 

(B3) » LCARGS 


207 


SB4 

XH 

(B4) « SECTOR 


208 


BX6 

XE 



209 


EQ 

B3.PDADif 

IF LCARGE»0, CDL0C«LCARG1 AND 

EXIT 

210 


AXB 

60D 

(X2) = EXTENDED SIGN OF LCARGI 

211 


BX6 

X7-XE 

(X6) = lABS(LCARGl) 


212 


EQ 

Bif.B7.PDA0E 

IF se;ctor=i, omit conversion 


213 


SX6 

X6+77B 



214 


AX6 

6 

(X6) » COVERING SECTOR COUNT 

(CSC) 

215 

PDAD2 

PL 

X7.PDAD3 



216 


BX6 

-X6 

RESTORE LCARGI SIGN 


217 

PDAD3 

SA6 

A1 

SET CDLOC = COV. SECTOR COUNT 

(SIGNED) 

218 


GT 

B3,IOMPOD 

EXIT IF ABSOLUTE POSITIONING 


219 


1X6 

X6+XI 

ELSE (X6) = CDLOC + CSC 


220 

PDADif 

SA6 

A1 

SET NEW LOCATION 


221 


EQ 

lOMPOD 

EXIT 


222 

« 





223 

lOMPOT 

SPACE 

E 



224 

««« 

lOMPOT 

(LFN. CDLOC, 

NEWLOC) 


825 

# 





226 

« 

POSITION 

MAGICTIC TAPE 

DEVICE THROUGH THE 


227 

« 

DMGASP LOCATION PARAMETER 


228 

« 





229 

4 

FORTRAN REFERENCE - 



230 

4 





231 

4 

CALL 

lOMPOT (LFN 

CDLOC. NEWLOC) 


232 

4 





233 

4 

WHERt' 




234 

4 





235 

4 

LFN 

LOGICAL FILENAME OF TAPE DEVICE 


236 

« 





237 

4 

CDLOC 

ON ENTRY. CURRENT DEVICE LOCATION. 


238 

4 


ON EXIT, CDLOC«NEWLOC IF NO ABNORMAL 


239 

4 


CONDITION IS 

DETECTED, ELSE CDLOC EXITS 


240 

4 


AT LAST ERROR FREE POSITION 


241 

4 





242 

4 

NEWLOC 

DESIRED LOCATION 


243 

4 





244 

4 





245 


ENTRY 

lOMPOT 



246 

POSTAP 

BSS 

0 



247 

lOMPOT 

BSSZ 

1 

ENTRY POINT 


248 


SX2 

QllHB 

R-B I T=0 , E-B I T= 1 , XP-B I T= 1 , FETL 

sit 

249 


BX3 

XI 

DUMMY BUFFER ADDRESS 


250 


SX4 

60 

N«0 


251 


MX5 

0 



252 


SX6 

XE 

DUMMY BUFFER EXTENT 


253 


RJ 

«XFETSET$ 

ESTABLISH FET 


254 


SAE 

A1+B7 

(XB) = ADDRESS (CDLOC) 

(FTN) 

255 


SA3 

AlfB6 

(X3) = ADDRESS ( NEWLOC 1 

(FTN) 

256 


SAE 

XE 

(X2) = CDLOC 

(FTN) 

257 


SA3 

X3 

(X3) = NEWLOC 

(FTN) 

258 


1X7 

X3-XE 

(X7I = NEWLOC-CDLOC 


259 


ZR 

X7. lOMPOT 

EXIT IF NEWLOC = CDLOC 


260 


MX5 

180 




I 
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NOZL3D 

lOHFAP 


261 


AX7 

120 

(X7) = MOVFIL « FILES TO MOVE 

262 


LX5 

360 

(X5I = MASK FOR FILE/REC COUNT 

263 


ZR 

X7,TAP0S4 


26H 

« 




265 

« 

POSITIONING BY FILES 


266 

• 




267 


Axa 

120 

(X2) = COFIL 

268 


AX3 

12D 

(X3) = NEWFIL 

269 


PL 

X7 , TAP0S2 


270 


BX7 

-X7 


271 


SB3 

X3 

(83) = NEWFIL 

272 


SB2 

X7 

(82) = MOVFIL 

273 


GT 

B3,B2.TAP0S2 

TO 8ACKSKIP FILE SECTION IF 

27t 

S' 

REMIND 

FET.R 

REWINO TAPE 

275 


SAl 

FET 

FETCH FET HEADER 

276 


MXO 

^2D 


277 


MX6 

0 

(X6) = 0 

278 


BXl 

X0«X1 

CLEAR REO/RTN FIELD 

279 


5X5 

S6+B7 

(X51 = 3 

280 


SA6 

A2 

SET CDLOC = 0 

281 


BX7 

X1+X5 

SET FILE MODE/ INTERLOCK BITS 

282 


SA7 

A1 

RESTORE FET HEADER 

283 


EQ 

B3,B0.TAP0S3 

OMIl FORWARD SKIP IF NEWF1L=0 

28t 


SX7 

B3 

SET MOVFIL - NEWFIL 

285 

« 




286 

TAPOSI 

BSS 

0 


287 


5AH 

FSFMAC+1 

FETCH OPERATION DESCRIPTOR 

288 


LX7 

IGD 

ROTATE MOVFIL 

289 


BX4 

X‘+*X5 

CLEAR FILE COUNT FIELD (N) 

290 


BX6 

XH+X7 

INSERT MOVFIL 

291 


SAG 

AH 

STORE OP DESCRIPTOR 

292 

rSFMAC 

SKI PF 

FET..17B,R 

FORWARD SKIP FILES 

293 


EQ 

TAP0S3 


29>f 

TAPOSa 

SAH 

BSFMAC+ 1 

FETCH OP DESCRIPTOR 

295 


LX7 

180 

ROTATE FILE COUNT 

296 


BXH 

Xif*X5 

CLEAR FILE COUNT FIELD 

297 


BX6 

Xif+X7 


298 


SA6 

A^ 


299 

BSFMAC 

SKIPB 

FET..17B.R 

BACKSKIP FILES 

300 

TAP0S3 

LX3 

120 

CDLOC = 4096* (NEWFIL- I) 

301 


BX6 

X3 


302 


SA6 

A2 

UPDATE CDLOC 

303 





301* 

« 

POSITION TAPE BY RECORDS 

305 

« 




306 

TAPOSH 

BSS 

0 


307 


SAS 

A2 


308 


SA3 

A3 


309 


SAl 

FET 


310 


MXO 

H20 


311 


BXl 

X0*XI 


312 


BX6 

X1+X3 


313 


SA6 

A1 


31>t 


MXO 

-120 


315 


1X7 

X3-X2 


316 


BX7 

-X0*X7 


317 


ZR 

X7 , TAP0S6 


318 


PL 

X7.TAP0S5 


319 


SA^ 

BSRMAC+1 


320 


BX7 

-X7 


321 


LX7 

180 


322 


BX4^ 

XH*X5 


323 


BX6 

X6+X7 


32H 


SAS 

AH 


325 

BSRMAC 

SKIPB 

FET,»0.R 

BACKSKIP RECORDS 

326 


EQ 

TAP0S6 


327 

TAP0S5 

SAH 

FSRMAC+1 


328 


LX7 

180 


329 


BX^ 

XH*X5 


330 


BX6 

XH+X7 


331 


SAG 

AH 


332 

FSRMAC 

SKIPF 

FET, ,0.R 

FORWARD SKIP RECORDS 

333 

4 




33‘t 

TAP0S6 

6X6 

X3 


335 


SA6 

A£ 

SET CDLOC ■= NEIA.OC 

336 


EQ 

lOMPOT 

RETURN TO CALLING PROGRAM 

337 

4 




338 

lOMREW 

SPACE 

2 


339 

444 

lOMREW 

(LFN) 


340 

4 




341 

4 

ENTRY POINT TO REWIND A 

FILE 

342 

4 




343 

4 

FORTRAN REFERENCE - 


344 

4 




345 

« 

CALL 

lOMREW (LFN) 


346 

4 




347 

4 

WHERE 
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N0ZL3D - lOMFAP 


3‘+8 

« 





3if9 

* 

LFN 

LOGICAL FILENAME 

350 

* 





351 


ENTRY 

lOMREW 



358 

lOMREW 

BSSZ 

1 


ENTRY/EXIT POINT 

353 


MX3 

0 



35^^ 


6X2 

0104B 



355 


MX4 

0 



356 


SX5 

BO 



357 


MX6 

0 



350 


Ho 

=XFErSETS 


ESTABLISH FET 

359 


REWIND 

FET.R 


REWIND MACRO 

360 


RJ 

FETRETS 


GET RET/ AT CODES 

361 


EQ 

lOMREW 


RETURN TO CALLING PROGRAM 

362 

SKPSYST 

IFEQ 

OS. SCOPE 



363 

« « 4 

eSKIPR/BSKlPF/FSKlPR/FSKlPF (LFN. N) 

36H 

* 





365 

* 

ENTRY 

POINTS TO SKIP 

RECORDS OR FILES 

366 

4 





367 

* 

FORTRAN REFERENCES - 



368 

4 





369 

* 

— 


— 


370 


. CALL 

BSKIPR (LIN. 

N) 


371 

■4 

CALL 

BSKIPF (LFN, 

N) 


37? 

* 

CALL 

FSKIPR (LFN. 

N) 


373 


CALL 

FSKIPF (LFN. 

N) 


374 

4 



— 


375 

4 





376 

4 

WHERE 




377 

4 





378 

4 

LFN 

LOGICAL FILE NAME 

379 

<» 





380 

4 

N 

NO. OF RECORDS 

OR FILES TO BE SKIPPED 

381 

4 


(MAX. 77776B) 


388 

4 





303 

4 





304 


ENTRY 

BSKIPR, BSKIPF, FSKIPR. FSKIPF 

305 

BSKIPF 

BSSZ 

I 



386 


SAt 

BSKIPF 


FETCH RETURN INSTRUCTION 

307 


584 

17B 


LEVEL=I7B (FILE! 

388 


585 

1 


05=1 FOR BACKWARD SKIP 

309 


EQ 

SKlPl 



390 

BSKIPR 

BSSZ 

I 


ENTRY POINT 

391 


SAt 

BSKIPR 


FETCH RETURN INSTRUCTION 

398 


SBt 

BO 


LEVEL=0 (RECORD) 

393 


585 

I 


B5=l FOR BACKWARD SKIP 

394 


EQ 

SKIPl 



395 

FSKIPF 

BSSZ 

1 


ENTRY POINT 

396 


SAt 

FSKIPF 


FETCH RETURN INSTRUCTION 

397 


SB4 

I7B 


LEVEL=17B (FILE) 

398 


SB5 

BO 


B5»0 FOR FORWARD SKIP 

399 


EQ 

SKIPl 



too 

FSKIPR 

BSSZ 

1 


entry POINT 

401 


SA4 

FSKIPR 


FETCH RETURN INSTRUCTION 

t08 


SB4 

BO 


LEVEL=0 (RECORD) 

403 


SB5 

BO 


B5*0 FOR FORWARD SKIP 

404 

SKIPl 

BSS 

0 



t05 


BX6 

X4 


(X6) = RETURN INST 

406 


SA6 

SKPRET 


STORE RETURN INSTRUCTION 

407 


MX3 

0 



408 


SX2 

0104B 



409 


MX4 

0 



410 


SX5 

BO 



411 


MX6 

0 



412 


RJ 

aXFETSETS 


ESTABLISH FET 

tl3 


SA2 

AI+B7 


ADDRESS IN) TO X2 

414 


SA2 

X2 


(X2) = N 

415 


SA3 

SKPTAB+B5 


FETCH CPC ARGUMENT WORD 

416 


MXO 

teo 



417 


SX5 

B4 


(X5) = RECORD LEVEL 

418 


BX2 

-X0«X2 


LIMIT N TO 6 OCTAL DIGITS 

419 


LX5 

14D 


ROTATE LEVEL FOR INSERTION 

420 


LX2 

18D 


ROTATE N 

t21 


BX6 

X3+X5 


INSERT LEVEL 

422 


BX6 

X6+X2 


INSERT N 

t83 


SA6 

SKPMAC +1 


STORE AFTER CPC REFERENCE 

424 

SKPMAC 

SAl 

FET 



425 


RJ 

^-XCPC 


ISSUE REQUEST 

426 


BSSZ 

I 



427 


RJ 

FETRETS 


GET CODE/STATUS 

428 

SKPRET 

BSSZ 

1 


RETURN TO CALLING PROGRAM 

429 


USE 

1 



430 

SKPTAB 

BSS 

0 



431 


VFD 

180/3,2/1 ,tOD/2tOB FSKIP REQUEST WORD 

438 


VFD 

18D/3.2/I ,tOD/6tOB BSKIP REQUEST WORD 

433 


USE 

0 



434 

SKPSYST 

END IF 





(FTN) 

(FTN) 


I 
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NOZL3D • 

lOMFAP 


*+35 

FAM6SG 

SPACE 

2 


*+36 

+ * 

UTILITY 

BLOCK TO PRINT 

INFORMATIVE MESSAGE 

*+37 





*+38 


EXT 

I OMESSG , LFNBFS , NCOCTLS 

*+39 

FAMESG 

BSS 

1 


*+*+0 


SA3 

=6H0+++ 


*+*+! 


SAl 

FET 

(XI) = LFN 

*+*ta 


BX7 

X2 


*+*+3 


SA7 

ASTM5G+1 

PUT OP ID IN ASTMSG(E) 

*+*+*+ 


BX6 

X3 


*+*+5 


SA6 

ASTMSG 

INITIALIZE ASTMSG(l) 

*+*+6 


RJ 

=XLFNBF$ 

BLANKFILL LFN IN (X6) 

*+*+7 


SA6 

A7+87 

STORE LFN IN ASTMSGtS) 

*+*+8 


RJ 

=XIOMESSG 

PRINT MESSAGE 

H*+9 


SBl 

1 

RESTORE (Bl) = I 

*+50 


EQ 

FAMESG 


*+5l 

* 




*+56 

4 * 

UTILITY 

CODE BLOCK FOR 

TERMINATION ACTIVITIES 

*+53 

• 




H5*+ 

• 

ENTRY - 

(X5) = RETURN 

INSTRUCTION 

*+55 





*+56 

FAEXIT 

BSS 

0 


*+57 


BX7 

X5 


*+58 


SA7 

FARETRN 

STORE RETURN INST 

*+59 


RJ 

=XFETRET$ 

GET RETURN PARAMETERS FROM FET 

*+60 


ZR 

XI .FARETRN 

EXIT IF STATUS = 0 

*+6l 


RJ 

sXNCOCTLS 

ENCODE STATUS IN (X6) 

*+62 


SA5 

:-lOHFAC STATUS 

*+63 


SAB 

ASTMSG+2 

PLACE STATUS IN ASTMSG(3) 

*+6*+ 


BX7 

X5 


*+65 


SA7 

A6-B7 

EXPLANATORY TEXT TO ASTMSG(2) 

*+66 


RJ 

=XIOMESSG 

PRINT STATUS MESSAGE 

*+67 

FARETRN 

PS 


RETURN TO CALLING PROGRAM 

1+68 

* 





lOMFIP 


NOZL3D - 


1 

•DECK 

lOMFIP 



s 

* *DECK 

lOMFlP 

lOMFIP ASSEMBLY 


3 


I DENT 

lOMFIP 




TITLE 

FILE INFORMATION/ IDENTIFICATION PROCEDURES 


5 

ASMCTL 

SPACE 

3 


6 

•CALL 

lOMACTL 



7 


IFEQ 

OS, NOS • 


8 


444 * 444444444444 * 

(NOS) 

g 

• EXTERNAL TEXT 

COMMON DECKS • 

(NOS) 

10 


(NOS) 

11 


END IF 

4 


1? 





13 

COMMON 

SPACE 

5 


1^ 

« « « 

COMMON BLOCK DECLARATION 


15 

4 




16 

« =PROCEOURE COMAST A 


17 

•CALL 

CDMASTA 


18 

4 




19 


USE 

/COMPAQ/ 


20 

CMSIZ 

BSS 

1 


21 

BCSIZ 

ess 

1 


22 

REQEL 

BSS 

1 


23 

LWAREC 

BSS 

1 


24 

BUFFER 

BSS 

0 


65 

PAD 

BSS 

30QB 


26 

* 




27 


USE 

0 


68 


SPACE 

3 


69 


444444444 * 

4444 ** 4 * 444444 ** 444 * 44444444444444 * 4444444444*4 

44**44 

30 

4 



4 

31 

4 

FILE INFORMATION FUNCTIONS INCLUDE FILENAME MANIPULATION 

* 

36 

4 

AND FILE/DEVICE STATUS ACQUISITION. 

* 

33 

4 



* 

3H 

4 

PROGRAMMED BY C.A. FELIPPA, OCT 1975 (HALLOWEEN DAY) 

4 

35 

4 

UPDATE - 

OCT 1977 (HALLOWEEN DAY) 

4 

36 

4 



4 

37 

4444444444444444444 

4 * 44444 * 44 * 44 * 444 * 444 ** 4444 *** 44 «* 44 ** 44444 * 44 * 4 * 4*44 

38 

4 



4 

39 

4 

A SUMMARY 

LIST OF PROCEDURES FOLLOWS. 

* 

40 

4 



* 


4 

FETSETS 

SETS UP A FILE ENVIRONMENT TABLE (FET) 

4 


4 



* 

43 

4 

FETRETS 

EXTRACTS RETURNS PARAMETERS FROM CURRENT FET. 

* 

44 

4 



* 

45 

4 

lOMLDIX 

EXTRACTS INFORMATION PERTAINING TO A LOGICAL 

* 

46 

4 


DEVICE INDEX IN FORMAT SUITABLE FOR DISPLAY. 

* 

47 

4 



4 

40 

4 

iomlfn 

QUERIES STATUS OF FILENAME IN RELATION TO JOB 

4 

49 

4 



4 

50 

4 

lOMCFC 

BREAKS UNIVAC-TYPE DEVICE NAME INTO QUALIFIER 

* 

51 

4 


(-OWNER’S ID), FILENAME, AND FILE CYCLE 

4 

52 

4 



* 

53 

4 

LFNBF 

(ALT COMPASS ENTRY LFNBFS) BLANKFILLS A LFN 

4 

54 

4 



4 

55 

4 

LFNZF 

(ALT COMPASS ENTRY LFNZF J) ZERO FILLS A LFN 

4 

56 

4 



4 

57 

4 

LJRJN 

LEFTJUSTIFY A RIGHT-JUSTIFIED NAME 


58 

4 



* 

59 

4 

LMXXXX 

14CRE XXXX ■= EQPC.DLOC. NEXT, SECT. UNIT ARE 

4 

60 

4 


FUNCTIONS TO GET AST INFORMATION FOR A GIVEN LDI . • 

61 

4 



4 

62 

4 

RFNBF 

(ALT COMPASS entry RJNBFS) BLANKFILLS A 


63 

4 


ZEROFILLED RIGHT-JUSTIFIED NAME STRING 


64 

4 



4 

65 

4 

NCOCTLS 

COMPASS-CALLABLE PROCEDURE FOR CONVERTING AN 

4 

66 

4 


1-9 DIGIT INTEGER TO OCTAL DISPLAY CODE 

4 

67 

4 



4 

68 

444444444444444444444444444444444444444444444444444444444444444444444444 

69 

FETSETS 

SPACE 

6 


70 

444 

FETSETS 



71 

4 




76 

FETSETS 

SPACE 

6 


73 

4 




74 

4 

COMPASS-CALLABLE PROCEDURE FOR SETTING UP 


75 

4 

A FILE ENVIRONMENT TABLE (FET) 


76 

4 




77 

4 

COMPASS REFERENCE - 


78 

4 




79 

4 

RJ 

FETSETS 


80 

4 




81 

4 

ENTRY register SET - 


86 

4 

(XI) 

ADDRESSmE/LFN, 18/FNT-POINTER) 


83 

4 


(LAST FIELD OPTIONAL) 


84 

4 

(X2) 

w/o.s/r.s/ep.s/xp.s/fetl, where 


85 

4 


R = RANDOM ACCESS BIT. EP = ERROR PROCESSING BIT, 

86 

4 


XP = EXTENDED ERROR PRCC BIT, FETL = SIZE(FET)- 

5 


I 
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B7 

B8 

B9 

90 

91 

92 

93 
9‘» 
95 
9B 

97 

98 

99 
100 
101 
102 
103 
lOif 

105 

106 

107 

108 

109 

110 
111 
112 
113 
im 

115 

116 

117 

118 


N0ZL3D - lOMFlP 

(X3) ADDRESS (BUFFER) 

(XH) N = SIZE OF BLXK TO BE XMITTED 
(X5) 0 IF READ CONDITION. N IF WRITE 

(X6) UMIT-ADORESS(BUFFER)-N 

EXIT RE61STER CONFIGURATION - 
(BI)=1, (B7)=l, (B6)>2 

B2,B3.BH,B5,A0.AI,A2,A3,X1,X3 PRESERVED 

At.AS.AB.AT.XO.XE.Xt.XB.XS.XT DESTROYED 

ENTRY VALUES OF (Xt) AND tX5) PLACED IN NWXF AND NWXWRT 
(BLOCK /CDMAST/), RESPECTIVELY. 


EXIT FET CONFIGURATION (SCOPE) - 

WORD / BIT 5 H 3 2 1 

98765432 1 098765432 1 098765432 1 0987654321098765432 1 098765432 1 0 

FET+0 — LOGICAL -FILENAME 11 

FET+1 R. .E. ..X FETL FIRST 

FET+2 IN 

FET+3 OUT- 

FET+4 -FNTPOINTER- —LIMIT 

FET+5 

FET+6 -(FETEXT-PO INTER)- 

FET+7 

FET+8 -EOI-XFER-ADORESS- 


ERROR-ADDRESS 


WHERE - 


FIRST 

IN 


ZERO BIT 
ADDRESS (BUFFER) 
ADDRESS (BUFFER) 
ADDRESS) BUFFER )+N 


ON READ-TYPE CONDITION 
ON WRITE-TYPE CONDITION 


119 

t 

OUT 

ADDRESS (BUFFER) 

120 

* 

LIMIT 

ADDRESS ( BUFFER ) +N+ ( X6 ) 

121 

« 

FETEXT 

POINTER 

ONLY SET IF XP-BIT => 1 

122 

« 




123 

* 

FOR NOS, WORDS FET+6 AND FET+8 ARE ZERO, AND THE XP 8 

124 

« 

(WORD 

FET+1) HAS NO 

EFFECT. 

125 

« 




126 


ENTRY 

FETSETS 


127 

FETSETS 

BSSZ 

1 

ENTRY/EXIT 

128 


SB7 

1 

(B7) » 1 

129 


BX7 

X4 

(X7) = N 

130 


1X4 

X3+X4 

(X4) « ADDRESS ( BUFFER )+N 

131 


SB6 

B7+B7 

(B6) - 2 

132 


NZ 

X6,*+l 


133 


SX6 

B7 

IF (X6) =• 0, SET (X6) - 1 

134 

+ 

SA7 

NWXF 

SAVE N IN NWXF 

135 


BX7 

X5 


136 


1X6 

X4+X6 

(X6) * LIMIT 

137 


SA7 

A7+B7 

SAVE ENTRY (X5) IN NWXWRT 

138 


MX7 

0 

(X7) " 0 

139 


SA6 

FET+4 

SAVE LIMIT IN FET+4 - FET(5) 

140 


IFEQ 

OS, SCOPE 


141 


SX6 

CPCERR 

FETCH ERROR-XFER AOS 

142 


BXO 

X6 

(XO) » ERROR XFER AOS 

143 


LXO 

30 


144 


BX6 

X0+X6 

COMPLETE ASSEMBLY OF FET(9) 

145 


ELSE 



146 


MX6 

0 

(X6) - 0 

147 


ENDIF 



148 


SA7 

RETCX 

CLEAR RETCOO 

149 


SBl 

XI 

SAVE (XI) IN B1 

150 


SA7 

A7+B7 

CLEAR EOFCOO 

151 


SA6 

FET+8 

STORE FET (9) 

152 


SA7 

A7+B7 

CLEAR STATUS 

153 


SA7 

A7+B7 

CLEAR TAPERR/DTLERR 

154 


SA7 

A7+B7 

CLEAR RSKCNT 

155 


BX6 

X3 

(X6) .OUT - AOORESSIBUFFER) 

156 


SA7 

A7+B7 

CLEAR NWROXF 

157 


SA7 

A6-B7 

CLEAR FET(B) 

158 


MXO 

420 

(XO) “ LFN MASK 

159 


SA7 

A7-B7 

CLEAR FET(7) 

160 


SA7 

A7-B7 

CLEAR FET (6) 

161 


1X7 

X3+X5 

(X7) - IN - ADORESS(BUFFER)' 

162 


SA6 

A7-B6 

FET(4) < OUT 

163 


SA5 

XI 

(X5) * LFN/FNTPNT 

164 


SA7 

A6-B7 

FET(3) » IN 

165 


SXl 

86+87 

(XI) « 3 

166 


BX6 

X0+X5 

(X6) « ISaATED LFN 

167 


BX5 

-X0*X5 

(X5) - ISOLATED FNTPNT 

168 


SA4 

A7+B6 

(X4) • LIMIT • FET(5) 

169 


BX6 

X6+X1 

SET INTERLOCK AND XMISSION M( 

170 


MXO 

-3 

(XO) - OCTAL DIGIT MASK 

171 


SA6 

A7-86 

STORE FET-HEAOER IN FET(l) 

172 


LX5 

480 

(X5) * LEFT JUSTIFIED FNTPNT 

173 


BXI 

-X0+X2 

(XI) =■ FETL 


(SCOPE) 

(SCOPE) 

(SCOPE) 

(SCOPE) 

(NOS) 


(X5) 
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NOZL3D ■ 

lOMFIP 



IIH 


BX7 

X5+Xif 

(X7) = MER6ED FNTPNT/LIMIT FIELDS 

W5 


AXE 

3 

R16HTJUSTIFY R/E/X BITS FIELD 


176 


SA7 

AH 

STORE FET(5) 


177 


BXif 

-xo*xa 

(X4) = XP BIT 


178 


BXE 

xo«xa 

CLEAR XP-BIT FIELD 


179 


LXE 

1 

SHIFT R/E BITS TO PROPER DISTANCE 

180 


BXE 

xa+xH 

REINSERT XP BIT 


181 


LXl 

18D 

ROTATE FETL 


182 


LXE 

HOD 

POSITION R/E/X FIELDS 


183 


BXI 

X1+X3 

(XI) s MERGED FETL/FIRST FIELDS 


18'* 


BX6 

xi+xa 

(X6) = MER6ED R/E/X/FETL/FIRST FIELDS 

185 


SA6 

A6+B7 

STORE FET(8) 


186 


SXI 

B1 

RESTORE (XI) 


187 


5B1 

B7 

(81 ) * 1 FOR NOS 


188 


IFEQ 

OS , SCOPE 



189 


2R 

XH.FETSETS 

EXIT IF XP=0 


190 


SX7 

FETEXr 

(X7) = ADDRESS OF FET EXTENSION 


191 


SX6 

B7 

(X6) = 1 


192 


SA6 

X7 

FETX(I) = 1 


193 


LX7 

30D 

ROTATE ADDRESS TO BITS 30-H7 


19t 


SA7 

A7+B6 

STORE FETX-PNT IN FET (7) 


195 


END IF 




196 


EQ 

FETSETS 

RETURN TO PROCEDURE CALLER 


197 

♦ 





198 

« * « 

fe;tset 

(LFN, Xa, BUFFER, N, NWRT) 


199 

* 





200 

« 





201 

* 

FORTRAN- 

•CALLABLE FORM OF FETSETS. USED PRIMARILY 


202 

« 

FOR DEBUGGING PURPOSES 



203 

« 





20** 


FORTRAN REFERENCE 



205 

« 





206 


CALL 

FETSET (LFN, 

xa. A, N, NWRT) 


207 

* 





208 


ENTRY 

FETSET 



209 

FETSET 

BSSZ 

I 



210 


SB7 

1 


(FTN) 

211 


SA2 

A 1+87 


(FTN) 

212 


SA3 

A2+B7 


(FTN) 

213 


SA2 

X2 


(FTN) 

21>f 


SA4 

A3+B7 


(FTN) 

215 


SA5 

A4+B7 


(FTN) 

216 


SA4 

X4 


(FTN) 

217 


SA5 

X5 


(FTN) 

218 


SX6 

87 



219 


RJ 

FETSETS 



220 


EO 

FETSET 

RETURN TO FORTRAN PROGRAM 


221 

« 





222 

FETRETS 

SPACE 

2 



223 

««« 

FETRETS 




22‘* 






225 

« 

COMPASS- 

CALLABLE PROCEDURE TO EXTRACT STATUS PARAMETER 


226 

« 

FIELDS FROM THE F.E.T. 

AND PUT ’EM IN SINGLE WORDS 


227 

« 





228 

« 

COMPASS 

REFERENCE - 



229 

« 





230 

« 

RJ 

FETRETS 



231 

« 





232 

« 

EXIT VALUES - 



233 

« 





23H 

* 

(B7)»l . 

(861=2, (X1)=STATUS 


235 

« 

RETCOO.EOl coo, STATUS, DTLERR STORED IN /CDMAST/ 


236 

« 

NWRDXF 

UPDATED BY OUT-IN+NWXWRT 


237 

* 





238 

« 

REGISTER 

UTILIZATION - 



239 


Bt.Ba.B3 

,B4,B5,A0,A4,A5,X0,X4,X5 PRESERVED 


2>t0 

« 

A1 ,Aa.A3 

,A6,A7,X1 ,X2,X3,X6,X7 DESTROYED 


21*1 

• 





2‘12 


ENTRY 

FETRETS 



2‘f3 

FETRETI 

BSSZ 

1 

ENTRY/EXIT 


2‘t‘t 


SB7 

1 



2W 


SAI 

FET+0 

(XI 1 = FET HEADER 


246 


SB6 

B7+B7 

(B6) ■= 2 


247 


MX6 

-9D 

(X6) = RETURN CODE MASK 


248 


SAB 

A1+B6 

(X2) = IN = FET+2 


249 


BX6 

-X6«Xl 

(X6I = RETCOD 


250 


SA3 

Aa+B7 

(X3) = OUT = FET+3 


251 


SA6 

RETCOD 

STORE RETURN CODE 


252 


AXl 

9 

RIGHTJUSTIFY EOI INDICATOR 


253 


MX6 

-1 



254 


1X7 

x3-xa i 

(X7) = OUT-IN 


255 


SAB 

NWXWRT 

(X2) = NWXF ON WRITE OP, ELSE 0 


256 


SA3 

NWRDXF 

(X31 = CURRENT NWRDXF 


257 


SA7 

OUTMIN 

PLACE (OUT- IN) IN OUTMIN 


258 


BX6 

-X6*X1 

(X6) = EOICOD 


259 


1X7 

XB-X7 

(X7) = IN-OUT+NWXWRT 


260 


SA6 

A6+B7 

STORE EOICOD 
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lOMFlP 



261 


1X7 

X7+X3 



262 


SA7 

A3 

STORE UPDATED NWRDXF 


263 


IFEQ 

OS, SCOPE 



261+ 


SAl 

A6+B7 

FETCH STATUS WORD 

(SCOPE) 

265 


ELSE 




266 


AXI 

1 

RIGHT JUSTIFY ABT CODE 

(NOS) 

267 


MX6 



(NOS) 

260 


BX6 

-X6*X1 

(X6) = ABT CODE 

(NOS) 

269 


LXl 

X6 


(NOS) 

270 


SA6 

A6+B7 

STORE IN STATUS 

(NOS) 

271 


ZR 

X6,FETRETS 


(NOS) 

272 


SAl 

FET+6 


(NOS) 

273 


SXE 

X6-1IB 


(NOS) 

27H 


MX3 

-12D 


(NOS) 

275 


BX6 

-X3<iXl 


(NOS) 

276 


N2 

XP,FETRETS 


(NOS) 

277 


SA6 

A6+B7 

STORE detailed ERROR CODE 

(NOS) 

278 


END IF 




279 


EQ 

FETRETS 

RETURN 


280 

CPCERR 

SPACE 

a 



281 


CPCERR 




282 

* 





283 

« 

OWNCODE 

ERROR PROCESSING 

PROCEPURE. NOTE THAT THIS 


28^ 

* 

CODE BLOCK USES ONLY REGISTERS A1 ,X1 ,A6,X6,X0. THIS 


285 

♦ 

IS IMPORTANT, FOR CPC USES ONLY THE 1ST FOUR. 


286 

« 





287 


IFEQ 

OS . SCOPE 



288 

CPCERR 

BSSZ 

1 


(SCOPE) 

289 


BX6 

XI 


(SCOPE) 

290 


AXI 

9D 

RIGHT JUSTIFY STATUS FIELD 

(SCOPE) 

291 


SAB 

FET 

FIX TO GODDAMN SCOPE, 5/79 

(SCOPE) 

292 


MXO 

-5 

MASK FOR STATUS FIELD 

(SCOPE) 

293 


BX6 

-X0*XI 

(X6) = STATUS 

(SCOPE) 

29^ 


SAl 

FET+6 

(XI) = FET(7) 

(SCOPE) 

295 


SA6 

STATUS 

STORE STATUS WORD 

(SCOPE) 

296 


AXI 

30D 

RIGHTJUSTIFY FETX-PNT FIELD 

(SCOPE) 

297 


ZR 

XI .CPCERR 

RETURN IF XP=0 

(SCOPE) 

298 


SAl 

XI 

(XI) = FET EXTENSION WORD 

(SCOPE) 

299 


BX6 

XI 

SAVE (XI) IN (X6) 

(SCOPE) 

300 


AX6 

IBD 

RIGHTJUSTIFY DETAILED ERROR 

(SCOPE) 

301 


BX6 

-X0«X6 

(X6) = TAPERR 

(SCOPE) 

302 


AXI 

24D 

RIGHTJUSTIFY RES SKIP COUNT 

(SCOPE) 

303 


MXO 

-16D 


(SCOPE) 

301+ 


SA6 

A6+B7 

STORE TAPERR 

(SCOPE) 

305 


BX6 

-X0«X1 

(X6) = RSKCNT 

(SCOPE) 

306 


SA6 

A6+B7 

STORE RSKCNT 

(SCOPE) 

307 


EQ 

CPCERR 

TO CPC EXIT WORD 

( SCOPE ) 

308 


END IF 




309 

lOMLDIX 

SPACE 

2 



310 

««« 

lOMLDIX 




311 

« 





312 

4 

EXTRACT 

INFORMATION PERTAINING TO A LOGICAL DEVICE INDEX 

313 

4 

(LDIX) AND PLACE IT IN FORMAT SUITABLE FOR TABLE PRINT 


31>+ 

4 

BY SUBROUTINE lOMTAB. 



315 

* 

ALL INPUT/OUTPUT IS DONE 

THROUGH BL OCK /CDMPAD/ . 


316 

4 





317 


ENTRY 

lOMLDIX 



318 

lOMLDlX 

BSSZ 

1 



319 


SAl 

LDIX 

(XI) = LDI INDEX 


320 


SB7 

1 

(B7) = 1 


321 


SB2 

MAXLDI 

(B2) = MAXLDI * AST ROW DIMENSION 

322 


SBl 

XI 

(B1 ) » LDI 


323 


SB6 

B7+B7 

(B6) = 2 


321+ 


SA3 

Bl+ASTYPE-l 

(X3) » ASTYPE(LDI) 


325 


SB3 

B2+B2 

(B3) = 2*MAXLDI 


326 


SAB 

A3-B2 

(X2) = ASTOPT(LDI) 


327 


SA5 

A3+B3 

(X5) “ ASTLOC(LDI) = CDLOC 


328 


SX7 

X3-4 

(X7) « ASTYPE(LDI)-4 = TYPEX 


329 


BX6 

X2 

(X6) « OPTX 


330 


SA7 

TYPEX 

STORE TYPEX 


331 


SAl 

ASTSEC+4+X7 

(XI) * ASTSEC(TYPEX+4) « SECTOR 

332 


SA6 

A7+B7 

STORE OPTX 


333 


BX6 

X5 

(X6) » CDLOC 


33^ 


SAB 

A5+B2 

(X2) » ASTNXTfLDI) 


335 


SA6 

A6+B6 

STORE CDLOC 


336 


BX7 

XI 

fX7) « SECTOR 


337 


SAl 

= 10H 

(XI ) = BLANK WORD 


338 


SB4 

X7 

SAVE SECTOR IN (B4) 


339 


SA3 

A2+B2 

(X3) = ASTLIM(LDI ) 


340 


SA7 

A7+B6 

STORE SECTOR 


341 


SA4 

A3+B2 

(X4) = ASTWXR(LDI ) 


342 


BX6 

X2 

(X6) = NEXT 


343 


SA5 

A4+B2 

(X5) = ASTWXW(LDI) 


344 


8X7 

X3 

rx*’) LIMIT 


345 


SA6 

A6+B7 

STORE NEXT 


346 


BX6 

XI 

(X6) = BLANK 


347 


SA7 

A6+B7 

STORE LIMIT 
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lOMFIP 



340 


SAB 

A6+B6 


STORE TRANSPARENT FULL DEV MARK 

349 


LX7 

X4 


(X7) « KWXRED 

350 


8X6 

X5 


(X6) = KWXWRT 

351 


SA4 

ASTCNT 


(X4) = KACTVD (ACTIVE DEVICE COUNTER) 

350 


SA7 

A7+B6 


STORE KWXRED 

353 


SA6 

A6+B6 


STORE KWXWRT 

354 


SX6 ' 

X4+B7 



355 


BXO 

XI 


SAVE aANK WORD IN (XO) 

356 


SA6 

A4 


STORE INCREMENTED KACTVD 

357 


SA5 

A4+B7 


(X5) = KFULLD (FULL DEVICE COUNTER) 

358 


PL 

X3.10MLDI1 


TEST FOR FULL DEVICE (NEG LIMIT) 

359 


SX7 

IR* 



360 


LX7 

54D 



361 


5X6 

X5+B7 


INCREMENT KFULLD BY 1 

360 


5A7 

A7-B7 


STORE FULL DEVICE MARK 

363 


SA6 

A5 


STORE UPDATED KFULLD 

364 

lOMLDIl 

BSS 

0 



365 


SAI 

TABFMT 14 


(XI) = TABFMT(I) 

366 


BX5 

XO 


(X5) = TABFMT(5) (OIR. ACCESS DEVICE) 

367 


SA0 

A1+B7 


(X0) = TABFMT(0) 

368 


SA3 

A1+B6 


(X3) = TABFMT(3) 

369 


BX6 

XI 



370 


SA6 

TABFMT+0 


STORE TABFMTd) 

371 


6X7 

X0 



370 


SA4 

A3+B7 


(X4) = TABFMT(4) (DIR. ACCESS DEVICE) 

373 


BX6 

X3 



374 


SA7 

A6+B7 


STORE TABFMT(0) 

375 


SAI 

A4+B7 


(XI) = TABFMT(6) 

376 


SA0 

A4+B6 


(X0) « TABFMT(7) 

377 


SA6 

A6+B6 


STORE TABFMT (3) 

378 


BX7 

XO 


(X7) » BLANK 

379 


GT 

B4. IOMLDI0 


BRANCH AS PER SECTOR VALUE 

380 


SA4 

A0+B7 


(X4) = TABFMT(4) (TAPE DEVICE) 

381 


SA5 

A0+B6 



380 


SA7 

LIMIT 


BLANK OUT LIMI r WORD 

393 


SA7 

SECTOR 


BLANK OUT SECTOR WORD 

384 

IOMLDI0 

BSS 

0 



385 


LX6 

X4 



386 


8X7 

X5 



387 


SA6 

A6+B7 


STORE TABFMT (4) 

388 


BX8 

XI 



389 


SA7 

A6+B7 


STORE TABFMT(51 

390 


BX7 

X0 



391 


SAI 

ASTLFN-I+81 


(XI ) « ASTLFNaOI ) 

390 


SA6 

A6>B6 


STORE TABFMT (B) 

393 


SA5 

AI-B0 


(X5) = PFN « ASTPFN(LDI) 

394 


SA7 

A7+B6 


STORE TABFMT(7) 

395 


BX7 

X5 



396 


SA7 

PFN 



397 


RJ 

LFNBFS 


BLANKFILL LFN IN (X6) 

398 


SA6 

LFNAME 


STORE BLANK-PADDED LFN 

399 


2R 

X5.10MLDIX 


EXIT IF PFN=0 (LOCAL FILE) 

400 


8X1 

X5 


(XI ) = PFN 

401 


RJ 

LFNBFS 


BLANKFILL PFN IN (X6) 

400 


MXO 

-6 



403 


SA6 

PFN 


STORE BLANK-PADDED PFN 

404 


BX6 

-X0*X5 


(X6) = PFN CYCLE 

405 


SA6 

A6+B7 


STORE PFNCY 

406 


SAI 

A5-B0 


(XI) == PFNID = ASTQFR(LDI) 

407 


RJ 

RFNBFS 


BLANKFILL PFNID IN (X6) 

408 


SA6 

PFN ID 


STORE BLANK-PADDED PFNID 

409 


EQ 

lOMLOlX 


RETURN TO CALLING PROGRAM 

410 

rABFMT14 

DIS 

4. (0H +13, 

0XA7,0XO4, 014, 14,317, 

411 

TABFMT67 

DIS 

0.A1 .0I0.0H 

+ ) 


^10 

TABFMT45 

DIS 

0,A4, 1X06, 1X06. A7, (TAPE DEVICE) 

413 

LDIX 

EQU 

PAO+64 



414 

LFNAME 

EQU 

PAD+65 



415 

FQCODE 

EQU 

PAO+66 



416 

TYPEX 

EQU 

PAD+67 



417 

OPTX 

EQl.' 

PAD+68 



418 

SECTOR 

EQU 

PAD+69 



419 

CDLOC 

EQU 

PAD +70 



400 

NEXT 

EQU 

PAO+71 



401 

LIMIT 

EQU 

PAD+70 



40? 

MARK 

EQU 

PAD+73 



403 

KWXRED 

EQU 

PAD+74 



404 

KWXWRT 

EQU 

PAD+75 



405 

PFN 

EQU 

PAD+76 



406 

PFNCY 

EQU 

PAO+77 



407 

PFN ID 

EQU 

PAD+78 



400 

TABFMT 

EQU 

PAD+80 



409 

* 





430 

lOMl.FN 

SPACE 

0 



431 


lOMLFN 

(LFN) 



430 






433 

* 

FUNCTION 

TO QUERY STATUS 

OF LOGICAL FILE NAME IN 

434 

* 

RFIAT !0N 

TO JOB 




PACK i ?6 



N0ZL3Q - lOMFIP 


itss 

* 




itze 

4 

FORTRAN REFERENCE - 


H37 

t 




itsa 

« 

LFNST >= 

lOMLFN (LFN) 

1+39 

4 




t'+O 

4 

WHERE 



‘+H1 

4 




we 

4 

LFN 

LOGICAL FILENAME 

‘+‘+3 

4 




w>+ 

4 

lOMLFN 

ZERO, LFN 

IS NOT ASSIGNED TO JOB 

W5 

4 


NEGATIVE, 

LFN IS A LXAL FILE 

‘*'♦6 

« 


POSITIVE, LFN IS ATTACHED PERM FILE 

W7 

4 


6ITS 0->+ OF lOMLFN CONVEY INFORMATION AS 

W0 

4 




W9 

4 


REGARDS ACCESS PERMISSIONS (SEE SCOPE 3.>+ MANUAL) 

>+50 


ENTRY 

lOMLFN 


>+51 

lOMLFN 

055 

1 

ENTRY/EXIT 

>+5e 


MX7 

0 

(X7) = 0 

>+53 


5A5 

XI 

LFN TO (X5) (FTN) 

>+5>+ 


5A7 

FET+2 


>+55 


507 

I 


>+56 


SA7 

A7-B7 


>+57 


MXO 

^20 

GENERATE LFN MASK 

>+5B 


5A6 

A7-B7 

SET LIST HEADER 

>+59 


0X6 

XQ4X5 


>+60 


5A6 

A7 

STORE LFN 

>+Bl 


IFEQ 

OS, SCOPE 


>+6a 


PERM 

FET,RC 

PERM MACRO (SCOPE) 

>+63 


ENOIF 



>+6>+ 


5A5 

FET 

(X5) = EXIT WORD 

>+65 


MXO 

-9D 


>+B6 


AX5 

90 

RIGHTJUSTIFY RETURN FIELD 

>+67 


0X5 

-X0*X5 

EXTRACT RETURN FIELD 

>+60 


5X6 

X5 

PLACE IN (X6) 

>+69 


AX5 


RIGHTJUSTIFY BIT 13 

>+70 


ZR 

X5, lOMLFN 

EXIT IF PERM OB NONEXISTING FILE 

>+7l 


0X6 

-X6 

COMPLEMENT (X6) IF LOCAL FILE 

>+7a 


EQ 

lOMLFN 

RETURN 

>+73 

4 




>+7>+ 

lOMQTC 

5PACE 

S 


>+75 

444 

lOMQFC 

(EON, QFC) 


>+76 

4 




>+77 

4 

TO BREAK 

DOWN UN I VAC 

-TYPE DEVICE NAME TEXTSTRING INTO 

>+70 

4 

PRIMITIVE COMPONENT5 

- QUALIFIER, FILENAME, CYCLE 

>+79 

4 




>+00 

4 

FORTRAN REFERENCE - 


>+01 

4 




>+ee 

4 

CALL 

lOMQFC (EON, QFC) 

>+03 

4 




H0>+ 

4 

WHERE 



>+05 

# 




>+06 

4 

EON 

EXTERNAL DEVICE NAME SUPPLIED (AS 8ND ARGUMENT) 

>+07 

4 


TO DMDAST. 

ITS GENERAL FORM IS 

>+00 

4 


QUALIFIER»FILENAME(FCYCLE) , 80 CHARS MAX 

>+09 

4 


FIRST/LAST 

COMPONENTS ARE OPTIONAL 

>+90 

4 




>+91 

4 

QFC 

THREE WORD 

OUTPUT ARRAY RECEIVING - 

>+9B 

4 


QFC(l) QUALIFIER (1-7 CHARS) RJ, ZEROFILLED 

>+93 

4 


QFCiei FILENAME (1-7 CHARS) LJ, ZEROFILLED 

>+9>+ 

4 


(rC(3) DECODED CYCLE NUM0ER 

>+95 

4 


IF ANY COMPONENT IS MISSING, THE CORRESPONDING 

>+96 

4 


ENTRY OF OFC WILL RECEIVE ZERO. 

>+97 

4 




>+90 


ENTRY 

lOMQFC 


>+99 

GETQFC 

BSS 

0 


500 

lOMQFC 

BSSZ 

1 


501 


SB7 

1 

(B7) *= 1 

5oe 


MXO 

6 

(XO) = CHAR MASK 

503 


SA8 

AI+B7 

(X2) » ADDRESS(QFC) (FTN) 

50>+ 


MX6 

0 

(X6) « 0 (FTN) 

505 


SAl 

XI 

(XI) « EDN(l) (FTN) 

506 


MX7 

0 

(X7) » 0 (FTN) 

507 


SA2 

X2 

(A2) POINTS TO QFC(l) (FTN) 

500 


5B6 

1R( 

(B6) a FCYCLE DELIMITER 

509 


SB5 

1R« 

(85) a QUALIFIER DELIMITER 

510 


SA6 

A2 

QFC(l) = 0 

511 


SA7 

A2+B7 

CFC(2) a 0 

5ie 


SX5 

-2 

(X5) a - MAX. WORDS IN EDN 

513 


5B3 

60-H-8 

(B3) a 60-H9. BEING MAX BITS/QF 

51>+ 


SB^ 

1R9 

(B^t) a LARGEST ALPHANUMERIC CHAR 

515 


LXO 

6 

(XO) a RIGHT JUSTIFIED CHAR MASK 

516 


SAG 

A7+B7 

QFC(3) = 0 

517 


SX4 

IRQ 

(X4) a IRO FOR FCYCLE DECODE 

510 

4 




519 

GETQFC 1 

BSS 

0 


520 


MX6 

0 

(X6) a 0 

581 


SB2 

60 

INITIALIZE (X6)-LJ COUNTER 
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NOZL3D - 

lOMFIP 


52? 


MX7 

0 


523 

GETQFC2 

BSS 

0 


52H 


LXl 

6 

RIGHT JUSTIFY NEXT CHAR 

525 


8X2 

X0*X1 

ISOLATE CHAR IN (X2) 

526 


SBl 

xa 

PLACE CHAR IN (81) FOR TESTS 

527 


8X1 

“XO«XI 

CLEAR VACATED POSITION IN (XI) 

528 


EQ 

B! .CETQFC7 

GET OFF SCANLOOP ON ZERO BYTE 

529 


GT 

Bl,B^,GETQFC^ 

TEST FOR SPECIAL CHAR (CODE GT 1R9) 

530 


LE 

B2,B3.GETQFC3 LIMIT (X61STRING TO 7 CHARACTERS 

531 


LX6 

6 

FOREPLAY ON (X6) 

532 


SB2 

82-6 

DECREMENT LEFTJUSTIFIER COUNT 

533 


8X6 

X2+X6 

SIX BITS TO PASSION PIT 

53t 


LX7 

82, X6 

(X7) * LEFTJUSTIFIED OUTPUT STRING 

535 

GETQFC3 

BSS 

0 


536 


NZ 

XI ,GETQFC2 

TEST FOR SOURCE STRING EXHAUSTION 

537 


SX5 

X5+B7 

INCREMENT EON WORD COUNT 

538 


SAl 

A 1+87 

LOAD NEXT EDN WORD IN (XI) 

539 


NG 

X5,GETQFC2 

CONTINUE SCAN IF (X5) LT 0 

5>t0 


EQ 

GETQFC7 

ELSE GET OFF LOOP 

5>tl 

GETOFC^ 

BSS 

0 

SPECIAL CHAR TESTS FOLLOW 

542 


NE 

B1,B5,GETQFC5 

TEST FOR ASTERISK (QUAL DELIMITER) 

543 


SB3 

18 


544 


SA6 

A2 

STORE QUALIFIER IN QFC(l) 

545 


SB5 

80 

DEFUSE QUAL DELIMITER TRAP 

546 


NZ 

XI .GETCfCl 

RESUME SCAN FROM TOP IF (Xl)NZ 

547 


EQ 

GETQFC6 


548 

GETCFC5 

BSS 

0 


549 


NE 

ai,B6,GETQFC7 

ABANDON SCAN ON ANY SPEC CHAR BUT 1R( 

550 


SA7 

A7 

STORE FILENAME IN QFC(2) 

551 


SB6 

80 

TURN OFF CYCLE DELIMITER TRAP 

552 


NZ 

XI .GETQFCl 

RESUME SCAN FROM TOP IF (Xl)NZ 

553 

GETQFC6 

BSS 

0 


554 


SX5 

X5+B7 

INCREMENT EDN WORD COUNT 

555 


SAl 

A 1+87 

LOAD NEXT EDN WORD IN (XI ) 

556 


NG 

X5, GETQFCl 

CONTINUE SCAN IF (X5) LT 0 

557 

# 




558 

GETQFC7 

BSS 

0 

TERMINATION SECTION FOLLOWS 

559 


EQ 

B6,GETQFC8 

TEST FOR NAME/CYCLE 

560 


SA7 

A7 

STORE FILENAME IN QFC(2) 

561 


EQ 

lOMQFC 

EXIT 

562 

GETOFC0 

BSS 

0 

FILE CYCLE DECODING FOLLOWS 

563 


8X7 

X0+X6 

(X7) = ENCODED LAST FC DIGIT 

564 


AX6 

6 


565 


8X6 

X0*X6 

(X6) = ENCODED FIRST FC DIGIT IF ANY 

566 


SBl 

X6 


567 


1X7 

X7-X4 

CONVERT FIRST DIGIT TO NUMERIC 

568 


GT 

81 ,84, GETQFCIO 


569 


1X6 

X6-X4 

CONVERT FIRST DIGIT TO NUMERIC 

570 


SBl 

X6 


571 


LX6 

3 


572 


LE 

81 , GETQFCIO 


573 


1X7 

X6+X7 


574 


SBl 

Bl+Bl 


575 


SX7 

X7+B1 

(X7) = DECODED FILE CYCLE 

576 

GETQFCIO 

BSS 

0 


577 


SA7 

A7+B7 

STORE FILE CYCLE IN QFC(3) 

578 


EQ 

IQMQFC 

EXIT 

579 

LFNBF 

SPACE 

2 


580 

««« 

LFN8F 

(LFNI 


581 

« 




582 


FUNCTION 

PROCEDURE TO BLAM<F1LL A LOGICAL FILE NAME WORD. 

583 

« 




584 

« 

FORTRAN REFERENCE! 


585 

• 




586 

« 

LFN8 = 

LFNBF (LFN) 


587 

« 




588 

* 

WHERE LFN 

IS WORD HOLDING A ZERO-FILLED LFN STRING 

589 

« 




590 

• 

COMPASS REFERENCE - 


591 

t 




592 

« 

(XI) » 

LFN 


593 

« 

RJ 

LFNBFS 


594 

« 




595 

* 

THE RESUL 

T RETURNS IN THE 

: FUNCTION REGISTER (X6) 

596 

* 

(B6) . (B7) 

ARE SET TO e.t 

RESPECTIVELY. 

597 

* 




598 





599 


ENTRY 

LFNBF, LFNBFS 


600 

LFNBFS 

BSS 

1 

COMPASS-CALLABLE ENTRY POINT 

601 


MX6 

60D 

(X6) = FULL WORD MASK 

602 


SB6 

7 

(86) = MAX. CHARS IN LFN 

603 


BX2 

XI 

(X2) = INPUT LFN 

604 


MX3 

6 

(X3) = CHAR EXTRACTION MASK 

605 


S97 

1 

(87) = 1 

606 

LFNBF 1 

BSS 

0 


607 


BXl 

x3*xa 

ISOLATE CHARACTER IN (XI) 

608 


ZR 

XI .LFNBF? 

EXIT LOOP ON ZERO BYTE 
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N0ZL3O - 

lOMFIP 


609 


6X6 

-X3«X6 

CLIP MASK 

610 


S86 

66-67 

DECREMENT COUNTER 

611 


LX3 

540 

ROTATE (X3) ONE CHAR RIGHT 

612 


GT 

B6,LFNBF1 

CYCLE IF LESS THAN 7 CHARS PROCESSED 

613 

LFNBF2 

6SS 

0 


614 


SAl 

= 10H 

(XI) > 6LANK WORD 

615 


6X2 

-X6«X2 

CLEAR TRAILING GARBAGE 

616 


586 

67+87 

(66) => 2 

617 


6X1 

X6+X1 

CLIP BLANKFILL 

616 


6X6 

X1+X2 

FORM RESULT 

619 


EQ 

LFN6FS 

RETURN 

620 

LFNBF 

ess 

1 

FORTRAN-CALLAaE ENTRY 

621 


SAl 

XI 

(XI) » LFN (FTN) 

622 


RJ 

LFN6FS 


623 


EQ 

LFNBF 


624 

LFNINC 

SPACE 

2 


625 

««« 

LFNINC(LFN) 


626 

« 




627 

< 

FUNCTION 

PROC TO INCREMENT LAST CHAR OF LOGICAL FILENAME 

628 

« 




629 


ENTRY 

LFNINC 


630 

LFNINC 

BS5 

1 

ENTRY POINT 

631 


SAl 

XI 

(XI) » LFN (FTN) 

632 


SB7 

1 

(87) * 1 

633 


MXO 

-6 

(XO) = CHAR EXTRACTION MASK 

634 


S65 

le 


635 


S66 

5H 


636 


MX2 

IS 


637 


AX I 

18 


636 


SX7 

87 

(X7) = 1 

639 


BXl 

“XE^Xl 


640 

LFNINCl 

BS5 

0 


641 


BX2 

>X0*X1 

ISOLATE CHAR IN (X2) 

642 


NZ 

X2.LFNINC2 

EXIT LOOP ON NONZERO BYTE 

643 


SB5 

B5+6 

ADVANCE SHIFT COUNT 

644 


AXl 

6 

NEXT CHAR INTO POSITION 

645 


LT 

B5,B6, LFNINCl 

CYCLE 

646 

LFNINCe 

BSS 

0 


647 


1X6 

X1+X7 

FORM RESULT IN (X6) 

648 


LX6 

B5,X6 

LEFTJUSTIFY STRING 

649 


EQ 

LFNINC 

RETURN 

650 

LFNZF 

SPACE 

2 


651 

««« 

LFNZF 

(LFN) 


652 





653 

« 

FUNCTION PROCEDURE TO ZEROFILL A LFN STRING. LAST 16 

654 

• 

GITS ARE 

NOT MODIFIED. 


655 

« 




656 

« 

FORTRAN REFERENCE - 


657 

« 




656 

« 

LFNZ = 

LFNZF (LFN) 


659 

« 




660 

« 

WHERE LFN 

1 IS A WORD CONTAINING A LFN STRING DELIMITED 

661 

« 

GY ZERO GYTE OR A SPECIAL CHARACTER (CODE GT 446) 

662 

« 




663 

« 

COMPASS REFERENCE - 


664 

« 




665 

« 

(XI) = 

LFN 


666 

« 

RJ 

LFNZFS 


667 

« 




668 

« 

RESULT RETURNS IN THE FUNCTION REGISTER (X6) 

669 

« 




670 

« 




671 

« 

REGISTERS USED 6Y LFNZF$& XO .X2.X3,e2.63 

672 

« 

(661,(67) 

SET TO 2,1, RESP., (64) RESTORED. 

673 

« 




674 


ENTRY 

LFNZF, LFNZFS 


675 

LFNZF2 

6SS 

0 


676 


6X6 

-X6+X1 

INJECT ZERO FILL 

677 


S66 

67+67 

(66) * 2 

676 


SS4 

X3 

RESTORE (64) 

679 

LFNZFS 

BSS 

1 

COMPASS-CALLABLE ENTRY 

660 


SX3 

64 


661 


MXO 

6 

(XO) - CHAR EXTRACTION MASK 

662 


S66 

7 

(66) = MAX LFN CHARS 

663 


S84 

60 


684 


MX6 

42D 

42-81 T MASK IN (X6) 

665 


SB3 

1R9 

(63) * 446 FOR SPECIAL CHAR TESTS 

666 


S67 

1 

(67) = 1 

667 

LFNZF 1 

GSS 

0 


688 


6X2 

X0*X1 

ISOLATE CHAR IN (X2) 

669 


S64 

64+6 

INCREMENT NOMINAL SHIFT COUNTER 

690 


S66 

66-67 

DECREMENT CHAR COUNTER 

691 


LX2 

64, X2 

RIGHTJUSTIFY CHARACTER 

692 


SB2 

X2 

(62) = CHAR TO TEST 

693 


EQ 

B2,LFNZF2 

EXIT LOOP ON ZERO BYTE 

694 


GT 

62,B3,LFNZF2 

OR SPECIAL CHARACTER 

695 


6X6 

-X0+X6 

ZERO WINDOW ON MASK WORD 
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NOZL3D 

lOMFIP 


696 


LXO 

5>tD ROTATE (XO) TO NEXT CHAR POSITION 

697 


GT 

ae.LFNZFl CYCLE IF LESS THAN 7 CHARS 

PROCESSED 

698 


EQ 

LFNZFE 


699 

LFNZF 

BSS 

1 FORTRAN-CALLABLE ENTRY 


700 


SAl 

XI (XI) = LFN 

(FTN) 

701 


RJ 

LFNZFS 


708 


EQ 

LFNZF 


703 





70*+ 

LJRJN 

SPACE 

' 2 ' 


705 


LJRJN 

(RJN) 


706 

« 




707 

« 

TO LEFTJUSTIFY A R I GHT JUST I F 1 ED NAME STRING 


708 

« 




709 

« 

FORTRAN REFERENCE - 


710 

« 




711 

« 

NAME » 

LJRJN (RJN) 


712 





713 

« 

WHERE 



7m 

4 




715 

• 

RJN 

RIGHT JUSTIFIED TEXTSTRING WITH ZERO/BLANK 

FILL 

716 


LJRJN 

LEFTJUSTIFIED NAME WITH SAME FILL TYPE 


717 

4 




718 


ENTRY 

LJRJN 


719 

LJRJN 

BSS 

1 


720 


SAl 

XI 

(FTN) 

721 


SB6 

10 


722 


MX2 

-6 


723 


SB3 

IR9 


721+ 


BX6 

XI 


725 


LXl 

6 


726 

LJRJN 1 

BSS 

0 


727 


BX2 

-X2*X1 


728 


SB6 

B6-1 


729 


SB2 

X2 


730 


EQ 

B2.LJRJN2 


731 


LE 

B2.B3, LJRJN 


732 

LJRJN2 

LXl 

6 


733 


MX2 

-6 


73^ 


LX6 

6 


735 


GT 

B6,LJRJN1 


736 


EQ 

LJRJN 


737 

LMXXXX 

SPACE 

2 


738 

444 

LMOLOC 

(LDI) LMEQPC(LDI) LMIFNM(LDI) 


739 

444 

LMLIMT 

(LDI) LMNEXT(LDI) LMSECT(LOI) 


740 

4 4 4 

LMUNIT 

(LDI) 



7*+l « 

* USER-PROGRAM CALLABLE ENTRIES TO RETRIEVE AST 

71+3 ♦ DATA PERTAINING TO A LOGICAL DEVICE INDEX (LDI) 


7W 

4 





745 

4 

FORTRAN 

REFERENCE - 



746 

4 

INF = 

LM XXXX (LDI ) 



747 

4 





748 

4 

WHERE 

XXXX = EQPC, DLOC, NEXT, SECT, UNIT TO RETRIEVE 


749 

4 

EQUIPMENT CODE, CURRENT 

DEVICE LOCATION, NEXT FREE 


750 

4 

LOCATION, SECTOR SIZE, ANO UNIT NUMBER, RESPECTIVELY, 


751 

4 

ASSOCIATED WITH THE LOGICAL DEVICE INDEX LDI, 


752 

4 





753 

4 

NOTE - 

ONLY LMSECT TESTS FOR LEGAL LDI RANGE. 


754 

4 





755 


ENTRY 

LICOPC. LMOLOC 

, LM I FM^ . LML I MT . LMNEXT . LMSECT . LMUN I T 

756 

LMEQPC 

BSS 

1 



757 


SAl 

XI 

(XI) = LDI 

(FTN) 

758 


sei 

XI 



759 


SAl 

ASTEQC-l+81 



760 


8X6 

XI 

(X6) = ASTEQC(LDI) 


761 


EQ 

LMEQPC 



762 

LMDLOC 

BSS 

1 



763 


SAl 

XI 

(XI) = LDI 

(FTN) 

764 


SBI 

XI 



765 


SAl 

ASTLOC-l+Bl 



766 


8X6 

XI 

(X6) ASTLOC(LDI) 


767 


EQ 

LMOLOC 



768 

LMIFNM 

BSS 

1 



769 


SAl 

XI 

(XI) = LDI 

(FTN) 

770 


SBI 

XI 



771 


SAl 

ASTLFN-l+Bl 



772 


RJ 

LFNBF5 

BLANKFILL LFN 


773 


EQ 

LMIFNM 



774 

LMNEXT 

BSS 

1 

'' 


775 


SAl 

XI 

(XI) = LDI 

(FTN) 

776 


SBI 

XI 



777 


SAl 

ASTNXT-l+Bl 



778 


8X6 

XI 

(X6) = ASTNXT(LDI) 


779 


EQ 

LMNEXT 



780 

LMLIMT 

BSS 

1 



781 


SAl 

XI 

(XI) = LDI 

(FTN) 

782 


SBI 

XI 
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NOZL3D - 

lOMFlP 



783 


SAl 

ASTLIM-l+Bl 



701+ 


BX6 

XI 

(X6) = ASTLIM(LDI) 


795 


EQ 

LMLIMT 



786 

LMSECT 

B5S 

1 



787 


SAl 

XI 

(XI) = LDl 

(FTN) 

708 


SB6 

MAXLOI 

(B6) = LARGEST ALLOWED LDl 


789 


5B1 

XI 

(Bl) = LDl 


790 


SX6 

-1 

(X6) = -I 


791 


LE 

ai ,lmsect 

RETURN (XS)=-| IF LDl LE 0 


792 


GT 

B1,B6,LMSECT 

RETURN (X6)=-I IF LDl GT 16 


793 


SA2 

ASTEQC-l+Bl 

(X2) = ASTEQC(LDI) 


79if 


SA3 

ASTYPE-l+Bl 

(X3) = ASTYPE(LDI) = TYPEX+>t 


795 


2R 

X2,LMSECT 

RETURN (X6)=-l IF LDl IS INACTIVE 

796 


MXO 

-3 

(XO) a 57-BlT MASK 


797 


BX3 

-X0»X3 

(X3) a TYPEX+4 IN RANGE (0.7) 


798 


SAl 

ASTSEC+X3 

(xn a astsec(Typex+5) 


799 


BX6 

XI 

(X6) a SECTOR SIZE 


800 


EQ 

LMSECT 

RETURN TO CALLING PROGRAM 


801 

LMUNIT 

BSS 

1 



802 


SAl 

XI 

(XI) = LDl 

(FTN) 

803 


SBl 

XI 



80^ 


SAl 

ASTUNT-mBl 



805 


BX6 

XI 

(X6) = ASTUNT(LDI) 


806 


EQ 

LMUNIT 



807 

* 





808 

NCOCTLS 

SPACE 

2 



809 


NCOCTLS 




810 

« 





8tl 


TO CONVERT A 1-9 DIGIT 

POSITIVE INTEGER TO OCTAL 


812 


DISPLAY 

CODE FORMAT 



013 

* 





8m 

* 

COMPASS 

REFERENCE - 



815 

• 





816 

* 

(xn = 

INTEGER TO BE ENCODED 


017 

* 

RJ 

NCOCTLS 



818 

« 





019 

* 

THE RESULT RETURNS IN 

(X6) 


820 

« 





821 

« 

REGISTERS USE08. Al ,X1 .X2.X3.X6 


822 

* 

EXIT (B6)=2. (B7)=l 



823 






024 


ENTRY 

NCOCTLS 



825 

NCOCTLS 

BSS 

1 

ENTRY /EX IT 


826 


MX2 

-270 



827 


SB6 

BO 

INITIALIZE BIT COUNTER 


828 


BX2 

-X2*X1 

LIMIT INTEGER TO 9 OCTAL DIGITS 


829 


MX3 

-6 

(X3) a RJ CHAR MASK 


830 


SAl 

alOH 

B 


831 


SB7 

6 

(B7) a 6 


032 

NCOCTLl 

BSS 

0 



033 


MX6 

-3 

(X6) a OCTAL DIGIT MASK 


034 


SB6 

B6+87 

ADVANCE BIT COUNT BY 6 


835 


6X6 

-X6-X2 

ISOLATE OCTAL DIGIT IN (X6) 


836 


LX3 

6 

POSITION CHAR MASK 


837 


SX6 

X6+1R0 

OCTAL DIGIT TO DISPLAY CODE 


838 


BXl 

X3«Xl 

CARVE CHAR WINDOW IN (XI) 


839 


LX6 

B6.X6 

ROTATE ENCODED DIGIT CHAR 


840 


AX2 

3 

ALIGN NEXT DIGIT OF SOURCE WORD 


041 


6X1 

X1+X6 

STUFF ENCODED DIGIT IN RESULT WORD 

842 


NZ 

X2. NCOCTLl 

CONTINUE IF SOURCE WORD IS NZ 


843 


S87 

1 

RESTORE (B7) = 1 


044 


BX6 

XI 

PUT RESULT IN (X6) 


045 


SB6 

B7+B7 

RESTORE (86) a s 


846 


EQ 

NCOCTLS 

EXIT 


047 

RFNBF 

SPACE 

2 



840 


RFNBF IRFNl 



849 

« 





850 

« 

INJECT BLANKFILL IN A 

ZEROFILLED RIGHTJUSTIFIED FILENAME 


051 

* 





852 

« 

FORTRAN 

REFERENCE - 



853 

« 





854 

« 

RFNB * 

RFNBF (RFN) 



855 

« 

WHERE 




856 

♦ 





857 


REN 

ZERO-FILLED 1 

RIGHT JUSTIFIED CHAR STRING 


858 

« 

RF1«F 

SAME AS RFN. 

WITH 0-FlLL REPLACED BY BLANKFILL 


859 






860 

* 

COMPASS 

REFERENCE - 



861 

* 





862 

« 

(XI) = 

LFN 



863 

« 

RJ 

RFNBFS 



064 

* 





865 

« 

THE RESULT RETURNS IN 

(X6) 


866 

« 

REGISTERS DESTROYED BY 

RFNBFSfi. B6.XI .X2,X3,X4.X6 


067 

« 





868 

« 





869 


ENTRY 

RFNBF. RFNBFS 








NOZL3D - 

lOMFlP 


870 

RFNBFS 

BSS 

1 

COMPASS-CALLABLE ENTRY POINT 

971 


BX6 

XI 

INITIALIZE RESULT REGISTER 

879 


MXl 

6 

(X!) = LJ CHAR MASK 

873 


5X3 

IR 

(X3) - FILL CHAR 

974 


SB6 

10 

MAX CHARS IN STRING 

875 


SB7 

1 

(B7) - 1 

876 

RFNBF I 

BSS 

0 


877 


BX? 

X1*X6 

EXTRACT CHARACTER 

878 


LXI 

54D 

ROTATE MASK 

879 


NZ 

xa.RFNBFS 

EXIT ON NONZERO BYTE 

980 


LX3 

54D 


881 


5B6 

B6-B7 

DECREMENT MAX CHAR COUNTER 

88? 


0X6 

X3<-X6 

INSERT BLANK CHARACTER 

883 


GT 

B6, RFNBF 1 

CYCLE 

884 


EQ 

RFNBFS 

RETURN 

885 

RFNBF 

BSS 

1 

FORTRAN CALLABLE ENTRY 

886 


SAl 

XI 

(Xn = LFN 

887 


RJ 

RFNBFS 


886 


EQ 

RFNBF 



889 " 

890 


(FTN) 


END 






NOZL3D - 

lOMPFM 



1 

•DECK 

lOMPFM 




p 

• =OECK 

lOMPFM 

lOMPFM ASSEMBLY 



3 


lOENT 

lOMPFM 





TITLE 

PERMANENT FILE MANAGEMEN1 FUNCTIONS 


r- 

5 

ASMCNTL 

SPACE 

3 



6 

•CALL 

lOMACTL 




7 


IFEQ 

OS, NOS • 



8 


(NOS) 


9 

• EXTERNAL TEXT 

COMMON DECKS • 

(NOS) 


10 


(NOS) 

r- 

11 

« 

LIST 

X * 

(NOS) 


IP 


XTEXT 

COMCSYS SYSTEM REQUEST ROUTINES 

(NOS) 


13 


XTEXT 

COMCPFM * 

(NOS) 


IH 


ENDIF 

4 ■ 



15 




16 

COMMON 

SPACE 

a 



17 

444 

COMMON BLOCK DECLARATION 



18 

« 





19 

^ “PROCEDURE COMASTA 



PO 

*CALL 

COMASTA 



PI 


USE 

0 



PP 

SUMMARY 

SPACE 

3 



P3 

«4«««4«««««t««««««44««««44«44444444«««««««4444444444««4«44444444444444#4 


2 ^ 

4 



4 


P5 . 

4 

PERMANENT 

FILE FUNCTIONS PROVIDE FOR RUNTIME EXECUTION 

4 


P6 

« 

OF BASIC 1 

OPERATIONS PERTAINING TO THE ACTIVITY/STATUS 

4 


P7 

4 

OF DATA FILES RESIDING ON PERMANENT DEVICES. 

4 


P8 

« 



4 


P9 

4 

PROGRAMMED BY C.A. FELIPPA, DEC 1975 

4 


30 

4 



4 


31 

4 

UPDATE - 

NOV 1977 

4 


3P 

4 



4 


33 

444«44444444444444444444444444444444444444444444444444444444#44444444444 



4 



4 


35 

t 

A SUMMARY 

DESCRIPTION FOLLOWS. 

4 


36 

4 



4 


37 

4 

lOMAPF 

ATTACH PERMANENT FILE TO JOB (SCOPE/NOS) 

4 


38 

4 



4 


39 

4 

lOMCPF 

CATALOG PERMANENT FILE (SCOPE) 

4 



4 



4 



4 

lOMDPF 

DEFINE 0 I RECT-ACCESS PERMANENT FILE (NOS) 

4 


‘♦P 

4 



4 


>f3 

4 

lOMEPF 

EXTEND PERMANENT FILE (SCOPE) 

4 



4 



4 


H5 

4 

lOMPPF 

PURGES PERMANENT FILE (SCOPE/NOS) 

' 4 


«+6 

4 



4 


•+7 

• 

lOMRPF 

REQUESTS equipment APPROPRIATE AS RESIDENCE 

4 


H8 

4 


MEDIUM FOR A PERMANENT FILE (SCOPE) 

4 


^9 

4 



4 


50 

444t4#44444444tf444444#4444«444«444444444444444444'44444444444444444444444 


51 

lOMAPF 

SPACE 

2 



5P 

4 4 4 

lOMAPF 

(LFN, PFN. ID, MR) 

(SCOPE) 


53 

444 

lOMAPF 

(LFN, PFN, UN, M) 

(NOS) 


5H 

4 





55 

4 

ENTRY POINT TO ATTACH A PERMANENT FILE TO RUN 



56 

4 





57 

4 

FORTRAN REFERENCE (SCOPE) - 



58 

4 





59 

4 

CALL lOMAPF (LFN. PFN, ID, M) 



60 

4 





61 

4 

WHERE 




6P 

4 





63 

4 

LFN 

LOGICAL FILENAME 



6*+ 

4 





65 

4 

PFN 

42/PFN,6/0,6/RP,6/CY, AS IN lOMCPF. 



66 

4 





67 

4 

ID 

OPTIONAL OWNERS ID, AS IN lOMCPF. 



68 

4 





69 

4 

M 

FILE ACCESS MODE PARAMETER 



70 

4 


-1 MULTIREAD ACCESS (SAME AS MR-I ON CO 



71 

4 


+1 EXCLUSIVE ACCESS (SAME AS RW-0 ON CC) 



7P 

4 


0 THIS ARGUMENT IS IGNORED 


- 

73 

4 





71+ 

4 

FORTRAN REFERENCE (NOS) - 



75 

4 





76 

4 

CALL lOMAPF (LFN, PFN, UN. M) 



77 

4 





78 

4 

WHERE 



, 

79 

4 





80 

4 

LFN. PFN 

SAME AS ABOVE. HOWEVER. RP AND CY FIELDS IN 



81 

4 


PFN WORD ARE IGNORED. 



8P 

4 





63 

4 

UN 

OPTIONAL USERS NUMBER OR ID. IF ZERO, THIS 



81+ 

4 


PARAMETER IS IGNORED. 



85 

4 





86 

4 

M 

FILE ACCESS MODE, AS IN lOMDPF. 



I 
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N02L3D 

lOMPFM 



87 

* 





88 


ENTRY 

lOMAPF 



89 

lOMAPF 

BSS 

1 

ENTRY/EXIT POINT 


90 

APFSYST 

IFEQ 

OS, SCOPE 



91 


S65 

-1 

MARK ATTACH ENTRY 

(SCOPE) 

99 


RJ 

FOeSET 

INITIALIZE FILE DEF BLOCK 

(SCOPE) 

93 


SX7 

lie 


(SCOPE 

91* 


ZR 

X>+,ATTPFl 


(SCOPE 

95 


SX7 

Q33B 

SET EXCLUSIVE ACCESS 

(SCOPE) 

96 


PL 

X‘t.ATTPFI 

TEST FOR M«1 

(SCOPE) 

97 


SX7 

1116 

SET MULTIREAD ACCESS FLAG 

(SCOPE) 

98 

ATTPTl 

BSS 

0 


(SCOPE) 

99 


SA7 

A7+B7 

STORE ACCESS MODE DESCRIPTOR 

(SCOPE) 

100 


SA5 

S7HATTACH, 


(SCOPE) 

101 


RJ 

PFMESG 

PRINT INFORMATIVE MESSAGE 

(SCOPE) 

102 


ATTACH 

FOe,RC 

ATTACH MACRO 

(SCOPE) 

103 

+ 

SA2 

lOMAPF 

FETCH RETURN INSTRUCTION 

(SCOPE) 

lOif 


EQ 

PFMEXIT 

GET RETURN CODE AND EXIT 

(SCOPE) 

105 

APFSYST 

ELSE 




106 


S85 

-1 

MARK ATTACH ENTRY 

(NOS) 

107 


RJ 

PFMFET 

INITIALIZE FET FOR PFM REQUESTS (NOS) 

108 


MX6 

0 


(NOS) 

109 


BX7 

X^ 

(X7) = M 

(NOS) 

110 


SA6 

UNN 

CLEAR UN 

(NOS) 

111 


SA7 

AMN 

STORE M 

(NOS) 

112 


ZR 

X3.ATTPF3 


(NOS) 

113 


6X6 

X3 


(NOS) 

1 


BXl 

X3 

(X6) = UN 

(NOS) 

115 


SA6 

RJUNN 


(NOS) 

116 


SXl 

A6 


(NOS) 

1 17 


RJ 

=XLJRJN 


(NOS) 

118 


SA6 

UNN 


(NOS) 

119 


SB I 

RJUNN 


(NOS) 

120 

ATTPF3 

ass 

0 



121 

+ 

SA5 

=7HATTACH. 


(NOS) 

122 


RJ 

PFMESG 

PRINT INFORMATIVE MESSAGE 

(NOS) 

123 


ATTACH 

FET.,UNW,.AMW 

ATTACH MACRO 

(NOS) 

12H 

+ 

SA2 

lOMAPF 

FETCH RETURN INSTRUCTION 

(NOS) 

125 


EQ 

PFMEXIT 

GET RETURN CODE AND EXIT 

(NOS) 

126 

APFSYST 

ENDIF 




127 

lOMCPF 

SPACE 

a 



128 

• «« 

lOMCPF 

(LFN. PFN, 10. XR) 

(SCOPE) 

129 

« 





130 

« 

ENTRY POINT TO CATALOG A PERMANENT PILE (SCOPE ONLY) 


131 

« 





132 

4 

FORTRAN 

REFERENCE - 



133 

4 





134 

4 

CALL 

lOMCPF (LFN, PFN, ID, XR) 


135 

4 





136 

4 

mERE 




137 

4 





138 

4 

LFN 

LOGICAL FILENAME (1-7 ALPHANUMERIC CHARS, 


139 

4 


LEFTJUSTIFIEO. 

ZERCFILLED). MUST BE 


140 

4 


CURRENTLY ATTACHED TO JOB. 


141 

4 





142 

4 

PFN 

^a/PFN,6/0.6/RP.6/CY WHERE 


143 

4 


PFN PERMANENT FILENAME (SAME RESTRICTIONS 


144 

4 


AS FOR 

LFN) 


145 

4 


CY CYCLE NUMBER (1-63). IF ZERO, THE O/S 


146 

4 


WILL ASSUME CY = (HIGHEST CAT CY) + 1 


147 

4 


RP RETENTION PERIOD IN DAYS. IF 0, THE 


148 

4 


PROGRAM 

ASSUMES RP=30 DAYS. 


149 

• 





150 

4 

10 

OPTIONAL OWICRS ID ( 1 TO 7 CHARS, RJ WITH 


151 

4 


ZERO FILL). IF ZERO, THIS SPEC IS IGNORED. 


152 

4 





153 

fl 

XR 

IF NONZERO, PROGRAM ASSUMES THAT THIS IS A 


154 

4 


CONTROL/MOOIFY/EXTEND PASSWORD (1-7 CHARS, 


155 

« 


RIGHT JUSTIFIED 

W/ZERO FILL). IGNORED IF ZERO 


156 

4 





157 


ENTRY 

lOMCPF 



158 

lOMCPF 

BSS 

1 

ENTRY/EXIT POINT 


159 

CPFSYST 

IFEQ 

OS. SCOPE 



160 


SB5 

1 

MARK CATALOG ENTRY 

(SCOPE) 

161 


RJ 

FDBSET 

INITIALIZE FILE DEF BLOCK 

(SCOPE) 

162 


SXS 

138 

(Xa) = CODE FOR XR DESCRIPTOR 

(SCOPE) 

163 


BXH 

-X0*XH 

(X*!) » MASKED XR STRING 

(SCOPE) 

164 


LXH 

6 

ROTATE XR 

(SCOPE) 

165 


ZR 

X^. CATPFl 

OMIT XR SPEC IF XR=0 

(SCOPE) 

166 


BX7 

xif+xa 

FORM DESCRIPTOR IN (X7) 

(SCOPE) 

167 


SA7 

A7+B7 

STORE XR SPEC 

(SCOPE) 

168 

CATPFl 

BSS 

0 


(SCOPE) 

169 

+ 

SA5 

«9HCATAL0G. 


(SCOPE) 

170 


RJ 

PFMESG 

PRINT INFORMATIVE MESSAGE 

(SCOPE) 

171 


CATALOG 

FOB.RC 

CATALOG MACRO 

(SCOPE) 

172 

+ 

SAB 

lOMCPF 

FETCH RETURN INSTRUCTION 

(SCOPE) 

173 


EQ 

PFMEXIT 

GET RETURN CODE AND EXIT 

(SCOPE) 


I 
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lOMPFM 


174 

CPFSYST 

ELSE 



175 


EQ 

lOMCPF 

(NOS) 

176 

CPFSYST 

ENDIF 



177 

lOMDPF 

SPACE 

2 


17B 


lOMDPF 

(LFN, PFN, CT, M) 

(NOS) 

179 

ff 




180 

4 

ENTRY POINT TO DEFINE A (DIRECT ACCESS) PERMANENT FILE. 

181 

« 

(NOS SYSTEM ONLY) 


182 

« 




183 

« 

FORTRAN REFERENCE - 


184 

4 




185 


CALL 

lOMDPF (LFN, PFN, CT, M) 


186 





187 

« 

WHERE 



188 





189 

« 

LFN 

LOGICAL FILENAME, AS IN lOMCPF. 


190 





191 

« 

PFN 

42/PFN,6/0,6/RP,6/CY. CY,RP ARE IGNORED UNDER NOS. 

192 

« 




193 

« 

CT 

FILE CATEGORY OCTAL VALUE (CF. NOS MANUAL) 


194 

« 




195 

4 

M 

FILE ACCESS MODE OR PERMISSION LEVEL 


196 

« 


OCTAL VALUE (CF. NOS MANUAL) 


197 





198 


ENTRY 

lOMDPF 


199 

lOMOPF 

B5SZ 

1 ENTRY/EXIT POINT 


200 

OPFSYST 

IFEQ 

OS. SCOPE 


201 


EQ 

lOMDPF 

(SCOPE) 

202 

DPFSYST 

ELSE 



203 


SB5 

1 MARK DEFINE ENTRY 

(NOS) 

204 


RJ 

PFMFET INITIALIZE FET FOR PFM REQUESTS (NOS) 

205 


BX6 

X3 (X6) = CT 

(NOS) 

206 


LX7 

X4 (X7) = M 

(NOS) 

207 


SA6 

CTW STORE CT 

(NOS) 

208 


SA7 

AMW STORE M 

(NOS) 

209 

+ 

SA5 

=7H0EFINE, (X5) ■= OPERATION ID 

(NOS) 

210 


RJ 

PFMESG PRINT INFORMATIVE MESSAGE 

(NOS) 

211 


DEFINE 

FET CTl^.AMW 

(NOS) 

212 

+ 

SAB 

lOMDPF FETCH RETURN INSTRUCTION 

(NOS) 

213 


EQ 

PFMEXIT GET RETURN CODE AND EXIT 

(NOS) 

214 

DPFSYST 

ENDIF 



215 

« 




216 

lOMEPF 

SPACE 

2 


217 

««« 

lOMEPF 

(LFN, PFN, ID, 0) 


218 

« 




219 

« 

ENTRY POINT TO EXTEND A PERMANENT FILE (SCOPE ONLY) 


220 

« 




221 

« 

FORTRAN REFERENCE - 


222 

« 




223 

« 

CALL 

lOMEPF (LFN, PFN, ID, 0) 


224 

« 




225 

« 

WHERE 



226 

« 




227 

« 

LFN, PFN. ID SAME AS FOR lOMCPF/ lOMAPF 


228 

« 




229 


ENTRY 

lOMEPF 


230 

lOMEPF 

BSS 

I ENTRY/EXIT POINT 


231 

EPFSYST 

IFEQ 

OS, SCOPE 


232 


SB5 

80 MARK EXTEND/PURGE ENTRY 

(SCOPE) 

233 


RJ 

FD8SET INITIALIZE FILE DEF BLOCK 

(SCOPE) 

234 

+ 

SA5 

•7HEXTEND, (X5) - OPER ID 

(SCOPE) 

235 


RJ 

PFMESG PRINT INFORMATIVE MESSAGE 

(SCOPE) 

236 


EXTEND 

FOB,RC EXTEND MACRO 

(SCOPE) 

237 


SA2 

lOMEPF FETCH RETURN INSTRUCTION 

(SCOPE) 

239 


EQ 

PFMEXIT GET RETURN CODE AND EXIT 

(SCOPE) 

239 

EPFSYST 

ELSE 



240 


EQ 

lOMEPF 

(NOS) 

241 

EPFSYST 

ENDIF 



242 

« 




243 

lOMPPF 

SPACE 

2 


244 

««« 

lOHPPF 

(LFN, PFN, ID, 0) 

(SCOPE) 

245 


lOMPPF 

(LFN, PFN, UN, PW) 

(NOS) 

246 

« 




247 

4 

ENTRY PQINT TO PURGE AN ATTACHED PERMAICNT FILE 


248 

4 




249 

« 

FORTRAN 

REFERENCE (SCOPE) - 


250 

« 




251 

« 

CALL 

lOMPPF (LFN, PFN. ID, 0) 


252 

« 




253 

« 

WHERE 



254 

« 




255 

« 

LFN, PFN. ID SAME AS FOR lOMCPF/ lOMAPF 


256 

« 


LFN MUST BE CURRENTLY ATTACHED TO JOB. 


257 

« 




258 

« 

FORTRAN 

REFERENCE (NOS) - 


259 

* 

CALL 

lOMPPF (LFN, PFN. UN. 0) 


260 

« 
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861 

> 

WHERE 




868 

« 





863 

« 

LFN.PFN 

SAME AS ABOVE 



86t 

* 

UN 

USERS NUMBER 



865 

« 





866 


ENTRY 

lOMPPF 



867 

lOMPPF 

BSS 

1 

ENTRY/EXIT POINT 


86B 

PPFSYSr 

IFEQ 

OS, SCOPE 



869 


SB5 

60 

MARK EXTENO/PURGE ENTRY 

( SCOPE 1 

870 


RJ 

FOBSET 

INITIALIZE FILE DEF 8L0CK 

( SCOPE 1 

871 

♦ 

SA5 

«6HPURGE. 

(X51 = OPER 10 

( SCOPE 1 

878 


RJ 

PFMESG 

PRINT informative MESSAGE 

( SCOPE 1 

873 


PURGE 

FO0.RC 

PURGE MACRO 

( SCOPE 1 

37H 


SA3 

lOMPPF 

FETCH RETURN INSTRUCTION 

( SCOPE 1 

875 


EQ 

PFMEXIT 

GET RETURN CODE AND EXIT 

( SCOPE 1 

876 

PPFSYST 

ELSE 




877 


RJ 

PFMFET 

INITIALIZE FET FOR PFM REQUESTS (NOS) 

870 

+ 

SA5 

=6HPURGE , 

(X5) = OPER ID 

(NOS) 

879 


RJ 

PFMESG 

PRINT INFORMATIVE MESSAGE 

(NOS) 

860 


PURGE 

FET 


(NOS) 

881 


SAP 

lOMPPF 

FETCH RETURN INSTRUCTION 

(NOS) 

888 


EQ 

PFMEXIT 

GET RETURN CODE AND EXIT 

(NOS) 

883 

PPFSYST 

END IF 




884 

« 





885 

lOMRPF 

SPACE 

P 



886 


lOMRPF 

(LFN) 



887 






886 


ENTRY POINT TO REQUEST EQUIPMENT APPROPRIATE TO 


889 

« 

PERMANENT FILE (SCOPE ONLY) 


890 

« 





891 

* 

FORTRAN 

REFERENCE - 



898 

« 





893 

« 

CALL 

lOMRPF (LFN) 



894 

« 





895 

« 

WHERE LFN IS THE LOGICAL 

FILENAME OF THE PERM FILE. 


896 

* 





897 


ENTRY 

lOMRPF 



898 

lOMRPF 

BSS 

1 



899 

PPFSYST 

IFEQ 

OS. SCOPE 



300 


SB7 

1 


(SCOPE) 

301 


MX7 

0 


(SCOPE) 

308 


SAI 

Xt 

(XI) « LFN 

(SCOPE) 

303 


SA7 

FET+8 

CLEAR F£T(9) 

(SCOPE) 

304 


MXO 

4P0 


(SCOPE) 

305 


SA7 

A7-B7 

CLEAR FET (8) 

(SCOPE) 

306 


5B1 

80 


(SCOPE) 

307 


SA7 

A7-B7 

CLEAR FET (7) 

(SCOPE) 

308 


SB2 

60 


(SCOPE) 

309 


SA7 

A7-B7 

CLEAR FET(6) 

(SCOPE) 

310 


SA3 

RE(JPFW 

(X3) * «PF REQUEST WORD 

(SCOPE) 

311 


SA7 

A7-B7 

CLEAR FET (5) 

(SCOPE) 

318 


SB3 

60 


(SCOPE) 

313 


SA7 

A7-B7 

CLEAR FET(4) 

(SCOPE) 

314 


SAP 

=3L«PF 

(AP) e ADDRESS (DUMMY PFN) 

(SCOPE) 

315 


BX6 

X0<XI 

(X6) = MASKED LFN 

(SCOPE) 

316 


SA7 

A7-B7 

CLEAR FET (3) 

(SCOPE) 

317 


BX7 

X3 

(X7) « FLAG WORD 

(SCOPE) 

318 


SA7 

A7-B7 

SET FET(P) 

(SCOPE) 

319 


SA6 

A7-B7 

SET FET(l) 

(SCOPE) 

380 


SA5 

“8HREQUEST . 

(X5) = OPERATION ID 

(SCOPE) 

381 


RJ 

PFMESG 


(SCOPE) 

388 


REQUEST 

FET 

ISSUE REQUEST 

(SCOPE) 

383 


SAP 

lOMRPF 

GET RETURN INSTRUCTION 

(SCOPE) 

384 


EQ 

RPFEXIT 

GET RETURN CODE AND EXIT 

(SCOPE) 

385 

RFQPFW 

VFD 

P9/l,3/l,P8/0 

REQUEST,LFN.*PF 

(SCOPE) 

386 

PPFSYST 

ELSE 




387 


EQ 

lOMRPF 


(NOS) 

388 

PPFSYST 

ENOIF 




389 

FOBSET 

SPACE 

P 



330 

« 





331 

*« 

UTILITY 

CODE BLOCK TO INITIALIZE FILE DEFINITION BLOCK 


338 

f 





333 

« 

ENTRY - 

(851 * FUNCTION FLAGS 1-CATALOG/OEFINE. 


334 

« 


-1»ATTACH, 0=EXTENO/F>URGE. 


335 

« 

EXIT - 

(871=1, (861=8 

LFN/PFN STORED, 


336 

« 


(Al)»AOORESS(LFN) . ( AP )« ADDRESS (PFN) . 


337 

f 


(A71 = ADDRESS 

OF LAST PARAMETER STORED. 


338 

* 


(X3) = VALUE OF 3RD ARGUMENT. 


339 

« 


(Xm » VALUE OF ifTH ARGUMENT. 


340 

t 


(BI )/(BP)/(B3) 

AWTRESSES OF lO/CY/RP DESCR 


341 

« 


WOROS, RESP., IF IN FOB. ELSE ZERO. 


348 

0 


(XO) = I8“BIT MASK 


343 

0 





344 

FDBPFN 

EQU 

FET 

PFN (SCOPE) 


345 

FOB 

EQU 

FET+H 

LFN/RE TURN-CODE/REQUEST-CODE 

(SCOPE) 

346 

PFMFET 

BSS 

0 



347 

FOBSET 

BSS 

I 







N02L3D - 

lOMPFM 



3»<0 

FDBSYST 

IFEQ 

OB, SCOPE 



349 


SA5 

=555555555555555500006 

f SCOPE! 

350 


S87 

1 

(B71 1 

(SCOPE! 

351 


hX6 

0 

(X6) 0 

(SCOPE! 

35? 


BX7 

X5 

(X7) TERMINATOR WORD 

(SCOPE! 

353 


SA6 

FDB'l 


(SCOPE) 

354 


586 

87+07 

(B6) = 2 

(SCOPE) 

355 


5A7 

A6+B6 


(SCOPE) 

35E 


5A6 

A6-07 


(SCOPE) 

357 


SA7 

A7+B7 


(SCOPE) 

350 


SA6 

A6-B7 


(SCOPE) 

359 


SA7 

A7+B7 


(SCOPE) 

360 


MXO 

420 

^XO) - FlLENAr^E MASK 

(SCOPE) 

361 


SA7 

A7+B7 


(SCOPE) 

36? 


SA7 

A7+B7 


(SCOPE) 

363 


SA2 

AI+B7 


(FTN) 

364 


SA3 

AI+B6 


(FTN) 

365 


SA4 

A2+B6 


(FTN! 

366 


SAI 

XI 

( xn = LFN 

(FTN) 

367 


SA2 

X2 

( X21 « PFN 

(FTN! 

368 


SA3 

X3 

(X31 = ID 

(FTN! 

368 


SA4 

X4 

(X41 = 4TH ARC VALUE 

(FTN! 

370 


BX7 

X0«XI 

(X7) = MASKED LFM 

(SCCfPE! 

37] 


5X6 

X0«X? 

(XB) = MASKED PFN 

(SCOPE! 

37? 


SA7 

FOB 

STORE LFN 

(SCOPE) 

373 


SA6 

A6-B7 

STORE PFN 

(SCOPE) 

374 


QX5 

-X0-X2 

( X5) = RP/CY FIELDS 

(SCOPE! 

375 


MXO 

-42D 


(SCOPE! 

376 


sei 

00 

(BM = 0 

(SCOPE) 

377 


8X3 

“X0^X3 


(SCOPE) 

378 


SX7 

]4B 

(X71 = CODE FOR ID-WORD 

(SCOPE) 

379 


LX3 

6 

ROTATE ID STRING 

(SCOPE) 

3B0 


5A1 

A7 

(Al) = ADDRESS t LFN 1 IN FDB 

(SCOPE! 

381 


SA2 

A6 

(A2) = ADDRESS (PFN> (N FDB 

(SCOPE! 

39? 


2R 

X3.FDBSETI 

omr 10 SPEC IF ID-0 

(SCOPE! 

393 


0X7 

X3+X7 

INSERT ID CODE 

(SCOPE) 

394 


SA7 

A7+B7 

STORE ID SPEC 

(SCOPE! 

395 


SBl 

A7 

(BM = ADDRESS nO-DESCR I PTOR] 

(SCOPE! 

396 

FDBSETl 

BSS 

0 


(SCOPE) 

397 


MXO 

-6 


(SCOPE! 

3BB 


BX7 

-X0*X5 

( X7) “ CY FIELD 

(SCOPE! 

389 


SB2 

BD 

iS2) = 0 

(SCOPE) 

390 


LX7 

6 

POSITION CY value 

(SCOPE) 

391 


EQ 

B5,f0eS£T2 

IGNORE CY ON EXTEND/PURGE 

(SCOPE) 

392 



X7,F0eSET2 

OR IF CY = 0 

(SCOPE) 

393 


SX7 

X7+3 

INSERT CY IDENTIFIER (038) 

(SCOPE) 

394 


5A7 

A7+87 

STORE CYCLE DESCRIPTOR WORD 

(SCOPE) 

395 


582 

A7 

(B2) = ADDRESS ICY-DESCRIPTOR) 

(SCOPE) 

396 

FD0S6:T2 

8SS 

0 


(SCOPE) 

397 


AX5 

6 

RlGHTJUSriFY RP FIELD 

(SCOPE) 

399 


BX7 

-X0<X5 

I X7) = RP 

(SCOPE) 

398 


595 

ec 

(63) = 0 

(SCOPE) 

400 


LX7 

6 


(SCOPE! 

401 


L£ 

B5,F0BSET4 

IGNORE RP EXCEPT FOR CATALOG 

(SCOPE) 

402 


NZ 

X7,F0BSET3 

TEST FOR NONZERO RP 

(SCOPE) 

403 


SX7 

3600S 

IF RP-0. SET RP = 30 DAYS 

(SCOPE) 

404 

FD0SET3 

0SS 

0 


(SCOPE) 

405 


5X7 

X7+2 

INSERT RP IDENTIFIER (028) 

(SCOPE) 

406 


SA7 

A7+B7 

STORE RP DESCRIPTOR 

(SCOPE) 

407 


S83 

A7 

(B3) > ADDRESS (RP-OESCRIPTORI 

(SCOPE) 

408 

FDBSET4 

BBS 

0 


(SCOPE) 

409 


MXO 

-420 


(SCOPE) 

410 

FDBSYST 

ELSE 




4M 


MX6 

0 

(X6) 0 

(NOS) 

412 


SB7 

1 

(B7) = 1 

(NOS) 

413 


MX7 

0 

(X7) » D 

(NOS) 

414 


S86 

07+87 

(B6) » 2 

(NOS) 

415 


SA6 

FET+I 

CLEAR FET(2) 

(NOS) 

416 


SA7 

A6+B7 

CLEAR FET(3I 

(NOS) 

417 


6A6 

A6+B6 

CLEAR FET(4l 

(NOS) 

418 


SA7 

A74B6 

CLEAR FETtSi 

(NOS! 

419 


SA6 

A6+86 

CLEAR FETtSl 

(NOS! 

420 


SA7 

A7+B6 

CLEAR FET(71 

(NOS) 

421 


SA6 

A6+66 

CLEAR FET(8) 

(NOS) 

492 


MXQ 

420 


(NOS) 

423 


SA2 

AI+B7 


(FTN! 

424 


SAI 

XI 

( XI > ^ LFN 

(FTN) 

425 


SA3 

A 2+87 


(FTN) 

426 


SA2 

X? 

rx21 PFN 

(FTN! 

427 


SA4 

A3+B7 


(FTNl 

428 


SA3 

X3 

(X3) * 3RD ARGUMENT 

(FTN! 

429 


SA4 

X4 

(X4) « 4TH ARGUMENT 

(FTN! 

430 


0X7 

X0*X1 

(X7) * MASKED LFN 

(NOS! 

431 


BX6 

xo*xa 

(X6) » MASKED PFN 

(NOS! 

432 


SX5 

B7 


(NOS) 

433 


SSI 

BO 

(B1 ) » 0 

(NOS! 

434 


0X7 

X5+X7 

SET FET ACTIVITY BIT ON 

(NOSI 
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NOZL3D 

lOMPFM 



‘+35 


SAl 

FETWl 


(NOS) 

H36 


SA7 

FET 

STORE LFN 

(NOS) 

H37 


SA6 

FET+8 

STORE PFN 

(NOS) 

^+38 


BX6 

XI 


(NOS) 

439 


SA6 

A7+B7 

STORE FET+1 

(NOS) 

440 


EQ 

PFMFET 

RETURN TO APPROPRIATE PROCEDURE 

(NOS) 

441 

f'L rwi 

VFD 

15/0,1/1,20/0,6/7,10/0 EP=1, rETLGTH=5+7 

(NOS) 

44E 

FDBSY6T 

END IF 




443 


EQ 

FDBSET 

RETURN TO APPROPRIATE ENTRY 


444 

PFMESG 

SPACE 

2 



445 

* 





446 

♦ ♦ 

CODE BLOCK TO GENERATE 

AND PRINT INFORMATIVE MESSAGE 


447 

♦ 





448 

♦ 

ENTRY REGISTER SET - 



449 

* 

(A1 )=AODRESS(L.FN) , (A? 

)=ADORESS(PEN) 


450 


(B1 ) , (B2) . (B3) . (B7) - 

SEE FDBSET 


451 

* 

(X5) 

OPERATION ID TEXT. 


45? 

■* 

EXIT - 

(Bl)=I. ALL OTHERS DESTROYED. 


453 






454 

PFMESG 

BSS 

1 



455 


SA4 

=6H0+«-- 



456 


IFEQ 

OS , SCOPE 



457 


SAi 

A] 

(XI ) = LFN (SCOPE) 

45Q 


El. S£ 




459 


SAl 

FET 

(XI ) = LFN 

(NOS) 

460 


END IF 




461 


LX7 

X5 



46? 


BX6 

X4 



463 


SA7 

ASTMSG^I 

OPERATION >D TO ASTMSG(2) 


464 


SA6 

A7-B7 

INITIALIZE ASTMSG(I) 


465 


5X4 

UR. 



466 


RJ 

=XLFNBF$ 

BLANKFIU. LFN IN fX6) 


467 


MXO 

6 



468 


LX4 

I2D 



469 


LXO 

18D 



470 


BX7 

-X0«X6 



471 


IfEO 

OS . SCOPE 



472 


SAl 

A2 

(XI 1 » PFN (SCOPE) 

473 


ELSE 




474 


SAl 

FET+8 

(XI) - PFN 

(NOS) 

475 


END IF 



476 


0X7 

X4+X7 

INSERT COMMA AFTER LFN 


477 


RsJ 

=XLFNBF$ 

8LANKF1LL PFN IN (X6) 


478 


SA7 

A7+B7 

STORE LFN IN ASTMSG(3) 


479 


BX7 

X6 

(X7I =■ PFN 


480 


MXO 

-e 



481 


SA7 

A7+B7 

STORE PFN IN ASTMSGCt) 


482 


EQ 

B1 .PFMSGl 

SKIP IF NO ID STORED 


493 


SX4 

IR^ 



484 


SAl 

Bl 

(XI) = ID DESCRIPTOR WORD 


405 


RJ 

=XRFN8F$ 

BLANKFILL PFN- ID IN (X6) 


486 


MXO 

-6 



487 


BX6 

X0*X6 

CLEAR SLOT FOR • 


488 


BX6 

X6+X4 

INSERT ASTERISK 


489 


SA6 

A7 

STORE PFN- ID IN ASTMSGI't) 


490 


SA7 

A7+B7 

STORE PFN INTO ASTMSG(51 


491 

PF MSG 1 

BSS 

0 


492 


IFEQ 

OS, SCOPE 



493 


EQ 

B2,PFMSG2 

OMIT CY PRINT IF (021=0 


494 


SAl 

82 

(XI) = CY DESCRIPTOR WORD 


495 


AXl 

6 

RIGHTJUSTIFY CYCLE NO, 


496 


SA5 

s7L. CY= 



497 


RJ 

=XNCOCTL$ 

CONVERT TO DISPLAY CODE IN (X61 


498 


MXO 

-180 


499 


BX6 

-X0«X6 



500 


BX7 

X5+X6 

(X7) NOW HAS lOH, CY = XXB 


501 


SA7 

A7+B7 

STORE CY LABEL WORD 


502 

PFMSG2 

BSS 

0 



503 


EQ 

B3,PFMSG3 

OMIT RP PRINT IF (B3)=0 


504 


SAl 

83 

(XI) = RP DESCRIPTOR WORD 


505 


AXl 

6 

RIGHTJUSTIFY RP VALUE 


506 


SA5 

*7L . RP» 



507 


RJ 

=XNCOCTL$ 

CONVERT TO DISPLAY CODE IN (X6) 


508 


MXO 

-100 


509 


BX6 

-X0»XB 



510 


BX7 

X5+X6 

(X7I NOW HAS lOH, RP = XXB 


511 


SA7 

A7+B7 

STORE RP LABEL WORD 


512 

PFMSG3 

BSS 

0 



513 


END IF 




514 


RJ 

=XIOMESSG 

PRINT MESSAGE 


515 


SB I 

1 

SET (BI) = 1 


516 


EQ 

PFMESG 

RETURN TO APPROPRIATE MACRO 


517 

■« 





518 

< 





519 

t « 

UTILITY 

CODE BLOCK FOR 

TERMINATION ACTIVITIES 


520 

* 




521 

* 

ENTRY “ 

1X2) = RETURN 

INSTRUCTION 
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N02L3D - 


lOMPFM 


522 





523 

RPFEXIT 

BSS 

0 


52** 


SA5 

FET 


525 


EQ 

PFMEXlT^-1 


526 

PFMEXIT 

BSS 

0 


527 


IFEQ 

OS. SCOPE 


528 


SA5 

FOB 

FETCH BASE WORD 

529 


ELSE 



530 


SA5 

FET 

FETCH BASE WORD 

531 


EmiF 



532 

+ 

BX7 

X2 


533 


MXO 

-90 


53>t 


SA7 

PFMRET 

STORE RETURN 

535 


AX5 

9D 


536 


BX6 

-X0*X5 

ISOLATE RETURN CODE 

537 


SA6 

STATIJS 

PLACE RC IN STATUS WORD 

539 


ZR 

X6, PFMRET 

RETURN IF RC = 0 

539 


SA5 

=10HFAC STATUS 


5**0 


LXl 

X6 


5**1 


BX7 

X5 


5**2 


SA7 

ASTMSG+ I 


5H3 


RJ 

=XNCOCTL$ 

ENCODE STATUS IN (X6I 

5**** 


SA6 

ASTMSG+2 

STORE IT 

5**5 


RJ 

=XIOMESSG 

PRINT STATUS MESSAGE 

5**6 

PFMRET 

BSS 

1 

RETURN TO CALLING PROGRAM 

5>t7 

« 




5t8 


IFEQ 

OS, NOS 


5t9 

CTW 

BSSZ 

1 

FILE CATEGORY WORD 

550 

UNW 

BSSZ 

1 

USERS NUMBER WORD 

551 

RJUNW 

BSSZ 

1 


552 

AMW 

BSSZ 

1 

ACCESS MODE WORD 

553 


END IF 



55*t 


END 
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(SCOPE) 

(NOS) 


(NOS) 

(NOS) 

(NOS) 

(NOS) 



N0ZL3D - lOMPRT 

t 'DECK lOMPRr 

2 C=DECK lOMPRT lOMPRT SUBROUTINE 

3 SUBROUTINE lOM PRT 

If C 

5 C=PURPOSE COLLECTION OF DISPLAY PROCEDURES SUPPORTING DMGASP/CDC 

6 C=AUTHOR C. A. FELIPPA 

7 C=VERS|ON JUNE 1977 

8 C=EQUIPMENT CDC 

9 C=KEYWOROS AUXILIARY STORAGE MANAGER I/O DATA 

10 C'KEYWOBDS PRINT DISPLAY OUTPUT 

1 1 C=EASY-SUB LFNBF 

1? C 

13 C 

14 C COMMON 

15 C 

16 C=PROCEDURE lOMCOM CDMERR COMETS 

17 ‘CALL lOMCOM 

18 *CALL DMECOM 

19 COMMON /COMPAD/ 

20 S CMSIZ, BCSIZ, REQCM, LWAREC, PAD(192) 

21 INTEGER CMSIZ, BCSIZ. REQCM, PAD 

22 C 

23 C TYPE AND DIMENSION 

24 C 

25 INTEGER ,DEVDAT(12) .EQCODE, FETU21 

26 INTEGER ERRMSG(2,12) 

27 INTEGER PFNDATI3) ,TABFMT(7) 

28 C 

29 C EQUIVALENCE 

30 C 

31 EQUIVALENCE (FET.ASTPKTI 14)1 

32 EQUIVALENCE (DEVDAT,PAD(65) ) , (PFNDAT,PAD(77) 1 , (TABFMT,PAD(81 1) 

33 EQUIVALENCE (I0ERCD,AST0SD(2n 

34 EQUIVALENCE (LDIX.DEVDATC 1 1) , (EQCODE, DEVDAT(3)1 

35 C 

36 C DATA 

37 C 

38 DATA ASTOSD(l) /IH / 

39 DATA ASTMSG /6H0+++ ,8*1H / 

40 DATA ERRMSG /2MH , lOHILLEGAL DE, lOHVICE INDEX, 

41 S lOHINACTlVE D, lOHEVICE REF .lOHFILEAINT .lOHATTACHEO , 

42 $ lOHILLEGAL TA.IOHPE POSTION, lOHILLEGAL MS.lOH POSITION , 

43 $ lOHILLEGAL RE, lOHCORD SIZE .lOHILLEGAL RE, I OHAD REQUEST, 

44 S lOHDEVICE OVE.IOHRFLOW , lOHILLEGAL WR, lOHITE REQUST, 

45 $ lOHMlSCELL. I.IOH/O ERROR , 1 OHO/ S CANT H, lOHONOR REQST / 

46 C 

47 C LOGIC 

48 C 

49 C-ENTRY lOMOSD lOMOSD ENTRY 

50 C=PURPOSE PRINT OPERATION STATUS DESCRIPTORS (OSDI 

51 C=USAGE INTERNAL USE BY DMGASP/CDC 

52 C 

53 C +++++++++++++++++++++ 

54 ENTRY lOM OSD 

55 C ++++++++++++++++■+++++ 

56 C 

57 PRINT 10. AST0SD(1),AST0SD(2),ERRMSG(I,I0ERCD+1), 

58 S ERRMSG(2,I0ERCD+1) ,(ASTOSD(J),J"3,14) 

59 10 FORMAT (16H0t+t LAST OP = A6.13H, ERROR CODEI4/6X2A10/6X,73HDEVI 

60 SCE TYPEX LCARGl LCARG2 LOCDEV SIZREC RET/EOI STATUS DTERR/RSC NWR 

61 $DXF /5X417, 1X06, 17, 1X03, 14,5X02,4X02,2X02, 171 

62 RETURN 

63 C 

64 C"ENTRY lOMFET lOMFET ENTRY 

65 C-PURPOSE PRINT FILE ENVIRONMENT TABLE (FET) AREA 

66 C-USAGE internal use by DMGASP/CDC 

67 C 

68 C +++■*•++++++++++■+++++++ 

69 ENTRY lOM FET 

70 C +++++++++++++++++++++ 

71 C 

72 LFNAME * LFNBF(FET) 

73 PRINT 12, LFNAME, (FET(J),J»1, 10) 

74 12 FORMAT (/22H +++ F.E.T. OF FILE ,A7/ 

75 A 6X.7HFET1-0 ■= 021 , 10X.7HFET+1 » 021 / 6X.7HFET+2 ■= 021, 

76 B 10X.7HFET+3 » 021 / 6X.7HFET+4 = 02 1 , 1 OX , 7HFET+5 • 021/ 

77 C 6X.7HFET+6 ■= 021 . 10X.7HFET+7 = 021 / 6X.7HFET+8 * 021, 

78 D 10X,7HFETEXT» 021 1 

79 RETURN 

80 ENTRY lOMFETX 

81 PRINT 13, (J.ASTPKTU) ,J=1 ,12) 

82 13 FORMAT ( / (6X, 7HASTPKT ( 12, 3H) ■= 06.6X,7HASTPKT( I2,3H)= 06, 6X, 

83 S 7HASTPKT(I2,3H)» 06,6X,7HASTPKT( I2,3H)= 06)) 

84 RETURN 

85 C 

86 C=ENTRY lOMTAB lOMTAB ENTRY 
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N0ZL30 - lOMPRT 

87 C=PURPOSE PRINT AUXILIARY STORAGE TABLE (AST) 

08 C'USAGE INTERNAL USE BY OMGASP/CDC 

89 C 

90 C +++++++++++++++++++++ 

91 ENTRY lOM TAB 

92 C +++++++++++++++++++++ 

93 C 

94 PRINT It 

95 14 FORMAT (/IX,71(1H+) /2H +IIX, 47HA UXILIARY STORAGE 

96 $E T A B L E, 1 IX, 1H+/1X,71 (lH+)/IX, IH+69XIH+/72H + LDI LFN 

97 S EQC TYP OPT SEC CDLOC NEXT LIMIT READ WRITTEN +) 

98 ASTCNT(l) = 0 

99 ASTCNTI2) = 0 

100 DO 1800 J = l.ASTDIM 

101 LDIX = J 

102 EQCOOE = ASTEQC(J) 

103 IF (EQCODE .EQ. 0) GO TO 1800 

104 CALL lOM LDIX 

105 PRINT TABFMT, DEVDAT 

106 IF (PFNDAT(l) ,NE. 0) PRINT 16, PFNDAT 

107 1800 CONTINUE 

108 16 FORMAT (BH t (PFN= A7,5H, CY=I2,6H, ID= R0, IHl ,34X, 1H+) 

109 C 

110 PRINT 18, ASTCNT 

111 18 FORMAT (2H +69X1H+ /2H i- 121 , 17H ACTIVE DEVICES (12,6H FULL) 

112 A 23X lHt/2H + 16, 8H TP-OPS, 16, 8H WRITES, 16, 7H READS, 

113 B ie,lH/I0,12H WORDS XFD + /IX 7K1H+) /) 

114 RETURN 

115 C 

116 C=ENTRY lOMESS lOMESS ENTRY 

117 C=PURPOSE PRINT ASTMSG (MESSAGE) ARRAY 

110 C=USAGE INTERNAL USE BY DMGASP/CDC AND SUBPROCESSORS 

119 C 

120 C +++++++++t+++++++++++ 

121 ENTRY lOMESSG 

122 C +++++++++++++■++++++++ 

123 C 

124 C 

125 PRINT 25, (ASTMSOI J) , J-1 ,7) 

126 25 FORMAT (A6,6A10) 

127 ASTMSG(l) » 6H +++ 

128 ASTMSG(2) • IH 

129 ASTMSG(3) » IH 

130 ASTMSG(4) « IH 

131 ASTMSG15) = IH 

132 ASTMSG(6) = IH 

133 ASTMSG(7) i IH 

1 34 RETURN 

135 C 

136 C=ENTRY PADPRT PADPRT ENTRY 

137 C=PURPOSE DISPLAY CONTENTS OF CDMPAD COMMON BLOCK 

138 C=USAGE FOR DMGASP DEBUG PRINT ONLY 

139 C 

140 C +++++++++++++++++++++ 

141 ENTRY PADPRT 

142 C ++++++++++■('++++++++++ 

143 C 

144 PRINT. 32, CMS 1 Z , BCS I Z , REQCM , LWAREC , (PAD( J) , J=1 ,64) 

145 32 FORMAT (/6X,0HCMSIZ = 06,10H, BCSIZ = 06,10H, REQCM = 06, 

146 I IIH, LWAREC = 06, 17H, PAD/SAVE AREA& /(2X,6021)) 

147 5000 CONTINUE 

148 RETURN 

149 ENO 
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APPENDIX B 

LISTING OF THE NOZLIC PROGRAM 




NOZLIC - COMDECKS 
1 ‘COMDECK COMl 
e C0MM0N/C1/Q(32, 16.33) 

3 COMMON /C3/ AlP.RE.FSMACH.GAMMA.JHAX.KMAX.LMAX, JWMAX.LW r.ND.LE.FN 

M 1 , NOPT , JT , ETAE , 1 TMAX , LMAXBC ,L IBC . SMU . DT . PR . TW . KREADY . I RGR 1 D . I CRUDE , 

5 2 ITOT, INWALL, 1.W, KM. JREADX.IWRIT.JLM.JKW.KLW.FSP, FBI, Ji IWL.JLIWU, 

6 3 KMAXaC.JKlWU.JKlML 

7 COMMON/Cil/IGEOM.XMAX.XZERO.YMAX.Xl.xa.XI.XH.ZI.ZB.ZS.ZH.ZT.RT 

a COMMON /C5/EMCI32) ,UC<32) ,PC(32) .TC(3S) .UE(32) ,DELT(32) ,OELTZI3e) 

9 COMMON /C6/RI(32),PTl(32).HTt(32).VR0UI(32),PT0T(32.32), 

10 1 HT0T(32.32),V0U<32,32),WOU(32,32),RL(321 

11 C0MM0N/C7/YKRl32),TH(32),X(32) 

12 C0MM0N/C8/XX(32.3I 

13 COMMON/ lO/NLROW.NKLP.NLSKIP 

IN C LEVEL 2,O.X,Y,Z 
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NOZLIC - CRUDIC 
I »DECK CRUDIC 


B 



SUBROUTINE CRUDIC 

3 

•CALL 

COMl 

4 



DIMENSION QSAVE(32,5.32l 

5 



EMC2(B)*1 .+FL0AT(IJ)*B*».5 

6 



FUNC(A)=4. »EMC2(Al*n .+(GAMMA-| , )/2. -EMCai A) 1 

7 



IF(NOPT.EQ.31 GO TO 60 

8 

C 



9 

C 


N0PT'=2 

10 

C 



1 1 



CALL LKPGAS(JMAX,2) 

12 



XMAX»Q( 1,6,1) 

13 



LWl-LW+1 

14 



DO 50 J»l .UMAX 

15 



CALL LKPGAS(J,2) 

16 



DO 42 K*1 .KMAX 

17 

C 



18 

C 

SET UP INITIAL CONDITIONS AT INFLOW PLArC J» 1 

19 

C 



BO 



1F(J.GT. n GO TO 20 

21 

C 



22 

C 


INSIDE OF THE NOZZLE FOR NOPT -2 WE WILL USE INITQ RESULTS 

23 

C 



24 

C 


OUTSIDE OF THE NOZZLE 

25 

C 



26 

C 



27 



DO 10 L«LW1 .LMAX 

28 



PCTOT«(FSP/PTOTlL.K) )•*( (GAMMA-l .) /GAMMA) 

29 



VLS»2 . •HTOT (L , K ) » ( 1 . -PCTOT ) / (GAMMA- 1 . ) 

30 



VL«SQRT(VLS) 

31 



Q(L, 1 .K)=PTOT(L,K)/HTOT(L,K)»(FSP/PTOT(L,K) )»*(1 ,0/GAMMA) 

32 



Q(L,2,K)»Q(L,1 ,K)»VL/SQRT(I . +VOU(L ,K) **2+W0U (L ,K) * »2) 

33 



Q(L,3,K)’QIL,2.K)*V0U(L.K) 

34 



Q(L.4,K)»Q(L,2,K)*W0U(L,K) 

35 



T»HTOT(L,K)*PCTOT 

36 



Q(L,5,K)*Q(L, 1 ,K)*(T/ (GAMMA* (GAMMA- 1 . ))+VLS/2. ) 

37 


10 

CONTINUE 

38 



DO 15 L»LW1 .LMAX 

39 



DO 15 N»1 .5 

40 



QSAVE(L,N,K)»Q(L,N,K) 

41 


15 

CONTINUE 

42 


20 

CONTINUE 

43 

C 



44 

C 


SET UP INITIAL CONDITIONS IN PLANES J > 0 

45 

C 



46 



IF (J.EQ. 1 ) GO TO 40 

47 

C 


, - 

48 

C 


OUTSIDE THE NOZZLE L > LW (REGION 1 AND 2) 

49 

C 



50 



DO 35 L-LWl .LMAX 

51 



IF (L.EQ.LMAX) GO TO 30 

52 



DO 25 N-1 .5 

53 


25 

Q(L,N,K)“QSAVE(L.N,K) 

54 



GO TO 35 

55 

C 



56 

C 


FREESTREAM BOUNDARY L”LMAX 

57 

C 



58 


30 

Q(L, 1 ,K)-FSP/FST 

59 



Q(L,2,K)»Q(L.l.K)*( FSMACH*SQRT ( FST ) ) 

60 



Q(L,3,K)-0. 

61 



Q(L,4,K)»0. 

62 



Q(L,5,K)-FSP*< 1 ./ (GAMMA* (GAMMA- 1 . ) )+ . 5*FSMACH* *2) 

63 


35 

CONTINUE 

64 


40 

CONTINUE 

65 

C 


BEYOND THE END OF THE NOZZLE AND INSIDE THE NOZZLE L-l.LW 

66 

C 


REGION 3 AND 4 

67 

c 

INSIDE NOZZLE FOR NOPT-2 WE WILL USE INITQ RESULTS 

66 


42 

CONTINUE 

69 

c 


ENSURE VELOCITIES « 0 AT WALLS 

70 



IF(LW.EQ.O) GO TO 46 

71 



DO 45 L-LW.LWl 

72 



00 45 K-l .KMAX 

73 



Q(L.2,K)*0. 

74 



Q(L.3,K)«0. 

75 



Q(L,4,K)«0. 

76 



IF (L.EQ.LW) GO TO 45 

77 



Q(L, 1 ,K)«PTOT(L,K)/HTOT(L,K) 

78 



Q(L.5,K)-PT0T(L,K)/(0AMMA*(GAMMA-l . ) ) 

79 


45 

CONTINUE 

80 


46 

CONTINUE 

81 



CALL LKPOASt J. 1 ) 

82 


50 

CONTINUE 

83 



GO TO 999 

84 


60 

CONTINUE 

85 

C 



86 

c 


NOPT-3 


PACE 5 



NOZLIC - CRUDIC 


87 

C 



88 



JKI.H==MINO(JKH, JLM) 

89 



IFCKW.EQ.O) KHW«KMAX 

90 



IF(KW.NE.O) KMW-KW 

91 



iF(LW.EQ.O) LMW-LMAX 

92 



IF(LW.NE.O) LMW'LW 

93 



CALL XYZX I ( KMAX , JMAX , LMAX ) 

94 

C 



95 

C 

CALCULATE LOCAL STATIC PRESSURE 

96 

C 



97 



TO-1 .0 

98 



PO-l.O 

99 



DO 6^ I«l ,2 

100 



injT.EQ. UMAX. AND. l.EQ.l) 00 TO 65 

101 



IFCI.EQ.n IJ«*1 

102 



im.EQ.2) IJ— 1 

103 



J-UT 

104 



CALL LKPGAS(J.2) 

105 



PHIJ-0. 

106 



XXX-Q{ 1,6.1) 

107 



CALL GEOMIXXX.AJ.ZZT) 

loe 



EMC(J)»1 . 

109 


63 

TC<J)-TO/(l .+(GAMMA-l . ) /2. »EMC ( J) ••8) 

110 



PC ( J ) «P0» TC ( J ) * * ( GAMMA/ ( GAMMA- 1 . ) ) 

Hi 



IF(J.EQ.JMAX) GO TO 65 

11? 



IF(J.EQ.l) GO TO 65 

113 




1 14 



AB-AJ 

1 15 



CALL LKPGAS(J,2) 

116 



XXX»Q( 1,6,1) 

1 17 



CALL GEOM(XXX,AJ,ZZT) 

1 18 



DELPSI»ALOG<AJ/AB) 

119 



PH 1 HAT«PH 1 J+DELPS I »FUNC ( PH I J ) 

120 



PH I J- . 5M PH I J+PH I HAT^DELPS I »FUNC ( PH I HAT : 

121 



EMC(J)«EMC2(PHI J)**.5 

122 



GO TO 63 

123 


65 

CONTINUE 

124 



DO 100 J-1 .UMAX 

125 



CALL LKP0AS(J,2) 

126 



DO 70 K*1,KMAX 

127 



DO 70 L-l.LMAX 

128 



P-FSP 

129 



IFIK.LE.KW.AND.L.LE.LW.ANO.J.LT.JKLW) P* 

130 



CALL QCALC(J,K,L,HTOT(L,K),PTOT(L.K) ,P) 

131 


70 

CONTINUE 

132 

C 



133 

C 


ZERO VELOCITY AT ALL WALLS 

134 

c 



135 



IFIJ.LT. JKLW) GO TO 90 

136 



IFIJ.GT.JKW) GO TO 75 

137 



D072L«1,LW+1 

138 



DO 72 K-KW.KW+l 

139 



P-FSP 

140 



CALL QZERO(J,K,L.HTOT(L.K) ,PTOT(L,K) ,P) 

141 


72 

CONTINUE 

148 


75 

IF(U.GT.JLW) GO TO 90 

143 



DO 77 K»1,KW+1 

144 



DO 77 L-LW.LW+1 

145 



P-FSP 

146 



CALL QZERO(J,K,L,HTOT(L.K) ,PTOT (L ,K) ,P) 

147 


77 

CONTINUE 

148 



GO TO 90 

149 


80 

IF(KW.EQ.O) GO TO 86 

150 



DO 95 K-KW.KW+1 

151 



IF(K.EQ.KW) P-PC(J) 

152 



IF(K.EQ.KW+n P-FSP 

153 



IFIK.EQ.KW) LS-LW 

154 



IF<K.EQ.KW+1) LS-LW41 

155 



IFILW.EQ.O) LS-LMAX 

156 



DO 95 L«l ,LS 

167 



CALL Q2ERO(J,K,L,HTOT(L,K) ,PTOT(L,K) ,P) 

158 


85 

CONTINUE 

159 


86 

IF(LW.EQ.O) GO TO 90 

160 



DO 87 L-LW,LW+1 

161 



IF(L.EQ.LW) P-PC(J) 

162 



1F(L.EQ.LW-M ) P-FSP 

163 



IF(L.EQ.LW) KS-KW 

164 



IF(L.£Q.LW«I ) KS-KW41 

165 



IF(KW.EQ.O) KS-KMAX 

166 



DO 87 K-I ,KS 

167 



CALL QZERO(J.K.L,HTOT(L.K) ,PTOT(L,K) ,P) 

169 


87 

CONTINUE 

169 


90 

IF(J.LT.JLIWL) GO TO 95 

170 



IF(J.GT.JLIWU) GO TO 95 

171 

c 



172 

c 

WEDGE PLUG AT L«1 

173 

c 
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NOZLfC - CRUOIC 
17^ DO 9a K»1 .KMW 

175 L«1 

176 IF(J.GE.JKLW) P»FSP 

177 tF(J.LT.JKLW) P“PC(J) 

178 CALL QZERO(J.K.L.HTOT(L.K) .PTOT(L.K) ,P) 

179 9a CONTINUE 

180 95 CONTINUE 

181 IF(JKIWU.EQ.O) GO TO 99 

18a IF(J.LT.JKIWL) go to 99 

183 IFIJ.GT.JKIWUI GO TO 99 

184 C 

185 C WEDGE PLUG AT K-1 

186 C 

187 00 97 L*1 ,LMW 

188 K»1 

189 IFIJ.LT. JKLW) P*PC(J) 

190 1F(U.GE. JKLW) P-FSP 

191 CALL QZERO(U,K.L.HTOT(L.K) .PTOT(L.K) .P) 

1 9a 97 CONTINUE 

193 99 CALL LKPGAS(U. I > 

194 C 

195 100 CONTINUE 

196 999 RETURN 

197 END 
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NOZLIC - DELI 


1 *DECK PEL I 

2 FUNCTION DELMX) 

3 OELI».025*RWFUNC(X) 

H RETURN 

5 END 
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NOZLIC - DELOUT 
I *OECK DELOUT 
a FUNCTION OELOUT(X) 

3 DELOUT* . 0 1 * ( RHAX ( X ) -RWOUT ( X ) ) 

4 RETURN 

5 END 
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1 

s 

3 

5 

6 

7 

8 
9 

)0 

n 

la 

13 

m 

15 

16 

17 

18 

19 

20 
21 
22 
23 
2H 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 
HO 
HI 
H2 
H3 
HH 
H5 
H6 
H7 
H8 
H9 

50 

51 


NOZLIC - OKMET 
•DECK DKMET 

SUBROUTINE OKMET (J,K ,L ,XK . YK , ZK) 

•CALL COMl 

C INTERMEDIATE WALL IN K DIRECTION 
IF(KPLANE.EQ.O) GO TO 100 
XK«0.0 
YK»1.0 
ZK«0.0 
RETURN 
100 DY2 » .5 
KP - K+1 
KR K** 1 

IFtKW.LE.O.OR.K.LT.KW.OR,K.GT.KW+l .OR.J.OT.JKW) 00 TO 200 
IF(LW.GT.O.AND.L.GT.LW) GO TO 200 
IF(K.EQ.KW) GO TO 700 
IFIK.EQ.KW^l) GO TO 500 
200 IFCK.NE. 1 ) GO TO 600 

C TEST FOR INTERMEDIATE WALL NORMAL TO K-I SURFACE 
IF(LW) 300,300.450 

300 IF(JKIWL.LE.J.ANO.J.LE.JKIWU) GO TO 500 
C SYMMETRY 
400 XK«0.0 
ZK»0.0 

YK«2.0*(Q(L,7,KP)-Q(L,7,Kn^DY2 

RETURN 

C TEST FOR WALL NORMAL TO K»1 SURFACE 
450 IF(L-LW) 300,300,400 
C FORWARD DIFFERENCE 
500 FAC-2.0 
KR-K 

GQ TO 900 

60Q IF(K.NE.KMAX) GO TO 800 

IF(KMAXBC.LT.3.0R.KMAXBC.GT.4) GO TO 700 
C SYMMETRY 
XK-0.0 
YK-0.0 
ZK-0.0 

IF(KMAXBC.EQ.3) YK-2 . 0* (OIL , 7 ,K) -Q(L ,7,KR)) *DY2 
IF(KMAXBC.EQ.H) ZK-2 . 0^ (Q(L ,8 ,K ) -Q (L ,8,KR) ) •0Y2 
RETURN 

C BACKWARD DIFFERENCE 
700 KP-K 
FAC-2.0 
GO TO 900 

C CENTRAL DIFFERENCE 
800 FAC- 1.0 
900 XK-0. 

YK-(Q(L.7,KP)-Q(L,7,KR) ) •DY2»FAC 

ZK-(Q(L.8,KP)“Q(L,8,KR))^DY2^FAC 

RETURN 

END 
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NOZLIC - OLMET 


1 

•DECK 

OLMET 

2 



SUBROUTINE OLMET (J.K ,L . XL ,YL . ZL) 

3 

•CALL 

COMl 


C 


INTERMEDIATE WALL IN L DIRECTION 

5 



DZ2 « .5 

6 



LP = L+1 

7 



LR « L-1 

8 



IF(LW.LE,O.OR.L.LT.LW.OR.L.GT.LW+1 .OR. J.GT. JLW) GO TO 

g 



IF(KW.GT.O.ANO.K.GT.KW) GO TO 100 

10 



IF(L.EQ.LW) GO TO 700 

1 1 



IF(L.EQ.LW+1 ) GO TO 500 

12 


100 

IFCL.NE.n GO TO 600 

13 

C 


AXIS OF SYMMETRY 

m 



IFILAXIS.NE. n GO TO 150 

15 



XL-0.0 

18 



YL»Q(LP,7,K)-Q(L.7.K) 

17 



ZL»Q(LP,8,K)-Q(L,8,K) 

18 



GO TO 999 

19 

C 


TEST FOR INTERMEDIATE WALL NORMAL TO L«1 SURFACE 

20 


150 

IF(KW) 200,200,400 

21 

C 


TEST FOR WALL AT L-1 

22 


200 

IFULIWL.LE. J.ANO.J.LE. JLIWU) GO TO 500 

23 

c 


SYMMETRY 

2** 


300 

XL-0.0 

25 



YL-0.0 

26 



ZL»2.O»{Q(LP,0,K)-Q(L,8.Kn*DZ2 

27 



GO TO 999 

28 

c 


TEST FOR WALL AT L«1 

29 


400 

IF(K-KW) 200,200,300 

30 

c 


FORWARD DIFFERENCE 

31 


500 

LR-L 

32 



FAC-2.0 

33 



GO TO 900 

3H 


600 

IF(L.NE.LMAX) GO TO 800 

35 



IF(LMAXBC.LT.3.0R.LMAXBC.GT.4) GO TO 700 

36 

c 


SYMMETRY 

37 



XL-0.0 

38 



YL-0.0 

39 



ZL-0.0 

40 



IF(LMAX0C.EQ.31 YL-2 . 0* (Q(L . 7.K) -QILR, 7 ,K) ) *022 

41 



1F(LMAXBC.EQ.4) ZL-2.0* (QIL,8,K)-Q(LR,8,K) ) *022 

42 



00 TO 999 

43 

c 


BACKWARD DIFFERENCE 

44 


700 

LP-L 

45 



FAC-2. 0 

46 



GO TO 900 

47 

c 


CENTRAL DIFFERENCE 

48 


800 

FAC-1.0 

49 


900 

XL-0. 

50 



YL-(Q(LP,7,K)“Q(LR,7.K) )»DZ2*FAC 

51 



ZL«(Q(LP,8,K)-Q{LR,8,K) ) *DZ2*FAC 

52 


999 

RETURN 

53 



END 
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NOZLIC - GEOM 

1 »DECK GEOH 

2 SUBROUTINE GEOM(XIN, A.ZIN) 

3 *CALL COMl 

4 DIMENSION AR(32),B(32) 

5 DATA PI 2/1 .57079632/ 

6 DATA IFIRST/0/ 

7 2FUNC (XXX ) »2T+XXX*XXX/ (RT* (RT»RT-XXX*XXX ) • • . 5 ) 

0 IF (N0PT.EQ.2) GO TO 70 

9 IF (N0PT.EQ.3) GO TO 00 

\0 IF (IGE0M.E0.2) GO TO 25 

It C 20 COSINE NOZZLE 

12 XT-0, 

13 21-2.0 

IH 2E-1.5 

15 ZT-l.O 

16 C NOZZLE HEIGHT Z AND AREA A AT STATION X RELATIVE TO THROAT XT 

17 IF (XIN-XT) 10,10,15 

18 10 ZIN-ZT+.5MZl-ZT)»(l,+C0S(PI2»(XIN-XZER0)n 

19 GO TO 20 

20 15 ZIN*ZT4.5*(ZE-ZT)*(1.+C0S(PI2»(XMAX-XIN))) 

21 C 20 NOZZLE AREA 

22 20 A-ZIN 

23 GO TO 95 

24 25 CONTINUE 

25 IF ( IFIRST.NE.O) 00 TO 30 

26 ZT-.5308 

27 RT- 1.0777 

28 XI —2. 275 

29 X2— .4095 

30 X3-.0228 

31 X4-2.275 

32 Zl-1.3659 

33 Z2-ZFUNC(X2) 

34 Z3-ZFUNC(X3) 

35 Z4-.5868 

36 IFIRST-1 

37 30 CONTINUE 

30 IF (XIN-Xl) 35,35,40 

39 35 ZIN-Zl 

40 00 TO 65 

41 40 IF (XIN-X2) 45,45,50 

42 45 ZIN-ZU((Z2-21)/(X2-Xm*tXIN-XI) 

43 GO TO 65 

44 50 IF (XIN-X3) 55,55,60 

45 55 ZIN-ZFUNC(XIN) 

46 GO TO 65 

47 60 ZIN-23-M(Z4“Z3)/(X4-X3))»(XIN-X3) 

48 65 A-ZIN-YMAX 

49 GO TO 95 

50 C 

51 C NOPT-2 

52 C 

53 70 A-P12/2,»RWFUNC(XINJ»*2 

54 GO TO 95 

55 C 

56 C NOPT-3 

57 C 

58 80 KT-KHAX 

59 IF(KU.OT.Q) KT-KH 

60 LT-LMAX 

61 IF(LM.OT.O) LT-LH 

62 00 65 L«1 ,LT 

63 CALL XXM(L,J, 1 ,KT1 

64 00 83 K-1,KT 

65 OA-SQRT(XX(K, 1 )*XX(K, I )4XX(K,2)*XX(K,2)«XX(K,3) *XX(K,31 ) 

66 63 AR(K)-DA 

67 CALL Q0RTR(6(L),AR,1.,1,KT) 

68 85 CONTINUE 

69 CALL QORTR(A,B,l.,l,LT) 

70 95 RETURN 

71 ENO 




NOZLIC - INFLOW 

1 »DECK INFLOW 

2 SUBROUTINE INFLOW 

3 »CALL COMl 

H ITOT=LMAX 

5 INWALL -LW 

6 XXX“Xm/ZT 

7 RWI»RWFUNC(XXX)*ZT 

8 RWO*RWOUT(XXX)»ZT 

9 GAMI^GAMMA/ (GAMMA-I . ) 

10 DEL I 05 

11 OELO«1.0 

12 DO 35 L«1 .LW 

13 Rl(L)*RL(L) 

m RR«(RWI-RI(L))/0ELI 

15 IF(RR.GE. 1 ) GO TO 20 

16 IF(RR.0T.3.E-3) GO TO 15 

17 UUE»m5.3»RR 

18 GO TO 30 

19 15 UUE=RR*»(l./7.> 

20 GO TO 30 

21 20 UUE=1 . 

22 30 CONTINUE 

23 HTI(L)«1. 

VROUI(L)-0. 

25 PTI (L)»( 1 . + (GAMMA-n/2.»EHC(n*»2»(l .-UUE»UUE)) *»(-GAMI ) 

26 WRITE(6,100) L.RML) .PTI (L) .HTI (L) .VROUI (L) 

27 100 F0RMAT(22H L ,RI ,PT I ,HTI .VROUI* , 13, IPHE12.5) 

28 35 CONTINUE 

29 LWt«LW+t 

30 DO 70 L=LW1,LMAX 

31 RI(L)«RL(U 

32 VROUI (L)»0. 

33 UUO«(RI (L)-RWO)/DELO 

3H IF(UU0.GT.l . ) GO TO 50 

35 UU0-UU0»Ml./7.) 

36 GO TO 60 

37 50 UUO-1. 

38 60 SAVE«tGAMMA-l . I/2.*FSMACH»*2 

39 HTI (L)-FSTM 1 .+SAVE) 

HO PTI (L)“FSP»( ( 1 .+SAVE)/(I .-fSAVE^d-UUO^UUO) n**GAMI 

HI WRITE16. 100) L.RI(L) .PTKL) .HTI(L) .VROUI (L) 

42 70 CONTINUE 

43 RETURN 

44 END 
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NOZLIC - INITQ 

1 •DECK INITQ 

2 SUBROUTINE INITQ 

3 C INITIALIZE FLOW VARIABLES Q<L,N,K) AT GRID POINTS 

4 »CALL COM I 

5 DIMENSION ETA(I3),FP(13).G(13) 

6 DIMENSION PT (32) ,HT (32) , VR0U(32) , ZRU 32) 

7 DIMENSION T£(32) 

8 DATA ETA/0.0,0.5, 1.0,1.5,2.0,2.5,3.0,3.5,H.0,H.5,5.0,5.5,6.0/ 

9 DATA FP/0.0, . 16586, .32979, .48652, .62977, .75073, .8H605, .91255, 

10 1 .95552,. 97928,. 99 1 55,. 99682,. 99898/ 

1 1 DATA G/ 0 . 0 , . 03978 , . 1 6422 , . 359 12,, 6095 1 , . 87940 ,1.14133,1. 3557 , 

la 1 1 .51632, 1 .61644,1 .67446,1 .70189, I .71424/ 

13 EMC2(B)«1.+FL0AT(IJ)»B*».5 

14 FUNC(A)*4.*EMC2(A)»( 1 . + (GAMMA- I . ) /2. *EMC2( A) ) 

15 C initial DATA FOR FLAT PLATE BOUNDARY LAYER (N0PT»0) 

16 IF (NOPT.GT.O) GO TO 45 

17 DO 10 I«1 .13 

18 10 £TA(l)«ETA(I)/6.0 

19 DO 40 J«1 , JWMAX 

20 CALL LkPGAS(J,2) 

21 DO 35 L»LWF,LMAX 

22 ZETA-(L-1 .0)/(LMAX-l .0) 

23 ZETAE»(LE-1 . ) / (LMAX- 1 . 0) 

24 ZFAC-(FN-M . )*(FN»*(ZETA/ ( 1 .-ZETAE) )-l . ) / (FN* M 1 . / ( 1 . -ZETAE ) ) - 1 . ) 

25 IF(ZFAC.EQ.O. ) EZFAC-1. 

26 IF(ZFAC.EQ.O. ) GO TO 12 

27 EZFAC«EXP(-(6. 1»ZFAC)**2) 

28 12 G4«l .71424»FSMACH*£ZFAC/2.0 

29 G5> 1 . 0/ ( GAMMA » ( GAMMA- 1.0)) 

30 0035K»1,KMAX 

31 ETAJ«Q(L,8,K)»SQRT(RE/Q(L,6,K) )/ETAE 

32 IF (ETAJ.GT. 1 .0) GO TO 30 

33 DO 15 I»1 ,13 

34 IF (ETA( I ) .GT.ETAJ) GO TO 20 

35 15 CONTINUE 

36 1-12 

37 20 IFCI.EQ.13) I»12 

38 lE-I 

39 CALL TRP0L8(ETAJ. ETA, FP, 1-1 ,FPJ) 

40 CALL TRPOL8(ETAJ.^TA.O, 1-1 ,GJ) 

41 U«FSMACH*FPJ 

42 V-0.0 

43 W-FSMACH*G J/ (2.0 *SQRT ( Q ( L , 6 , K ) »RE ) ) 

44 Q(L, 1 ,K)-1 .0/(1 .0+. 5* (GAMMA-1 . 0) *FSMACH*»2» ( 1 . 0- (U/FSMACH) **2) ) 

45 IF (TW.LE.0.0) GO TO 25 

46 TB-TW-MU/FSMACH)*( 1 . 0-TW+ (GAMMA- 1 .0)/2.0»FSMACH**2» ( 1 .0-U/FSMACH) ) 

47 Q(L,1,K)-1.0/TB 

48 25 Q(L,2.K)-Q(L.1,K)»U 

49 Q(L,3,K)-Q(L,1,K)*V 

50 Q(L,4,K)«Q(L, 1 ,K)*W 

51 Q(L.5,K)-G5+.5»(Q(L,2,K)»*2+Q(L,3,K)*»2+Q(L,4,K)**2)/ 

52 1 Q(L,1,K) 

53 GO TO 35 

54 30 Q(L, 1 ,K)-l .0 

55 Q(L,2,K)-FSMACH 

58 Q(L,3,K)-0.0 

57 Q(L.4,K)-G4/SQRT(Q(L,6,K)»RE) 

58 1F(FSMACH.LE. I . )Q(L,4.K)-1 .71424*FSMACH/ (2 . *SQRT (Q(L .6 ,K) »RE ) ) 

59 Q(L,5,K)-G5+.5»(Q(L.2,K)**2+Q(L,3,K)*»2+Q(L,4,K)»*2)/ 

60 1 Q(L.i,K) 

61 35 CONTINUE i 

62 CALL LKPGAS(J.i) 

63 40 CONTINUE 

64 GO TO 999 

65 C INITIAL DATA FOR INTERIOR OF 20 NOZZLE 

66 45 CONTINUE 

67 IF (N0PT.EQ.3) GO TO 65 

66 LE-(LMAX>1 )/2 

69 IF(LW.GT.O) LE«(LW-^l)/2 

70 C SET STAGNATION PRESSURE AND TEMPERATURE 

71 TO-l.O 

72 PO-I.O 

73 LMW-LMAX 

74 IF(LW.GT.O) LMW-LW 

75 C 1-D ISENTROPIC CHOKED FLOW 

76 CALL XYZXI (KMAX,JMAX,LMW) 

77 DO 80 I-l ,2 

79 IF (JT.EQ. JMAX.AND. I .EQ. 1 ) GO TO 80 

79 IF(I.EQ.l) IJ-+1 

80 IF(I.EQ.2) IJ— 1 

81 J-JT 

82 CALL LKPGAS(J,2) 

83 PHlU-0. 

84 XXX-Q( 1,6,1) 

85 CALL GEOH(XXX,AJ,ZZT) 

86 £MC(J)«1. 
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NOZLIC - INITO 

87 C AVERAGE FLOW VARIABLES 

88 50 TC(J)«T0/U. + (GAMMA-l,)/2.*EhC(J)*»2) 

89 PC(J)“PO*TC(J)*» (GAMMA/(GAMHA“| , n 

90 UC(J)«EMC(J)*TC(J)»*.5 

91 00 75 L«1 ,LMW 

92 00 75 K«)*KHAX 

93 IF (L.GT.LE) GO TO 55 

9H UL«UC(J) 

95 TL»TC(J) 

96 GO TO 65 

97 55 UL»UC(J)*FL0AT(LMW-U/FL0AT(LHW“LE) 

98 IF (TW.6T.0) GO TO 60 

99 TL*TC(J)*(l .•KGAMMA-l,)/2.»EMC(J)**2»(l.-<UL/UC(jn**2n 

100 GO TO 65 

101 60 TL-TW+ (UL/UC(J) >*<-TW+TCt J)»(l .+ (GAMMA- I . )/2. *EMC(0) **2*( I .-UL/ 

102 1 uc(jnn 

103 65 VL-0. 

lOM XJ*Q(L,13,K) 

105 YJ»Q(L,1H,K) 

106 2J*Q(L.15,K) 

107 WL-UL*2J/XJ 

109 IF (N0PT.LT.2) GO TO 70 

109 IF(K.EQ.l) VR»UL*ZJ/XJ 

110 VL*VR»SIN(TH(Kn 

111 ML-VR»COS(TH(K)} 

112 70 CONTINUE 

113 RHOL«PC(J)/TL 

1 IH EL-PC(J)/ (GAMMA* (GAMMA-1 .))+RHOL*( (UL»UL+VLtVL+WL*WL)/e. ) 

115 Q(L,1 .Kl-RHOL 

1 16 Q(L,2,K)«RH0L*UL 

117 Q(L.3,K)»RH0L»VL 

119 Q(L.4,K)«RH0L*WL 

119 Q(L,5.K)«£L 

120 75 CONTINUE 

121 CALL LKPGAS(J. 1 ) 

122 IF (J.EQ.JMAX) GO TO 80 

123 IF (J.EQ. I ) GO TO 80 

12H J-J+IJ 

125 AB-AJ 

126 CALL LKPGAS(J.2) 

127 XXX«Q(1.6.n 

128 CALL G£0M(XXX.AJ.Z2T) 

129 OeLPSI«ALOO(AJ/Aei 

130 PHI HAT-PH I J^OELPS I *FUNC (PH IJ) 

131 PHIJ-,5*(PHIJ+PHIHAT+0ELPSI*FUNC(PHIHAT) ) 

132 EMC(J)-£MC2(PHIJ)»*.5 

133 GO TO 50 

13M 80 CONTINUE 

135 IF(NOPT.EQ,2,AN0.1TOT.EQ.O.ANO.IGEOM.EQ.O) CALL INFLOW 

136 85 CONTINUE 

137 IF (ITOT.EQ.O) GO TO 1H5 

138 CALL LKPOASC 1 .2) 

139 DO 100 I«1 , ITOT 

mo IF (LW.OT.O) GO TO 90 

im RI(I)«RI(I)/RI(ITOT) 

1H2 GO TO 100 

m3 90 IF ( I .GT. INWALL) GO TO 95 

1H4 RI(I)«RI(I)/RI(INWALL) 

ms GO TO 100 

146 95 IF( I ,EQ. INWALL+n RISAVE-RI ( INWALL^ I ) 

147 RI(n-(RI(I)-RISAVE)/(RI(ITOT)-RISAVE) 

148 100 CONTINUE 

149 00 120 L-1 ,LMAX 

150 LL-LMAX 

151 IF (LW.EQ.O) GO TO 1 10 

152 LL*LW 

153 IF (L.LE.LW) GO TO 110 

154 IF (NOPT.GT. I ) GO TO 105 

155 ZRL(L)-(Q(L,8* 1 ) -Q(LL<* 1 .8 , M ) / (Q(LMAX .8, 1 ) -(3 (LL<f I .8.1)) 

156 GO TO 120 

157 105 ZRL(L)«(RL(U-RL(LH>l>)/(RL(LMAX)-RL(LW'*^m 

158 GO TO 120 

159 110 IF (NOPT.GT. I) GO TO 115 

160 ZRL(L)-Q(L.e.l)/Q(LL.8.|) 

161 GO TO 120 

162 115 ZRL(L)«RL(L)/RL(LU 

163 120 CONTINUE 

164 C 

165 C INTERPOLATE RADIAL DISTRIBUTION OF PRESSURE AND TOTAL ENTHALPY 

166 C TO ACTUAL GRID 

167 C 

168 DO 135 L«l .LMAX 

169 IF(L.GT.LW) go TO 131 

170 DO 130 l»t . INWALL 

171 Cl-ZRL(L)-Rm) 

172 C2»RI(mi)-ZRL(L) 

173 IF (C1*C2) 130.125,125 
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NOZLIC - INITQ 

174 125 PT(U»(ClfPTlU+l)+C2*PTin))/(Cl+C2) 

175 HT(U»(Cl*HTI(I + n+C2»HTI(n)/(Cl+C2) 

176 VROU(L)»(Cl*VROUI ( l+I )+C2*VR0UI ( I ))/ (C1+C2) 

177 GO TO 135 

178 130 CONTINUE 

179 131 INM1«1NMALL-^1 

180 00 134 1«INM1,IT0T 

181 Cl«ZRL(L)-RI(n 

182 C2«RI(I+1)-ZRL(L) 

183 IF (C1»C2) 134,132«132 

104 132 PT(U«(CPPTI(I + l)+Ce*PTlUn/lCl+C2) 

185 HT(L)«(Cl*HTI(l4n+C2*HTI(m/(Cl+C2) 

186 VR0U(L.)«(Cl*VR0UI(I'^l)‘t>C2»VR0Unm/(CHC2) 

187 GO TO 135 

188 134 CONTINUE 

189 135 CONTINUE 

190 DO 140 L-1 iLHAX 

191 DO 140 K»1,KMAX 

192 PTOT(L,K)»PT(U 

193 HTOT(U,K)«HT(U 

194 V0U(L,K)»VR0U(L)*S1N(TH(K) ) 

195 , W0U(E,K)«VR0U(U»C0S(TH(K1) 

196 140 CONTINUE 

197 145 CONTINUE 

198 IF UCRUOE.NE.O) GO TO 190 

199 IF (ITOT.EQ.O) GO TO 195 

200 CALL LKP0ASU.2) 

201 DO 150 K»1,KMAX 

202 DO 150 L»I,LMW 

203 PCTOT-(PC(l)/PTOTtL,K))*»UGAMMA-l.)/GAMMA) 

204 VLS«a.»HTOT(L.K)*(l.-PCTOT)/IOAMMA-l.) 

205 VL«SQRT(VLS) 

206 Q(L, 1 ,K)*PTOTU.,K)/HTOT(L»K)»(PC(1 )/PTOT(L,Kn**( 1 .0/GAHMA) 

207 Q(L,2,K)-Q(L,1,K)»VL/SQRT(I .♦V0U(U,K)»*2+W0U(L,K)*»2) 

208 Q(L.3,K)-Q(L.2,K)«V0U(L,K) 

209 Q(L.4.K)«0(L.2,K)»M0U(L,K) 

210 T»HT0T(L.K)*PCT0T 

211 Q(L»5,K)-Q(L.l,K)MT/(GAMHAMpAMMA-l.ntVL,S/2.) 

212 150 CONTINUE 

213 CALL UKPGAS (1,1) 

214 155 CONTINUE 

215 IPUCRUDE.NE.O) 00 TO 190 

216 IF(KREADY.GT.Q) CALL SIOMIC 

217 CONTINUE 

218 C BOUNDARY LAYER THICKNESS FOR A01A8ATIC B.C. 

219 IF (IHRIT.NE.p) HRITE (6.165) 

220 165 FORMAT (//T4.1HJ, Til, 3HUCJ.T24,3HTCJ,T37,3HUEJ.T50,3HTEJ. 

221 1 T62.5HDELTJ,T74,6HDELTZJ) 

222 C 

223 SJ-0. 

224 CALL LKPGAS(1,2) 

225 XXX«Q( 1,6.1) 

226 CALL GEOM(XXX.AJ.ZZT) 

227 OELT(l)-FN/(l.+FN)»ZZT 

228 DO 185 J-l.JMAX 

229 CALL LKPGAS(J,2) 

230 XJoQCLMAX. 13. 1 ) 

231 YJ-Q(LMAX. 14. I ) 

232 ZJ-Q(LMAX. IS. 1 ) 

233 UE(J)-UC(J)M1 .■MZJ/XJ)**2)»*.5 

234 TE(J)»1 .-(GAMMA-l . ) /2 . *UE ( J) *»2 

235 FJ-(2.4TE(J) )/(UE(J)»*5»TE(J)»»( (2.-0AMMA)/ (GAMMA-1 . )) ) 

236 IF(J.EQ.I)F1-FJ 

237 0J-UE(J)**9*TE(J)**((4,-3.*GAMMA)/(GAMMA-1.))MXJ*XJ+ZJ»ZJ)**.5 

238 IF (J.EQ.l) GO TO 170 

239 SJ-SJ4>.5»(GJ^GJ1 ) 

240 0ELT(J)-FJ*((DELT(1)/F1)»*2+(4./(3.*RE))*SJ)**.5 

241 170 DELTZ(J)*DELT(J)*(1.+(ZJ/XJ)*»2)**.5 

242 GJI-GJ 

243 IF (IWRIT.NE.O) HRITE (6. 180) J,X( J) ,TC( J) .UE(U) ,TE( J) .DELT(U) .DEL 

244 ITZ(J) 

245 180 F0RMAT(2X,I8.6(2X.1PEI1.4)) 

246 185 CONTINUE 

247 GO TO 195 

246 190 CALL CRUOtC 

249 195 CONTINUE 

250 999 RETURN 

251 END 
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NOZLIC - INPUT 
1 ‘DECK INPUT 
a SUBROUTINE INPUT 

3 ‘CALL COMI 

H DATA LWF/I/ " 

5 C NOPT 

6 C 0 EXTERNAL 3-0 BOUNDARY LAYERS 

7 C I INTERNAL FLOW IN 2-0 NOZZLES 

8 C a AXIZYMMETRIC NOZZLES AXIS IS AT Y-Z-0 (THE CARTESIAN 

9 C L-I,K»I,KMAX 

10 C PURE INTERNAL FLOW OR COMBINED EXTERNAL/ INTERNAL FLOW 

lie FOR KW>0 OR LW>0 SET ICRUDE-I ^ 

la C FOR JLIWU > 0 SET ICRUOE-I 

13 C 3 arbitrary NONAX I symmetric NOZZLES 

IN C FOR KW > 0 OR LW > 0 SET ICRUDE "I 

15 C 

16 C IRORID 

17 C 0 COMPUTE THE GRID 

18 C I READ IN THE GRID FROM A FILE PREPARED BY RORIO 

19 C 

aO C ICRUDE 

ai C 0 USE THE CODE INITQ TO GET THE INITIAL P'S 

ae C I USE THE CODE CRUDIC TO GET THE INITIAL Q'S 

33 READ (5, lOINMAX.JMAX.KMAX.LMAX.LAMIN. INVISC, JIBC, JMAXBC.KPLANE.KIB 

ai IC.JKIWL.JKIWU.KW.JKW.KMAXBC 

35 READ (5,I0)LIBC,JLIWL,JLIWU,LW,JLW,LMAXBC,NRST,IWRIT,N0RI,NP.KVIS 

36 I .LVIS.KLVIS, INFLT, ISUTH.NROUT 

B7 READ (5,I5)DT,FSMACH,RMACH,RE,PR,RTDEGK,FSP,FST 

as READ (5, 151 GAMMA, RMUEXP.TW.CNBR.OTF AC, RM.SMU, OMEGA 

as 10 FORMAT! 1615) 

30 15 FORMATIBFIO.OI 

31 READ (5,IO)NOPT,JREAOX,IOEOM,KREADY,IRGRIO,ICRUDE,ITOT,INWALL 

33 READ (5, I5)XZER0,XMAX,FN,YMAX 

33 IF (JREADX.GT,0) READ (5, 15) (X( J) , J>l , JREADXI 

31 IF (KREAOY.GT,0) READ (5 , 15) ( YKR(K) ,K-I ,KREADY) 

35 IF UTOT.EQ.O) GO TO 35 

36 DO aO I”1 , ITOT 

37 READ (5,I5)RI(I),PTI(I),HTI(I),VR0UI(I) 

38 eo CONTINUE 

39 35 ALP-0. 

10 ITMAX-NMAX 

11 WRITE (6,30)NMAX,JMAX,KMAX,LMAX,LAMIN,INVISC,UIBC,UMAXBC,KPLANE,KI 

ia IBC,JKIWL,JKIWU,KW,JKW,KMAXBC 

13 WRITE (6,35)LIBC,JLIWL,ULIWU,LW,JLW,LMAXBC,NRST, IWRIT,NORI ,NP,KVIS 

11 l,LVIS,KLVIS,INFLT,ISUTH,NROUT 

15 WRITE (6,10)DT,FSMACH,RMACH,RE,PR,RTDEGK,FSP,FST 

16 WRITE ( 6, 15 ) GAMMA, RMUEXP,TW,CNBR,DTFAC, RM.SMU, OMEGA 

17 30 FORMATIiaaHI NMAX UMAX KMAX LMAX LAM IN I NV I SC Jl 

18 IBC JMAXBC KPLANE KIBC UKIWL JKIWU KW JKW KMAXB 

19 1C /I6I8) 

50 35 FORMAT!// I 33H LIBC JLIWL JLIWU LW JLW LMAXBC 

51 I NRST IWRIT NGRI NP KYIS LVIS KLVIS INFLT IS 

Sa aUTH NROUT /16IB) 

53 10 F0RMAT!//7X,aHDT, 10X.6HFSMACH, I0X.5HRMACH 

51 1 , 1 ax , aHRE , 1 3X , aHPR , 1 1 X , 6HRTDEGK , 1 OX , 3HFSP , 1 3X , 3HFST , / 1 P8E 1 5 . 7 1 

55 15 FORMAT ! / /5X , 5HGAMMA , 1 OX , 6HRMUEXP , 1 I X , 3HTW , 1 aX , 1HCNBR , 1 OX , 5HDTFAC , 

55 I l3X,aHRM, iaX,3HSMU, I 1X,5H0MEGA/1P8EI5.7///) 

57 WR 1 TE ! 6 , 50 ) NOPT . JREADX , I GEOM , KREAOY , I RGR I D , I CRUDE , I TOT , I NWALL 

58 50 FORMAT!/ 66H NOPT JREADX I GEOM KREADY I RGR ID ICRUDE 

59 I ITOT INWALL /I6IB ) 

60 WRITE !6,55)XZER0,XMAX,FN,YMAX 

61 55 F0RMAT!/5X,SHXZER0,10X,1HXMAX,l3X,aHFN,iaX,1HYMAX, 

6a I /1P1EI5.7) 

63 IF (JREADX. GT.O) WRITE (6,60) !X!J) ,J«I .JREADX) 

61 60 F0RMAT!/8H X!J)- (BFIO.5)) 

65 IF (KREAOY. GT.O) WRITE (6,65) !YKR!K),K-1, KREADY) 

66 65 FORMAT !8H Y(K)« (8F10.5)) 

67 IF (ITOT.EQ.O) GO TO 85 

68 WRITE (6,701 

69 70 F0RMAT(T1,IHI.TI6,aHRI,Ta8,3HPTI.T11.3HHTI,T53,5HVR0Ul) 

70 DO 80 I«l .ITOT “I 

71 WRITE l6,75)l,RI(ll,PTI(t),HTI(T),VR0UI(II 

78 75 F0RMATI8X, 18, 6X,1I8X, IPEII.il I 

73 80 CONTINUE 

71 85 CONTINUE 

75 1F( IRORID. EQ. 01 GO TO 110 

76 IFINOPT.NE.3I GO TO 110 

77 WRITE(6,89) 

78 89 FORMAT ( T8 , 1 HL , T 1 5 , 1 HK , T31 , 1HPTOT , T38 , 1HHTOT , T58 , 3HVOU , T65 , 3HW0U ) 

79 NKL-KMAX»LMAX k 

80 DO 100 I-I.NKL 

81 REAO(5,90) L,K,PT0T(L,K) .HTOTIL.K) ,VOU(L,K) ,W0U(L,KI 

88 80 F0RMATI8I5,1F10.0I 

83 WRITEI6. 95) L,K,PTOT(L,K) .HTOTIL.K) ,VOU(L,K) ,WOU(L,KI 

81 95 F0RMAT(1X,8(I5,8X) .KSX.IPEII .1)) 

85 100 CONTINUE 

86 no CONTINUE 
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NOZLIC - JNPUT 

87 RETURN 

88 END 
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NOZLIC > LAQRAN 

1 *OECK LAGRAN 

2 SUBROUTINE LAGRAN (XX.X.FT) 

3 DIMENSION X(4) ,FT(H) ,A(H) ,8(4) .C(H) .D(H) ,E(H) 

4 DO 5 I«l,4 

5 A(I)«XX“X(I) 

6 Bdi^xcn-xd) 

7 cd)»x(a)-x(i) 

e Dd)«x(3)-xd) 

9 5 Ed)»X(4)-X(n 

10 IF (XX.GT.X(2n GO TO 7 

n FT(4)«0. 

12 FTd)«(A(2)*A(3))/(e(2)*B(3n 

13 FT(a)»(Ad)*A(3))/(Cd)*C(3)) 

14 FT(3)*(Ad )»A(2))/(0d)*0(a)) 

15 RETURN 

16 7 IF (XX.LT.X(3>) GO TO 8 

17 FT(1)«0. 

18 FT(a)-(A(3)*A(4))/(C(3)»C(4)) 

19 FT(3)-(A(a)*A(4) J/(0(2)*0(4)) 

20 FT(4)-(A(2)»A(3))/(E(a)*E(3)) 

21 RETURN 

22 8 FTd)»(A(2)»A(3)»A(4))/(e(2)*8(3)*B(4)) 

23 FT(2)»(A(n»A(3)*A(4))/(Cd)«C(3)*C(4)) 

24 FT(3)»(A( I )*A(2)»A(4))/(0d)*0(2)»D(4)) 

25 FT(4)-(Ad)*A(2)»AC3))/(Ed)»E(2)»E(3)) 

26 RETURN 

27 END 
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NOZLIC - LJPGAS 
1 ‘DECK LJPGAS 

S SUBROUTINE LJPQAS(K,NI 

3 ‘CALL COMl 

H CALL DMPAST(13,(K-1I«NLR0W,1) 

5 DO 10 J-1 ,JMAX 

6 IF(N.EQ.l) CALL 0HWAST(13,Q(1 ,1 ,J) .NLROWI 

7 IF(N.EQ.B) CALL 0MRAST(13,QC1,1 ,J) , NLROWI 

a CALL OMPASTU3,NLSKIP,-l I 

9 10 CONTINUE 

10 RETURN 

11 END 
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N02LIC - LKPGAS 
•DECK LKPGAS 

SUBROUTINE LKPGAS (J,N) 

•CALL COMl 

CALL DMPAST(13,(J“I)»NKLP.|) 
IF(N.EQ.l) CALL OMWAST ( 13.Q,NKLP) 
IF(N.£Q.2) CALL OMRAST U3.Q.NKLP) 
RETURN 
END 
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NOZLIC > HAIN 

1 »OECK MAIN 

^ PROGRAM NOZL 1 C ( I NPUT . OUTPUT , TAPES* INPUT , T APE6»0UTPUT . T APEe , TAPE 1 5 . 

3 1 TAPES) 

H C MAIN ROUTINE TO SET UP GRID AND INITIALIZE FLOW VARIABLES 

5 DIMENSION lOPARS(M) 

6 I0PARS(1)«0 

7 IDPARSOJ-O 

8 IOPARS(3)«0 

9 IOPARS(H)»0 

10 CALL DMHAST(3,0.0) 

11 CALL OMOASTUS.O, lOPARS) 

18 CALL INPUT 

13 CALL NDLPTS 

IH CALL INITQ 

15 CALL OUTPUT 

16 STOP 

17 ENQ . 


PAGE 19 



N02LIC - NDLPTS 
1 *OECK NDLPTS 
a SUBROUTINE NDLPTS 

3 »CALL COMl 

H DATA LWF/l/,JT/0/ 

5 ZT«0. 

6 C 

7 C ANY CHANGE IN SIZE OF Q ARRAY MUST BE REFLECTED IN THE FOLLOWING 


8 

C 

FIVE PARAMETERS 

9 

C 



10 



NMAX«16 

11 



N0L«32 

la 



NLROW«NMAX»NOL 

13 



NKLP»NMAX*KMAX*NOL 

IH 



NLSKIP«NKLP-NLROW 

15 



PI«4.*ATAN(1.) 

16 



JWMAX»JMAX 

17 



IFCNOPT.GT.O .AND. FN.NE.O) FN» ( 1 . 0-FN) /FN 

18 



ETAE»6.0M 1 .0+0.07*FSMACHM0.2+FSMACH) ) 

19 



DO 95 J«1 ,JMAX 

20 



IF ( IRGRID.EQ.O) GO TO 20 

21 



READ! 3) Q(1 .6, 1 ) , UQ(L,7,K) ,Q(L.8,K) ,K»1 ,KMAX) ,L-1 ,LMAX) 

22 



DO 10 L»1 .LMAX 

23 



DO to K»1 ,KMAX 

2^ 


10 

Q(L,6,K)«Q( 1,6,1) 

25 

C 



26 

C. 

. . SEARCH FOR THROAT 

27 



IF (Q( 1,6,1) .NE.O) GO TO 15 

28 



LL-LMAX 

29 



IF(LW.GT.O) LL«LW 

30 



ZTSAVE»Q(LL.8,1)-Q(1.8.1) 

31 



JT-J 

32 


15 

CONTINUE 

33 



GO TO 90 

34 


20 

CONTINUE 

35 



DO 75 K-l.KMAX 

36 



TH(1)»0. 

37 



YJKL»0. 

38 



IF (KMAX.EQ. 1 ) GO TO 25 

39 



TH(K)-PI/2, *FLOAT(K-l )/FLOAT(KMAX-l ) 

40 



YJKL«YMAX*FLOAT (K- 1 ) /FLOAT (KMAX- 1 ) 

41 


25 

CONTINUE 

42 



DO 75 L-LWF.LMAX 

43 



IF (JREAOX.GT.O) GO TO 30 

44 



Q (L . 6 , K ) -XZERO+FLOAT ( J- 1 ) /FLOAT ( UMAX- DM XMAX-XZERO ) 

45 



GO TO 35 

46 


30 

Q(L,6,K)*X(J) 

47 


35 

CONTINUE 

48 



CALL STRCH( J . K , L , ZFAC ) 

49 



IF (N0PT.LT.2) GO TO 50 

50 



XXX-Q(L,6,K) 

51 



IF (LW.GT.O.ANO.L.GT.LW) GO TO 40 

52 



RJL»RWFUNC ( XXX ) »ZFAC 

53 



GO TO 45 

54 


40 

RJL*RWOUT ( XXX ) ♦ (RMAX ( XXX ) -RWOUT ( XXX ) ) *ZF AC 

55 


45 

Q(L,7,K)»RJL*SIN(TH(K) ) 

56 



Q(L,8,K)»RJL*C0S(TH(K) ) 

57 



IFIK.EQ.l .AND. J.EQ.D RL(L)*RJL 

58 



GO TO 75 

59 


50 

IF (KREAOY.GT.O) GO TO 55 

60 



Q(L,7,K)-YJKL 

61 



GO TO 60 

62 


55 

IF(K.LE.KREADY) Q(L,7,K)«YKR(K) 

63 


60 

IF (NOPT.NE.O) GO TO 65 

64 



ZZ-ETAE»SQRT(Q(L,6.K)/R£) 

65 



GO TO 70 

66 


65 

XXX«Q(L,6,K) 

67 



CALL GEOM(XXX,AA,ZZ) 

68 


70 

Q(L,8,K)»ZZ»ZFAC 

69 


75 

CONTINUE 

70 



IFIKREAOY.OT.O .AND. KREAOY.LT.KMAX) CALL YSTRCH(YKR(KREADY1 

71 



CONTINUE 

78 

C 

SEARCH FOR THROAT 

73 

C 

SAVE A Z IN CASE JT-1 HHEN YOU CAN'T FIND AN X-0. 

74 



IF(J.EQ.l) ZT5AVE«Q(LMAX,e,l) 

75 



IF (Q(l, 6,1). NE.O) GO TO 80 

76 



JT-J 

77 



LL-LMAX 

78 



IF(LW.GT.O) LL-LW 

79 



ZTSAVE-Q(LL,8, 1 ) 

80 



GO TO 85 

61 


80 

CONTINUE 

82 


65 

CONTINUE 

63 


90 

CONTINUE 

84 

C 


IF<N0PT.EQ.2) CALL SCALE 

85 



CALL LKPGASIJ, 1 ) 

86 


95 

CONTINUE 
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NOZLIC - NDLPTS 


07 


IF(JT.EQ.O) JT-1 

86 


WRITE (6,100)JT 

89 

too 

FORMAT (2X, a IHNOZZUE THRO 

90 


IF (NOPT.LT.n GO TO 110 

91 


IF(NOPT.GT,n ZT-ZTSAVe; 

92 


00 105 J«1 .UMAX 

93 


CALL LKPGAS(J,2) 

9H 


CALL SCALE 

95 


CALL LKPGAS(J,n 

96 

105 

CONTINUE 

97 

no 

CONTINUE 

98 


RETURN 

99 


END 
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NOZLIC - OUTPUT 
1 •DECK OUTPUT 
a SUBROUTINE OUTPUT 

3 ‘CALL COMl 
■♦IT-0 

5 GD-GAMMA* (GAMMA-1 . ) 

6 TAU-0.0 

7 CNBR-O.O 

8 NK-0 

9 NOa-KMAX'LMAX 

10 NR I TE ( a I KMAX , UMAX , UMAX , I TMAX , LMAXSC , L I BC , ESMACH , GAMMA , RE . SMU . OT 

11 1 .ALP.CNBR.PR 

la WRITECai IT.TAU.DT.NK 

13 D090J*I,JMAX 

li^ CALL LKPGAS(J.a) 

15 IF (IWRIT.EQ.O) GO TO i*0 

IE DO 35 K-I.KMAX 

17 NRITE (6,aSIJ,K 

18 as FORMAT! lH0,aX,aHJ». l3,aX.aHK-,l3,aX,IHL,6X,IHX,l IX, IHY, 1 IX, IH2 

19 I , 6X , 6HR/RREF , 5X , GHU/ AREF , 5X , 6HV/ AREF , 5X , BMW/ AREF , 5X , 6HT/ TREF , 

aO 1 5X,6HP/PREF,5X,3HENT) 

al DO 35 L-ULMAX 

aa R - Q(L, I ,KI 

a3 RR - 1 ,/R 

a** u - Q(L,a,K)»RR 

as V - Q(L,3,KI»RR 

ae W - Q(L,H,K1»RR 

a7 E - Q(L,5,K) 

SB sa*o.o 

39 iF(A8S(ui ,GT. 1 .OE-17) sa-sa+u»»a 

30 IF(ABS(V).GT.I,0E-17) sa-sa*v»*a 

31 iFiABSiw) ,GT. 1 .OE-I7I sa-sa+w»«a 

3a PP - GD*(E-.5*R*Sai 

33 TT*PP»RR 

34 ENT • PP/(ABS(R1) ••GAMMA 

35 WRITE (6,30IL,0<L,6.K) ,Q(L,7,K) ,Q(L,8,K) ,R,U,V,W,TT,PP,ENT 

36 30 FORMAT! IH , I4X, 13, lOFI I .61 

37 35 CONTINUE 

38 40 CONTINUE 

39 50 WRITE !2 I ! ! !Q!L ,N ,K) ,L>I ,LMAXI ,N«I , 8) ,K«I ,KMAX I 

40 90 CONTINUE 

41 C 1F!N0PT,EQ. 1 1 WR1TE!3)EMC,UC,PC.TC,UE,DELT,DELTZ 

4a RETURN 

43 END 
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N02UIC - QCALC 
1 ‘DECK QCALC 

a SUBROUTINE QCALC (J.K ,L ,HT ,PT ,P) 

3 •CALL COMl 
H XJ-Q(L,I3,K) 

5 YJ«Q(L,m,K) 

6 ZJ«Q(L.1S,K) 

7 T«HT*(P/PT)»*((OAHMA-l.)/GAMMA), 

6 RHO-P/T 

9 VLS**a. /(GAMMA-1. )»ABS(HT-T) 

10 V-SQRT(VLS) 

11 R»SQRT(XJ*XJ+YJ»YJ+ZJ»ZJ) 

12 Q(L,1,K)-RH0 

13 Q(L,a,K)«RHO*V»XJ/R 

14 Q(L.3.K)-RH0»V*YJ/R 

15 Q(L,H,K)«RHO»V»ZJ/R 

16 Q(L . 5 . K) -RHO» ( T/ (GAMMA* (GAMMA- 1 . ) ) ♦VLS/a . ) 

17 RETURN 

18 END 
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NOZLIC - QORTR 
J *DECK QDRTR 

a SUBROUTINE QDRTR(ENTGRL.ENTGRO,DLT. IL, lU) 

3 DIMENSION ENTGROU) 

H C l-O TRAPEZOIDAL QUADRATURE. COMPUTES DEFINITE INTEGRAL ,ENTGRL , 

5 C OF INTEORAND,ENTGRD( I) .BETWEEN LIMITS IL.IU. 

6 C 

7 ENTGRL*0.5*(ENTGRO(IL)+ENTGRD(IUn 

e IF(( lU-IL) .LT.ai RETURN 

9 ILP-IL+1 

10 IUM«IU-1 

11 DO I I-ILP, lUM 

la I ENTGRL-ENTGRL -^ENTGROU) 

13 ENTORL-ENTGRL*OLT 

14 RETURN 

15 END 
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NOZLIC - Q2ERO 
•DECK QZERO 

SUBROUTINE QZEROl J.K ,L ,HT ,PT ,P) 
•CALL COMl 

T«HT*(P/PT)*»( (GAMMA-I . )/GAMMA) 

RHO«P/T 

Q(L,l,K)»RHO 

Q(L,e,K)»0. 

Q(L,3,K)«0, 

Q(L.H,K)«0. 

Q(L,5,K)«RH0^T/ (GAMHA^ (GAMMA- 1 . ) ) 

RETURN 

END 


PAGE 25 



N02LIC - RMAX 

1 *DECK RMAX 

a FUNCTION RMAXtXIN) 

3 *CALL COMl 

H DIMENSION XINPUT(2B) ,RIN(88) 

5 DATA XINPUT/-3H.5.-29.5»-2H.5,-19.5,-I5.5,“ia.5,-10. 1 ,-8.4*-7.0, 

6 1 -5.842,-4.953. -4.064,-3.040, 

7 2 -2.032,-1.016,0. , I .00,2. 17,3.26,4.35,5.44,6.53,7.62,0,7, 

8 3 10. ,11. 5, 13. ,14. 5/ 

9 DATA RIN/28*12.62/ 

10 DATA IFIRST/0/ 

1! inZT.EQ.O.l GO TO 5 

12 IFdFlRST.NE.O) 00 TO 5 

13 IFIRST-l 

14 00 2 J«1 .UMAX 

15 X1NPUT(J1-XINPUT<J)/2T 

16 R1N(J)-RIN(J)/ZT 

17 2 CONTINUE 

10 5 CONTINUE 

19 00 to J-1 .UMAX 

20 IF(XIN.N£.XINPUT(J) ) GO TO 10 

21 JFIND«J 

22 GO TO 20 

23 10 CONTINUE 

24 GO TO 990 

25 20 CONTINUE 

26 RMAX«RIN(JFlNO) 

27 RETURN 

28 990 NRITE(6.099) 

29 999 FORMATCaX.SSH^^^’^ERROR IN RMAX FUNCTION ROUTINE**) 

30 STOP 

31 END 
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NOZLIC - RWFUNC 

1 •DECK RWPgNC 

2 FUNCTION RWFUNC(XIN) 

3 •CALL COMl 

4 DIMENSION X1NPUTC28) .RIN(28) 

5 DATA X INPUT/ -34. 5, *29. 5, -24. 5. “19. 5, -15.5.-12.5,-10. 1 ,“8.4, -7.0, 

6 1 -5.842,-4.^53,-4.064,-3.048, 

7 a -2.032,-1 .016,0. , 1.08,2. 17.3.26.4.35,5.44,6.53.7.62.8.7. 

8 3 10. . 1 1 .5, 13. , 14.5/ 

9 DATA RIN/4*6.4315,6.33B,6. 194,5.996,5.820,5.653,5.436.5.019,4.585, 

10 1 4.229,3.993.3.856, 13*3. 81/ 

1 1 DATA IFIRST/0/ 

12 IFIZT.EQ.O.) GO Tp 5 

13 IFUFIRST.NE.O) GO TO 5 

14 IFIRST-1 

15 D02J»l,JMAX 

16 XINPUT(J)*XINPUT(g)/ZT 

17 RIN(J)*RIN(J)/ZT 

18 2 CONTINUE 

19 5 CONTINUE 

20 DO 10 J-1 , UMAX 

21 IF(XIN.NE.XINPUT(JM GO TO 10 

22 OF I NO- J 

23 GO TO 20 

24 10 CONTINUE 

25 GO TO 990 

26 20 CONTINUE 

27 RWFUNC-RIN(JFIND) 

28 RETURN 

29 99p NRITE(6,999) XIN.XINPUT 

30 9p9 FORMAT (2X,37H^**ERR0R IN RWFUNC FUNCTION ROUT Il^E^*/ (8E 12.5) ) 

31 STOP 

38 END 
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NOZLIC - RWOUT 
I »DECK RWOUT 

a FUNCTION RWOUT (X IN) 

3 *CALL COMl 

H DIMENSION XINPUT(ae) ,RIN(a8) 

5 DATA XINPUT/-3‘*.5.-a9.5,-eH.5,-l9.5,-I5.5.-ia.5»“10. 1 ;-e.H.-7.0, 

6 1 -5.8H^.-^.953,“^.06^,-3.0^8, 

7 a -3.033.-1.016,0. ,1.08, a. 17,3.86,4.35,5.4^,6.53,7.62,8.7, 

8 3 10. ,11.5, 13. .14. 5/ 

9 DATA RIN/4»7. 62, 7. 54624, 7. 38481 ,7. 1898, 

10 I 7.01605.6.85065.6.69854,6.5783^, 

11 2 6.43787.6.27408,6.09943,5.91386.5.71732, 

12 3 5.49688,5.26045,9.01173,4.75008,4.47521. 

13 4 4. 18718,6*3. 812/ 

14 DATA IFIRST/0/ 

19 IF(ZT.EQ.O) 60 TO 5 

16 IF(IFIRST.NE.O) 00 TO 5 

17 IFIRST-I 

18 DO 2 J«i .UMAX 

19 XINPUT(J)«XlNPUTtJ)/ZT 

20 RIN(J)«R1N(J)/2T 

21 2 CONTINUE 

22 5 CONTINUE 

23 DO 10 J-l.JMAX 

24 IF(XIN.NE.XINPUT(J) ) GOTO 10 

25 JFIND-J 

26 GO TO 20 

27 10 CONTINUE 

28 60 TO 990 

29 20 CONTINUE 

30 RWOUT-RIN(JFINO) 

31 RETURN 

32 990 WRITE(6,999) 

33 999 FORMAT (2X,36H***ERR0R IN RWOUT FUNCTION ROUTINE**) 

34 STOP 

35 END 
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NOZLIC - SCALE 


1 

•DECK 

SCALE 

2 


SUBROUTINE SCALE 

3 

•CALL COMl 

H 


DIMENSION RU3I 

5 


EQUIVALENCE (XMAX.Rd 

6 


DATA IFlRST/0/ 

7 


IOP-2 

6 


IF(NOPT.EQ.I) IOP-13 

g 


DO 10 L*1 .LMAX 

10 


DO 10 K»1 ,KHAX 

11 


Q(L,6,K)-Q(L,6,K)/ZT 

12 


Q(L.7,K)«Q(L.7,K)/ZT 

1? 


Q(f.,8,K)-Q(L.8,K)/ZT 

m 

10 

CONTINUE 



IFIRST-lFIRST+l 

ip 


IF(IFIRST.NE.JNHAX) 

17 


ZTT-ZT 

18 


00 20 1-1. lOP 

19 


R(I)»R(I)/ZTT 

20 

20 

CONTINUE 

21 

30 

CONTINUE 

22 


RETURN 

23 


END 
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NOZLIC - SIDWIC 

1 *OECK SIDWIC 

2 SUBROUTINE SIDWIC 

3 C 

H C SIDE WALL INITIAL CONDITIONS 

5 *CALL COMl 

6 KE»(KMAX+n/e 

7 00 70 1 . UMAX 

8 CALL LKPGAS(J,2) 

9 DO 65 L»I ,LMAX 

10 U0«Q(L.2,KE)/Q(L. 1 .KE) 

11 DO 65 K-KE.KMAX 

12 UK«UOMFLOAT(KMAX-K)/FLOAT(KMAX-KE)) 

13 IF (TW.GT.O) GO TO 55 

IH TL«TC(J)»( 1 .♦ (GAMMA- 1 . ) /2. »EMC( J) ••2* ( 1 . - (UK/UC ( JM **2) ) 

15 GO TO 60 

16 55 TL«TW+(UK/UC(JMM-TW+TC(J)M1 . + (GAMMA-1.)/2.»EMC(J)»*2*( I .-UK/ 

17 1 UC(J)))) 

18 60 CONTINUE 

19 RHOL«PC(J)/TL 

20 EL«PC(J)/(GAMMA*(GAMMA-1 . ) )+RH0L»UK*UK/2. 

21 Q(L. 1 .K)-RHOL 

22 Q(L,2,K)»RHOL*UK 

23 Q(L,3,K)>0. 

24 Q(L.4,K)-0. 

25 Q(L.5,K)»EL 

26 65 CONTINUE 

27 CALL LKPGAStJ.n 

28 70 CONTINUE 

29 RETURN 

30 END 
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NOZUC - STRCH 

1 *OECK STRCH 

2 SUBROUTINE STRCH( J,K,L.2FAC) 

3 »CALL COMl 

H DATA iriRST/0/ 

5 IF( IFIRST.NE.Ol 00 TO 5 

6 IFIRST-l 

7 IFN«0 

0 IF(FN.NE.O.» IFN-l 

9 5 KL*(L-n*KMAX+K 

10 IF(IFN.NC.O) CO TO 12 

11 XXX«Q(L,6.K) 

12 IFILU.NE.p .AND. L.6T.LH) Cp TO 11 

1 3 FN-OEL 1 ( XXX ) /RHFUNC (XXX ) 

14 GO TO 12 

15 1 I FN«OE|_OUT(XXX)/ (RHAX(XXX)-RHOUT(XXXn 

16 12 {F(LH.GT.O) 00 TO 14 

17 LE-(LMAX+n/2 

18 ZETA-FUOAT(U- 11 /FLOAT (LMAX-n 

19 ZETAE«FL0AT(LE“1 )/FLOAT(LMAX-l ) 

20 00 TO 30 

21 14 IF(L.GT.LH) GO TO 20 

22 LE«(LH>1 1/2 

23 ZETA»FLOAT(L-n/FLOAT(|-W-l) 

24 ZETAE-FL0AT<LE-1 1/FL0AT(LW“1 ) 

25 00 TQ 30 

26 20 LE-(LHAX-LW+1 1/2+LW+l 

27 ZETA* 1 . -FLOAT ( L-LW- 1 1 /FLOAT (l^HAX-LW- 1 ) 

28 ZETAE-FLOAT (LE-LW-l) /FLOAT (LMAX-LM- 1 ) 

29 30 ZFAC- ( FN+ 1 . 1 • ( FN** (ZETA/ ( 1 . -ZETAE 1 1 - 1 . 1 / (FN* • ( 1 . / ( 1 . -ZETAE ) ) 

30 IF(NOPT.LT.l) 00 TO ^9 

31 ZFAC-ZFAC/(FN41 .1 

32 IF(L.GT.LW.ANO.LW.OT.O) ZFAC-I .-ZFAC 

33 99 RETURN 

34 END 
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NOZLIC - TRPOL0 

1 *DECK TRP0L8 

2 SUBROUTINE TRP0L8( XX, X,Y, I, YY) 

3 DIMENSION X( 1 ) ,A(H) ,Y(1 ) 

H IF(I.EQ.l) GO TO 100 

5 CALL LAGRAN(XX.X(I-| ) ,A) 

6 YY«A( n*Y( I~n+A(2)*Y( I)+A(3)*Y( I ) +A (4 ) »Y( I +2) 

7 RETURN 

8 100 YY«Y(n + (Y(2)-Y(m*(XX-X(n)/(X(2)-XU)) 

9 RETURN 

1 0 END 
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1 

•DECK 

NOZLIC - X)^M 

XXM 

a 


SUBROUTINE XXM(L ,U,Kt .KS) 

3 

•CALL 

COMl 

H 

C 


5 

C XI 

METRICS FORMED FOR A K,L LI 

6 

C 


7 

c 


8 

C SYMMETRY 

g 

C 


10 


DO 10 K»K1 ,KS 

n 


CALL 0KMET(J,K.L.XK»YK.2K) 

IS 


CALL OLMET(J.K,L,XL.YL.ZU 

13 


XX(K. 1 1 » YK»ZL-ZK»YL 

IH 


XXIK.SI « ZK*XL-XK*ZL 

15 


XX(K,3) » XK*YL~YKfXL 

16 

10 

CONTINUE 

17 


RETURN 

18 


END 
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N02LIC - XYZXI 

J 

*DECK 

XYZXI 

2 


SUBRQUTINE XYZX I (KMAX , UMAX .UMAX) 

3 


COMMON /Cl/ 0(32,16,32) 

4 


0X2«.5 

5 


DO 100 K»l ,KMAX 

6 


CALL LJPGAS(K,2) 

7 


00 70 L*1 ,LMAX 

8 


00 70 J«1,JMAX 

9 


JP» J+ 1 

10 


JR-J-1 

11 

C 

XI DERIVATIVES OF X.Y.Z 

12 


IF(J.EQ.l) GO TO 50 

13 


IF(J.EQ.JMAX) GO TO 51 

14 


Q(L,13,J) - (Q(L,6,JP)-Q(L,6, JR) )*0X2 

15 


Q(L,14,J) « (Q(L,7, JP)-Q(L,7, JR) )*DX2 

16 


Q(L.I5,J) » (Q(L,8,JP)-Q(L,8,JR))*DX2 

17 


GQ TO 70 

18 

50 

J1 » J+1 

19 


Q(L.13,J)» Q(L,6, J1 )-Q(L,6,J) 

20 


Q(L.I4,J)- Q(L,7,J1 )-Q(L,7, J) 

21 


Q(L,15.J)» Q(L,8,J1 )-Q(L,8. J) 

22 


GO TO 7Q 

23 

51 

J1 « J-I 

24 


Q(L.13,J)- 0(U,6.J)*-Q(U.6,J1) 

25 


Q(L,14,J)« Q(L,7,J)-Q(L.7.J1) 

26 


Q(L,15,J)« Q(L,8, J)-Q(U,8.J1 ) 

27 

70 

CONTINUE 

28 


CALL LJPGAS(K, 1 ) 

29 

100 

CONTINUE 

30 


RETURN 

31 


END 
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NOZLIC - YSTRCH 
1 *DECK YSTRCH 

a SUBROUTINE YSTRCH (YKRE AD) 

3 C ROUTINE TO EXPONENTIALLY STRETQH THE Y GRID FROM Y(KREADY+I) TO Y 
H C 

5 »CALL COMI 

6 FD(W)»((W-l.)*EXP(W)+l.)/(W»W) 

7 F(W)»(EXP(W)-I . )/W-l ./BETA 

8 OELE-l./(KMAX-KREAOY) 

9 LM-LMAX-l 

10 0ELZ«Q(LMAX,8. n-*Q(LM,8« 1 ) 

1 1 BETA«0ELZ/ ( (YMAX-YKREAO) *DELE) 
la C 

13 C NEWTON ITERATION FOR Y STRETCHING COEFFICIENT 

m wi»eo. 

15 N«0 

16 10 Wa«Wl-F(Wl )/FO(Wl ) 

17 N«N+l 

18 ERR«ABS( (wa-wi )/wa) 

19 IF (ERR.LT. I .£-5) GO TO 30 

30 WISAVE-Wl 

31 W1-W3 

S3 IF (N.LT.SO) GO TO 10 

33 C 

SH C FAILURE TO CONVERGE 

3^ C 

36 WRITE ( 6 . 1 5 ) W 1 SAVE . W3 . ERR . N . YMAX , YKRE AO . DELE , DEL? . BETA 

37 15 F0RMATI81H»»»*FAILURE TO C0NVE;RGE IN NEWTON ITERATION FOR Y STRETC 

30 IHING COEFFICIENT OMEGA*** /SX ,3HW1 -E 10 . 3 ,HH W3-E10.3.5H ERR-, 

39 3 E10.3.3H N-I3./3X,6H YHAX? E10.3,8H YKREAO-E 1 0 . 3 , 

30 3 ^H DELE- E10.3. 6H OELZ-E 1 0 . 3.6H BETAfE 1 0 . 3) 

31 GO TO 

33 30 CONTINUE 

33 OMEGA-Wa 

3«+ OMElNV-1 ./( I .-EXP(-OMEGAJ) 

35 KRl-KREADY+1 

36 DO 30 K-KRI ,KMAX 

37 ETAK-FLOAT ( K-KREADY ) /FLOAT ( KMAX-KREADY ) 

38 EXPOET- ( 1 . “EXP ( -OMEGA*ETAK ) ) *OME INV 

39 D035L-I.LHAX 

HO Q(L , 7 ,K ) -YKREAD+ I YMAX- YKREAQ ) »EXP0ET 

m 35 CONTINUE 
43 30 CONTINUE 

43 35 CONTINUE 

44 RETURN 

45 C*** ERROR STOP 

46 40 STOP 

47 END 




NOZLIC - 

COMDECKS FOR DMGASP 

N02LIC - 

DMGASP 

NOZLIC - 

lOMCIO 

NOZLIC - 

lOMFAP 

NOZLIC - 

lOHFIP 

NOZLIC - 

lOMPFM, 

NOZLIC ♦ 

lOMPRT 


SEE APPENDIX A - N0ZL3D PROGRAM LISTING - PAGES 9^-l^l 
FOR LISTINGS OF ABOVE INPUT-OUTPUT MANAGER ROUTINES 


PAGE 36 



APPramix c 


LISTING OP THE RORIIX) PROGRAM 



otDCD'JOicJi-Twru 


RGRIDD - ARCLEN 
1 'DECK ARCLEN 

SUBROUTINE ARCLENIXMIN.XMAX.A.B.XN. IMAX.S) 
DX=(XMAX-XMIN)/IMAX 
S=0.0 
X=XMlN-qX 
DO 500 !=1 ,2100 
XS=X 
X-X+OX 

inX.GT.XMAX) DX=XMAX-XS 
inx.GT.XMAX) X=XMAX 

1 1 YS»Y ' 

12 CALL FCT(A,0.XN,i;x,Yl 

13 lElI.EQ.n GO TO 500 

I't D=SQRTIDX»*2+(Y-YSH*2) 

15 S=S+D 

16 IF(X.GE.XMAX) RETURN 

17 500 CONTINUE 

le WR1TE(6,6001 1MAX,XN,DX,S,D,X,XS,Y,YS,XMIN,XMAX,A,B 

19 600 F0RMAT(29H STOPPED IN SUBROUTINE ARCLEN /I5.12E10.5) 

20 STOP 

21 END 
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RGRIDD - AXIS 

1 *DECK AXIS 

S SIBROUTINE AXIS(XMIN,XMAX,YMIN,YMAX,NX1NTS.NYINTS,XRN,XRX,YRN,YRX) 

3 C 

4 C THIS SUBROUTINE IS ONE OF THOSE THAT PLOTS GRIDS 

5 C ON THE SC40p0 PLOTTER. 

6 C 

7 C THIS SUBROUTINE DRAWS THE X. AND Y AXES, MARKS OFF THE 

8 C intervals, sets the SCALE VALUES, AND MOVES THE FILM TO A NEW 

9 C FRAME , 

10 C . 

11 C XMIN IS THE MINIMUM VALUE OF THE X (HORIZONTAL! VARIABLE, 

IP C XMAX IS THE MAXIMUM VALUE OF THE X VARIABLE. , 

13 C YMIN IS THE MINIMUM VALUE OF THE Y (VERTICAL) VARIABLE. 

14 C YMAX IS THE MAXIMUM VALUE OF THE Y VARIABLE. 

15 C NXINTS IS THE NI,JMBER OF INTERVALS INTO FHICH THE X AXIS IS TO . 

16 C . BE DIVIDED. 

17 C NYINTS IS THE NUMBER OF INTERVALS INTO WHICH THE Y AXIS IS TO 

18 C BE DIVIDED. 

19 C 

P(3 C DO INITIALIZATION 

PI CALL SMALLV 

a? CALL FRAMEV(3) 

P3 NX=NX1NTS 

P4 NY=NYINTS 

P5 C IF NX OR NY .LE. 0 MAKE THEM EQUAL TO I 

P6 IF (NX .LE. 0) NXtI 

P7 IF (NY .LE. 0) NY=1 

P8 C SET UP VALUES TO BE USED FOR MARGINS 

P9 ML=1P3 

30 MR=9P3 

31 MB=1P3 

3P MT=9P3 

33 C DRAW X AXIS 

34 CALL LINEV(ML,MB,MR,MB1 , 

35 C DRAW Y AXIS 

36 CALL LINEV(ML,MB,ML,MT) 

37 C DETERMINE INCREMENTS FOR TIC MARKS 

38 OX=(XMAX-XMIN)/NX 

39 DY=(YMAX-YMIN1/NY 

40 C SCALE X AND Y VALUES 

41 CALL XSCALV(XMIN,XMAX,ML,tOO) 

4E CALL YSCALV(YM1N,YMAX,MB,10Q) 

43 C DRAW TIC MARKS ON THE X AXIS 

44 DX=(XRX-XRN)/NX 

45 CALL LINRV( 1 ,MB-P0,MB-5,MB+5, XMIN. XMAX, DX, 0,-1 ,3,8) 

46 C CALL L1NEV(NXV(S1NG) ,NYV(0.0)-P0,NXV(SING) ,NYV(0.On 

47 C DRAW TIC MARKS ON Y AXIS 

48 DY=(YRX-YRN)/NY 

49 CALL LINRV(P,ML- 90,ML-5,ML+5,YRN,YRX,OY,O,-l ,3, 10) 

50 RETURN 

51 END 
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RGRIDD - BORYS 
1 'PECK BORYS 

S SUBROUTINE BORYSIJMIN, UMAX, KMIN.KMAX.XMIN.XMAX.YMIN.YMAX.XN, 0X1 , 

3 1 OYl.OSI.A.e.X.Y.IB.Ol.DB.WL.WR.WB.WT.WOER.WOET) 

^ OIMENSION Xm0,‘t0t,Y(40,‘*0).WLm,WRm,WB(n,WTm,WO£R(l), 

5 1 WOETin.lBUO) 

6 EPSLON=.OQ1 

7 J1=JMIN»1 

a KI=KM1N+1 

9 KMAXMt-KMAX-1 

10 JMAXM1=JMAX-1 

11 C LEET SIOE OE RECTANGULAR GRIP — IB(5 QR 6) 

la 1B1=5 

13 lE(KMIN.GT.I) IBI=6 

14 lEUBdBll.EQ.n CALL WCALClX.Y.WL . 1 . 1 ,KI .KMAXMl ) 

15 IFlIBdBl^.EQ.ll GO TO 300 

16 Xd,KMlN)=0.Q 

17 Yd ,KMINI=YM1N 

le Xd ,KMAX)=^0.0 

19 Yd ,KMAXI=YMAX 

20 EY=EPSIL(YMAX-YMIN,0.0,OY1,KMAX-KM1N+1, 0.001, 100. 1.1) 

21 lElKMlN.GT. 1) GO TO 230 

22 WLK'=(KMAX-KMlN-l)'ALOGd.O+EY)/(KMAX-KMlNl 

23 DO 200 KK=K1,KMAXM1 

24 K’^KMAXMl-KKt-Kl 

25 Xd ,K)=Xd ,K+1 ) 

26 Yd,K)=Yd,Ktll-DYl»d.OtEY)««(KMAXMl-K) 

27 WL(K)=WLK 
2B 200 CONTINUE 

29 GO TO 300 

30 230 DO 240 K=1 ,KMIN 

31 240 WL(K)=0.0 

32 EYK=1 ,0/d .O+EYl-l .0 

33 WLK=(KMAX-KM1N-1 )*ALOGd .OtEYK)/(KMAX-KMIN) 

34 DO 250 K=K1,KMAXM1 

35 Xd ,K)=Xd ,K1 ) 

36 Yd,K)=Yd,K-l)+DYl«d.OtEY)«*(K-Kl) 

37 WL(K)=WLK 

38 250 CONTINUE 

39 300 lFdBd).NE.4) GO TO 350 

40 C BOTTOM, RIGHT SIDE AND TOP OE RECTANGULAR GRID BY ELLIPSE TEST CASE 

41 C 

42 CALL ELIPSEIXMAX.YMAX.X.Y.JMAX.KMAX.IB.OXI .WR.WB.WT.A.B.XN.EPSLON) 

43 GO TO 700 

44 C BOTTOM OF RECTANGULAR GRID — IBd OR 2) 

45 350 IBI = 1 

46 IFIJMIN.GT. 1 1 IBI=2 

47 lFdBdBH.EQ.il CALL WCALClX.Y.WB.Jl.JMAXMl. 1,1) 

48 IFdBdBll.EQ.U GO TO 480 . 

49 E=EPS1L(XMAX-XMIN,0.0,DX1, UMAX- JMlN+1, 0.001, 100, 1,1) 

50 XIJMAX, 1 )=XMAX 

51 YIJMAX, 11=0.0 

52 XIJMIN, 1 1=XMIN 

53 YIJMIN, 11=0.0 

54 IFIJMIN.GT. 1 1 GO TO 430 

55 WBJ=tJMAX-JMIN-IdALOGd.O+E)/(JMAX-JMIN) 

56 DO 400 JJ=J1,JMAXMI 

57 J=JMAXM1-JJ»J1 

58 X(J,l)=X(Jtl,t)-DXl«d.OtE)«*(JMAXMl-J) 

59 YIJ, 1 )=YIJ+1 , 1 1 

60 WB(J)=WBJ 

61 400 CONTINUE 

62 GO TO 480 

63 430 DO 440 J=l ,JMIN 

64 440 WB(J)=0.Q 

65 EJ=1 .0/ d .0+EI-l .0 

66 WBJ= ( JMAX-JMIN- 1 1 *ALOG( 1 . 0*EJ) / (JMAX-JMIN) 

67 00 450 J=J1,JMAXMI 

68 X(J,ll=X(J-l.ll<-OXl<d.OtE)*dJ-Jll 

69 Y(J,1)=Y(J-1,1) 

70 WB(J1=WBJ 

71 450 CONTINUE 

72 C TOP AND RIGHT SIDE OF SUPER ELLIPSE — 18(78.8 OR 9&10) 

73 480 JMX=JMAX 

74 IFIJMIN.GT. 1) JMX=JM1N 

75 KMX=KMAX 

76 IFIKMIN.GT. 11 KMX=KM1N 

77 1B7=7 

78 IFIKMIN.EQ. 1 1 IB7=9 

79 1B8=8 

80 IFIJMIN.EQ.il IB8=10 

81 1F(IB7.EQ. 7.AN0. 18(1871 .EQ. I ICALL WCALCIX.Y.WOER, JMX, JMX,2,KMX-1 1 

62 IFdB7.EQ. 9.AN0.1B(IB7I.EQ. DCALL WCALCIX.Y.MR , JMX, JMX. 2, KMX-1 1 

83 IFIIBB.EQ. 8.AND.IB(1B8).EQ.1)CALL WCALCIX, Y , WOET ,2, JMX- 1 ,KMX ,KMX) 

S') IFIIBB.EQ. 10. AND. IBIlBBI.EQ.l 'CALL WCALCIX.Y.WT ,2, JMX-I .KMX.KMX) 

85 IFdBdB7) .EQ. 1 .AND. 1B(IB8) .EQ. 1 1 GO TO 700 

86 CALL SLOPEIA.B.XN.XD.YDl 
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87 

88 

89 

90 

91 
9? 
93 
9>t 

95 

96 

97 

98 

99 

100 
101 
108 
103 
lOH 

105 

106 

107 

108 

109 

110 
111 
113 
113 
lit 

115 

1 16 
117 
II? 
119 
ISO 
131 
133 
133 
13t 

135 

136 

137 

138 

139 

130 

131 
133 
133 
13t 

135 

136 

137 

138 

139 

I to 

Itl 

Its 


RGRIDD - BDRYS 

CALL ARCLENIO.O.XD, A, 8, XN.513.su 
CALL ARCLEN(0.0.YD.B,A.XN.51S,S3) 

E1»EPSIL(S1 .0.O.DSl. JMX. 0.001 .100.1. 1 1 
E3=-EPSIL(SS.0.0.DS1, KMX. 0.001. 100. 1.1) 

WTJ= ( JMX-3 ) ‘ ALOG (I . 0+E 1 ) / ( JMX- 1 . 0 ) 

WRK= ( KMX-S ) • ALCiG ( 1 . 0+E3 ) / ( KMX- 1 . 0 ) 
DX=DS1*(1.0+E1)**(JMX-S) 

1F(1B(1B8).EQ.U GO TO 550 
X1=0,0 

00 500 J=3,JMX 

DS=DS1M1.0+E1)‘*'(JMX-J1 

CALL XOFS(OS.Xl.DX.A.B.XN.EPSLON) 

XtJ.KMX)=Xl 

CALL FCT(A.B,XN.1.XI.Y(J.KMX)1 
WT(JI=WTJ 

IF(JMlN.GT.l) WOET(J)=WTJ 
500 CONTINUE 

550 1F(IB(1B7) .EQ.l) GO TO 700 
Y1=0.0 
DY=DX 

DO 600 K=3.KMX 

DS=DS1M1 .0+E3)*MKMX-K) ' 

CALL XOFSCDS.Yl.DY.B.A.XN.EPSLONl 
CALL FCt(A.B.XN,S.XUMX.K).Yl) 

Y(JMX,K)=Y1 

WR(K1=WRK 

IF(KMlN.GT.l) WOER(K)=WRK 
600 CONTINUE 

700 IFIUMIN.GT. 1 ) GO TO 800 
D1=Y(1,3)-Y(I,1I 
D3=Y(UMAX,3)-Y(JMAX. 1 ) 

CALL WCALCIX.Y.WR.UMAX.UMAX.S.KMAXMI) 

CALL WCALClX.Y.WL, 1 . 1 .3.KMAXM1 1 
CALL WCALCIX.Y.WT.S.JMAXMI .KMAX.KMAX) 

CALL WCALC(X.Y.WB.3,JMAXMl.l.n 
RETURN 

C RIGHT OUTER BOUNDARY — IB(3) 

800 IF(IB(3).EQ.1) call WCALCCX.Y.WR, UMAX. JMAX.S.KMAXMl ) , 
IF(IB(3i.EQ.S) CALL ROBtX.Y.WR. JMIN, JMAX.KMIN.KMAX.YMAX) 
IF(TB(3) .GT.O) GO TO 1000 . 

DY-YMAX/KMAXMl 
DO 900 K=2,KMAX 
XtJMAX,K)-X(JMAX,K-I ) 

Y(JMAX.K)=Y(JMAX.K-1 )+OY 
900 WR(K)»0.0 

C TOP OUTER BOUNDARY — TB(t) 

1000 IF(IB(t).EQ.n CALL WCALCtX.Y.WT.S.JMAXMl.KMAX.KMAX) 
IFdB(t) .EQ.3) CALL TOBIX.Y.WT. JMIN. JMAX.KMIN.KMAX) 
IFdB(t). GT.O) RETURN 
DX=XMAX/JMAXM1 
DO 1100 J=3,JMAX 
X(J.KMAX)=X(J-1 .KMAXl+DX 
Y(J.KMAX)=YU-1 .KMAX) 
dOO ltT(J)“0.0 
RETURN 
END 


PAGE t 



RGRIDD - ELIPSE . - 

1 ‘DECK ELIPSE 

a SUBROUTINE EL1PSE(XMAX,YMAX.X,Y,JMAX,KMAX,:1B,DX1 ,WR,WB.WT,A,B,XN. 

3 I EPSLONl 

t COMMON /PLOTC/ SING . 

5 C THIS SUBROUTINE SETS UP BOTTOM AND TOP OF ELLIPSE TEST CASE 
B C that is IB(1),IB(9), IB(10) 

7 DIMENSION X(‘t0,‘>0).Y(‘*Q, 401,181 n.WRin.WBM ).WT( I) 

b sing=sqrt(xmax<*xn-ymax*«xn) 

9 KMAXMI=KMAX-I 


10 


JMAXM1=JMAX-1 

II 


X(JMAX.1)=S1NG 

la 


YIJMAX, 11=0.0 

13 


X( 1 , 11=0.0 

14 


Yd, 11=0.0 .! 

15 


X(JMAX,KMAX1=XMAX 

16 


YUMAX,KMAX1=0.0 

17 


DX=DX1 

18 


E=EPSIL(XMAX-SING,0.0.DX,KMAX,0.00l, 100, 1, 11 

19 


WRK= (KMAX-81 *ALOG( 1 . 0+E) /KMAXMl 

ao 

c 

NEXT 3 STATEMENTS CAUSE EQUAL SPACING 

ai 

c 

E=0.0 

aa 

c 

DX= (XMAX-S INGl /KMAXMl 

83 

c 

WRK=0 .0 

84 


DO 100 KK=e, KMAXMl 

85 


K=KMAXMl-KK+8 

86 


X ( UMAX , K 1 =X ( UMAX , Kt 1 1 -DX« (1 . 0+E 1 • • (KMAXMl -K1 

P7 


YIJMAX, K1=0.0 

aa 


WR(K1=WRK 

89 


100 CONTINUE 

30 


CALL SLOPE(A,B,XN,XD,YD) 

31 


CALL ARCLEN(0.0,XD,A,B,XN, 518,311 

38 


CALL ARCLEN(0.0,YD,B,A,XN,518,Sai 

33 


DS1 = .5+(S1+S81/JMAXM1 

34 


E=EPSlL(SltSe,0.0,DSl,JMAX,0.001,100,l ,11 

35 


NT J= ( UMAX- JJ- 1 1 • ALOG ( 1 . 0+E 1 / ( JMAX- JJ 1 

36 


0X=DS1 

37 


X1=0,0 

38 

c 

NEXT 3 STATEMENTS CAUSE EQUAL SPACING 

39 

c 

E=0.Q 

40 

c 

DS1=8.0«DS1 

41 

c 

, WTJ=0.0 

48 


DO 300 J=8,JMAXM1 

43 


DS=DSI*(I .0+El<*(JMAX-JI 

44 


CALL X0FS(DS,X1 ,DX, A, B.XN, EPSLONl 

45 


IF(X1 .GT.XOl GO TO 400 

46 


X(J,KMAXI=X1 

47 


CALL FCT(A,B,XN, 1 ,X1 ,Y(J,KMAX1 1 

48 


WT(J1=WTJ 

49 


300 CONTINUE 

50 


RETURN 0 

51 


400 JJ=J 

58 


Yl=0,0 

53 


DY=DS1 

54 


JMJ=JMAX-JJ 

55 


DO 500 JMM=1 ,JMJ 

56 


J=JMAX-JMM 

57 


DS=DS| + (1 .0+El««(JMAXMl-Jl 

58 


CALL XOFS(DS,YI ,DY,B, A, XN, EPSLONl 

59 


Y(J,KMAX1=Y1 

60 


CALL FCT(A,B,XN,8,X(J,KMAXI ,Y1 1 

61 


WT(J1=WTJ 

68 


500 CONTINUE 

63 


DXX=X ( 8 , KMAX 1 -X ( 1 , KMAXl 

64 


E=EPSIL (SING, 0.0,OXX, UMAX. 0.001 ,100,1,11 

65 


WB J= ( JMAX-8 1 • ALOG ( 1 . 0+E 1 / JMAXM 1 

66 

c 

NEXT 3 STATEMENTS CAUSE EQUAL SPACING 

67 

c 

E=0.0 

68 

c 

DXX=SING/JMAXM1 

69 

c 

WBJ=0,0 

70 


DO 600 J=a,JMAXMI 

71 


X( J, 1 1=X(J-1 , 1 l+DXX+II .0+E)‘MJ-8l 

78 


Y(J, 11=0.0 

73 


WB(J1=WBJ 

74 


600 CONTINUE 

75 


RETURN 

76 


END 
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RGRIDD - EPSIL 
1 ‘DECK EPSIL 

£ FUNCTION EPSILtEMX.FMlN.DTM.NPT.FPCC. ICC. key. NCALL) 

3 C THIS SUBROUTINE APPUES A NEWTON-RAPHSON ROOT-FINDING 

Y C TECHNIQUE TO FIW A VALUE OF EPSILON FOR A PARTICULAR USE 

5 C OF THE EXPONENTIAL STRECHING TRANSFORMATION. 

6 DIMENSION R(‘tOI 

7 FMXL=FMX 

8 FMINL=FMIN 

9 OFMLsDFM 

10 FPCCL=FPCC 

11 ICCL»ICC 

12 GO TO (1.2). KEY 

13 I FNPTMa=NPT-2 

lY IFCNCALL.EQ. I) EPS=‘(FMXL/OFML)** ( 1 .0/FNPTM2) tl . 0 

15 DO 3 NIT^I.ICCL 

16 EPl=EPStl.O 

17 EPlTN=EPl**FNPTMa 

18 REPS= 1.0/EPS 

19 DFMOE=DFML*REPS 

20 f*fmxl-fminl-dfmoe«(Epttn*epi-i.O) 

21 IFIABS(F) .LT.FPCCL) GO TO Y 

22 DFM0E2=DFM0E*REPS 

23 FPN=DFM0E2«(1.0+EP1TN*(EPS«FNPTM2-1.QI) 

2Y EPS=EPS+F/FPN 

25 3 CONTINUE 

26 GO TO 5 

27 2 NPTM=NPT-1 

28 IFCNCALL.EQ. 1 ) 

29 1 EPS=((FMXL/DFML)*M1.0/(NPT-2I)-I.0)«SQRT(FL0AT(NPTM)) 

30 D0 6L=1,NPTM 

31 6 R(U = I .0/SQRT(FLOAT(L)) 

32 DO 7 N1T=-I , ICCL 

33 SUMl^O.O 

3Y SUM2=0.0 

35 D08L=1.NPTM 

36 FLM2=L-2 

37 FACT1=1 .0+EPS«R(L) 

39 FACT2=FACT1‘«FLM2 

39 SUMl=SUMl+FACT2*FACTt 

YO 8 SUM2=SUM2+(L-1 )*FACT2«R(L) 

Y1 F=FMXL-FMINL-DFML«SUM1 

Y2 IF(ABSCF) .LT.FPCCL) GO TO Y 

Y3 FPN=DFML*SUM2 , 

YH EPS=EPS+F/FPN 

Y5 7 CONTINUE 

Y6 5 EPSIL-EPS 

Y7 WRITE(6,I00) 

Y8 RETURN 

Y9 Y EPSIL=EPS 

50 WRITE(S.lOl) EPSIL. F. NIT 

51 RETURN 

52 100 F0RMAT(/Y2H EXCEEDED MAX. NO. OF ITERATIONS IN EPSIL.) 

53 iOT F0RMAT(/7H EPSIL=.F12.5.5X.7H AND F=.F12.5.5X.7H AFTER .13, 

5Y • 12H ITERATIONS.) 

55 END 
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BGRIDD - FCT 

1 •DECK FCT 

e SUBROUTINE FCT(A,B,XN, IW.X.Y) 

3 IF(lW.EQ.l) Y=BM1.0-(X/AI««XN)*M1.0/XN) 

1F(1W.EQ.2) X=AM1 ,0-(Y/B)»«XN)**(l .0/XN) 

5 RETURN 

6 END 
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RGRIOD - FILLN 
1 •DECK FILLN 

£ SUBROUTINE FILLNUMAX.JOMAX.KMAX.KOMAX.WB.WT.WOET.X, INI 

3 DIMENSION X('tO,‘*OI ,A(tO) ,C(H01 ,D(M) ,F(40) ,WB(tO) .WTttO) , 

i* 1 WOETOtO) 

5 JMM= JOMAX- 1 

6 KMM=KOMAX- 1 

7 DO 500 K=a,KMM 

8 Jl=£ 

9 IF<(KOMAX.Gr.KMAX.AND.K.LE.KMAX*l).Ofl.IW.LT.O) Jl-JMAX+B 

10 DO 100 J=J1,JMM 

It W<2=.5*(NB(JI»(K-1)*(WT(J)-WB(J)I/KMMI 

te IFtJOMAX.GT. JMAX.ANO.J.LE. JMAXtl I «<£■=. 5* (WOET(J) + (K-KMAX-1 ) • 

13 1 (WT(J)-WOET(J)l/(KMM-KMAxn 

l>» A(J) = ( 1 .0-LK2) 

15 B(Jl=-£.0 

16 C(J1 = (1 .0H*:£) 

17 FU1=0.0 

10 100 CONTINUE 

19 F(Jll = -AUn«X(Jl-l ,K) 

20 IF(lABS(iW).EQ.2l FUl )=-A(JI) ‘XCK. Jl-I ) 

21 F( JMM)=-C(JMM)*X(JOMAX.K) 

22 IF(IW,EQi2) F(JMMI=-CUMM)*X(K.JOMAX) 

23 CALL TRIB(A,B,C,D,F,J1,JMM) 

2^ IF(IABS(1W).EQ.2) GO Tp 300 

25 DO 200 J=J1 ,JMM 

26 200 X(J,K1=F(JI 

27 GO TO 500 

28 300 DO 400 J=JI ,JMM 

29 400 X(K,JI=FU> 

30 500 CONTINUE 

31 RETURN 

32 END 


PAGE 9 



RGRIDD - INPUT 
1 ‘DECK INPUT 

a SUBROUTINE INPUT(X,Y,UMAX,KMAX, JOMAX.KOMAX.MAXIT.NCASE.XN.XNO, 

3 I IPIN,XMAX,X0MIN,X0MAX,YMAX,Y0MIN,Y0MAX,DXT,DX01,DYI,DY0I,0SI ,DSOI , 

4 a OMEGA.TB.IBLOUP.IWRITE.IPRINT.XVAL.ITITLE.ISTOP) 

5 C THE CARTESIAN COORDINATES OE THE NOZL3D CODE! ARE X.Y, AND Z. 

6 C X IS ORIENTED IN THE GENERAL STREAMWISE DIRECTION. IN THIS CODE- 

7 C RGRIDD- X AND Y ARE THE EQUIVALENT OF THE Y AND Z CARTESIAN COORDINATES 

8 C IN THE NOZL3D CODE. ' ^ 

9 C JMAX.KMAX ARE » OF POINTS IN X,Y DIRECTION OF INTERIOR NOZZLE GRID 

10 C JOMIN,JOMAX,KOMIN,KOMAX ARE INDEX LIMITS OF OUTER GRID 

11 C MAXI T=MAX NUMBER OF ITERATIONS IN RELAX 

12 C NCASE=1 (2) MEANS CALCULATE GRID FOR INSIDEIAND OUTSIDE) OF NOZZLE 

13 C XNIXNO) IS THE SUPER ELLIPSE NUMBER FOR THE INSIOE(OUTSIOE) ^ 

IT C SURFACE OF THE NOZZLE WALL 

15 C IPIN»0(1) DO NOT (DO) PLOT INITIAL CONDITIONS 

16 C XMAX,YMAX= SEMIAXES A,B OF SUPER ELLIPSE FOR NOZZLE INTERIOR WALL 

17 C X0MIN,Y0M1N= SEMI AXES A,B OF SUPER ELLIPSE FOR NOZZLE PMTER WALL 

18 C XOMAX(YOMAX)iX(Y) COORDINATE OF OUTSIDE LIMITS OF GRIP ALONG X(Y) AXIS 

19 C XVAL= LOCATION OF THE N0ZL3O X COORDINATE (FOR OUTPUT PURPOSES ONLY) 

20 C XVAL REPRESENTS THE NOZL3D STREAMWISE X STATION at WHICH THE 

21 C CROSS sectional GRID IS GENERATED 

22 C DXl (DYl )=DX(DY1 OF GRID NEAREST INNER NOZZLE WALL 

23 C DX01(DY01)=DX(DY) OF GRID NEAREST OUTER NOZZLE WALL 

pit C DSl (DSOT) "DELTA ARC LENGTH AT CORNER FOR INSIDE(OUTSIDE) SUPER ELLIPSE 

25 C 0MEGA=0VER-RELAXAT10N FACTOR 

26 C 1B(I)"0(11(2T DONT(OO) READ IN THE GRID POINTS ON THE ITHBOUNDRY 

27 C (DISTRIBUTE RTS ON IB(3) & IBI't) TO CONFORM TO THE 

28 C DISTRIBUTION ON IB(6,7) & 16(2,8)1 

29 C 1B(1) = 7 MEANS DO ELLIPSE TEST CASE 

30 C 

31 C IB(7) 

32 C 

33 C YOMAX 

37 C 1 1 

35 C 1 1 

36 C 1 1 

37 C 1 1 

38 C 1 1 

39 C 1 1 

70 C IB(6) 1 1 

71 C 1 1 

72 C 1 1 

73 C 1 1 

77 C 1 1 

75 C 1 1 

76 C 1 1 


77 C 1 IB(B) 1 

78 C YOMIN 1 I IB(3) 

79 C YMAX 1 1 1 

50 C 1 IB(TO) 11 1 

51 C 1 11 1 

52 C 1 11 1 

53 C 1 11 1 

57 C 1 11 1 

55 C 1 11 I 

56 C 1B(51 1 IB(9) 11 IB(7) | 


57 C 1 11 1 

58 C 1 11 1 

59 C 1 11 1 

60 C 1 11 1 

61 C 1 11 1 

62 C I 11 1 

63 C I 11 1 

67 C - - 

65 C 0 XMAX XOMIN XOMAX 

66 C 

67 C IB(1) IB(2) 

68 C 

69 C IBLOUP=0(N) PLOT A BLOW-UP OF N LINES AROUND THE NOZZLE CORNER 

70 C IWRITE=0(11 MEANS DONT(DO) WRITE OUT GRID ON UNIT 2 

71 C 1PRINT=0( 11 MEANS DONT(DO) PRINT OUT GRID 

72 C ITITLE=T1TLE 

73 C 1STOP=0(I) MEANS READIDONT READ) ANOTHER CASE 

77 DIMENSION I T I TLE ( 1 3 1 , X (70 ,70 ) , Y (70 ,70) , IBM 0 1 

75 READ(5,100) ITITLE 

76 100 FORMAT! 13A6) 

77 WRITE(6,I01) ITITLE 

78 101 FORMAT! IHl , I3AS1 

79 READ (5, 200) UMAX , KMAX , JOMAX , KOMAX , MAX I T , NCASE , 1 P I N , I BLOUP , 

80 I (WRITE, IPRINT, (STOP 

81 200 FORMAT! 1615) 

82 WRITE(6,20n JMAX,KMAX, JOMAX, KOMAX, MAX IT, NCASE, I PIN, I BLOUP, 

83 1 (WRITE, IPRINT, ISTOP 

87 201 FORMAT!// 92H UMAX KMAX JOMAX KOMAX MAXI T NCASE 

85 1 IPIN IBLOUP (WRITE IPRINT (STOP /16I8) 

86 READ!5,300) XMAX, XOMIN, XOMAX, YMAX, YOMIN, YOMAX, XVAL 
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B7 

88; 

89 

90' 

91 

98 

93 

9t* 

95 

96 

97 

98 

99 

too 

101 

108 

103 

10>* 

105 

106 

107 

108 
109; 

no 
nr 
118 
1 13 
n't 

115 

116 
1 17 
118 
119 


RGRIDD - INRUT 
300 rdRMAr(8FlO,51 . 

WRITE(6,3dl I XMAX,XOMlN,)<OMAX,VMAX.YOMlNiYOMAX,XVAL 
30r FbRMAT(//5X,>tHXMAX, 1 1X;,5HX0HIN. rOX.SHXOMAX. 10X,**HYMAX 
r , 1 1'X , 5HY0M 1 N , 1 OX . SHYOMAX .11 X , 9HXVAL , / 8E 1 5 . 8 1 
READ(5,300I DXl ,0X01 .OYl'.DYOl ,I?SI ,0601 .OMEGA 
WRITE(6, 308) 0X1 .OXOr.OYl.OYOl ,051 ,0601 .OMEGA 
308 FORMAT ( / / 6X , 3H0X 1 1 SX , itHOXO 1 , 1 1 X , 3H0Y 1 , 1 8X , HHDYOl ,T 1 X , 3H0S 1 , 1 8X , 
1 'tHOSO 1 , 1 8X , 5H0MEGA / 8ET 5 . 8 1 
READ(5 v300) XN.XNO 
WR1TE('6,303) XN.XNO 
303 FORMATTV /6X , 8HXN, 1 3X , 3HXN0/8E 1 S . 8) 

REAO(5;,800) IB 
WR1TE(6,W0) 18 
900 F0RMAT'(//3H 18.10151 
JPr=JMAX+l 
, KR1=KMAX+1 

IFdBlTT .EO. ll REA0(5,3001 (XU, D ,Y( J, 1 ) , J=1 , JMAX) 

1F( 18(81 ,EQ. 1 ) REAO(5,300). (XU, 1 1 .YfJ, 1 1 ,Js:JPI .JOMAX) 

1F(TB13) .EQ. 1 1 REA0(5,300) (XUOMAX.K) , YUOMAX.K) ,K=1 .KOMAX) 
IF(1B(9) .EQ. 1 1 READ(5,300) (XU.KOMAX) , YU.KOMAX) , J=1 .JOMAX) 

1F( 1B(5) .EQ. 1 1 REAO(5,300) (X(T ,K) ,Y( 1 ,K) ,K»1 .KMAX) 

1F (TB(6) .EQ-. 1) READ(5,30I5) (X( 1 ,K) ,Y( F.Kl ,K=KP1 .KOMAX) 

IF(TB(7) .EQ. 1 1 READ(5,3001 (XUPl ,K) ,YUP1 .K) .K^l ,KPI 1 
1F(1B(B) .EQ. I) READ(5.300l (XU.KPl 1 .YU.KPl 1 , J=1 , JPl 1 ' 

1F( 1B(91 .EQ. 1 1 REA0(5,3001 (X( JMAX.K) .YUMAX.K) ,K=1 .KMAX) 

IF( |B( 10) .EQ'. 1 )READ(5,3b0r (XU.KMaX) .YU.KMAX) , J=1 , JMAX) 

IFINCASE.EQ.B) RETgBN 

JOMAX=JMAX 

KOMAX-KMAX 

XOMAX-XMAX 

Y0MAX=YMAX 

RETURN 

ENO, 
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RGRIDD - MAIN 

1 ‘DECK MAIN 

2 PROGRAM MAlNdNPUT, OUTPUT, TAPE5=INPUT,TAPE6=0UTPUT, TAPE?) 

3 DIMENSION X!‘*0,‘t0) ,Y('tO,‘TOI ,WL(40) .WRCtO) .WBCrOI .WTl'tOt .WOUifO) , 

t 1 WOR(‘tO),WOB(40),WOT(M),WOER('tO),WOET(‘tO),IBnO),ITITLE(I3) 

5 10 CALL INPUT(X,Y,JMAX,KMAX,JOMAX,KOMAX,MAXIT,NCASE,XN,XNO, IPIN.XMAX, 

6 1X0MIN,X0MAX,YMAX,Y0MIN,Y0MAX,DX1 ,DX01 ,DY1 ,DY01 ,DSI ,DSOI , OMEGA, IB, 

7 2 IBL0UP,IWRITE,IPRINT,XVAL,1TTTLE,IST0PI 

8 ISW»1 

9 CALL BORYS(l,JMAX,l,kMAX,Q.0,XMAX,0.0,YMAX,XN,DXl,DYl,DSl,XMAX 

10 I ,YMAX,X,Y,IB,DI,D2,WL,WR,WB,WT,W0ER,W0ET) 

11 IF(NCASE.EQ.2) CALL B0RYS(JMAX+1 , J0MAX,KMAX+1 ,KOMAX,XOMlN,XpMAX, 

12 1Y0M1N,Y0MAX,XN0,DX01 ,DY01 ,DS01 ,X0MIN,Y0MIN,X,Y, IB,D1 .Dg.WOL.WOR, 

13 2 ' , W0B,W0T,N0ER,N0ET) 

It C CALL FILL INCASE, UMAX, JOMAX,KMAX,KOMAX,X,Y) 

15 CALL FILLN (JMAX,JMAX,KMAX,KMAX,WB,WT,W0ET,X, 1 ) 

16 CALL FILLN (KMAX,KMAX,JMAX,JMAX,WL,WR,W0ER,Y,2) 

n IFINCASE.EQ.P) CALL FILLN! UMAX, JOMAX,KMAX, KOMAX,WOB, WOT, WOET,X 

IB 1 ,1) 

19 IFINCASE.EQ.P) CALL FILLN(KMAX,kOMAX,JMAX,JOMAX,WOL,WOR, 

20 1 W0ER,Y,2) 

21 ITITLEI5)=6HIN1T1A 

22 1TITLE(6)=6HL CONO 

23 lTlTLE(7)=6HiriONS 

2t IF! IPIN.EQ. 1 ) CALI. PLAWT(JOMAX,KOMAX.X,Y,XOMAX,O.0,YOMAX,0.0 

25 1 , XNO . DY 1 , DX 1 . DYO 1 , 0X0 1 , DS 1 , I T 1 TLE , UMAX , KMAX , XN , JOMAX , KOMAX ) 

26 CALL RELAX I UMAX , KMAX , UMAX , KMAX , X , Y . OMEGA , MAX I T , WB , WT , WL , WR , WOER , 

1 WOETl 

28 C CALL RELAXSUMAX, KMAX, X,Y, OMEGA, MAXIT,WL,WR,WB,WTI 

29 IT‘f=t*MAXIT 

30 IF(ISW.EQ.-l) IT4=MAXIT 

31 1F(NCASE.EQ.21 CALL RELAX(JMAX,KMAX,JOMAX,KOMAX,X,Y,OMEGA, (Tt, 

32 1 WOB, WOT, WOL,WOR, WOER, WOE T) 

33 1TITLE(5)=6H FINAL 

3t ITITLE(6)=6H GRID 

35 ITITLE(7)=6H 

36 CALL PLAWT(JOMAX,KOMAX,X,Y,XOMAX,0. ,Y0MAX,0, 

37 1 ,XN0,DY1 ,DX1 ,DYOT,DXOi;DSl, I TITLE, JMAX,KMAX,XN,JOMAX, KOMAX) 

38 IFdWRlTE.EQ. 1) WRITE(2)XVAL, dXIJ,K) ,Y(J,K) ,J=1 , JOMAX) ,K=1 , KOMAX) 

39 IFCIPRINT.EQ. I ) CALL OUTPUT(X,Y, JOMAX, KOMAX, XVAL) 

to C IFINCASE.EQ.P) GO TO 100 

tl C CALL CLUSTRIJMAX,X,Y,D1 ,DP,KMAX) 

t2 C ITITLE(5)=6HEXP0NE 

t3 C ITITLEI6)=6HNTIALL 

tt C ITITLEI7)=6HY CLUS 

tS C ITITLEIB)=6HTERRED 

t6 C ITITLE(9)=6H GRID 

t7 C CALL PLAWT(JOMAX,KOMAX,X,Y,XOMAX,0.0,YOMAX,0.O 

tB C 1 , XNO, DY1,DX1,DY01,DX01,DS1,ITITLE,JMAX, KMAX, XN, JOMAX, KOMAX) 

t9 C 100 CONTINUE 

50 IFIIBLOUP.GT.OICALL PLOTBUI JOMAX, KOMAX, X,Y, XNO, XN,DY1 ,DX1,DY01 ,0X01 

51 1 ,0SI,ITITLE,JMAX,KMAX,IBL0UP1 

52 IFdSTOP.EQ.O) GO TO 10 

53 CALL EOFTV ' 

5t STOP 

55 END 
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RGRIDO - OUTER 

1 ‘DECK OUTER 

2 SUBROUT I NE OUTER ( XMAX , XM 1 N , YMAX , YM 1 N . XORG , ETAC , BETA , UMAX , KMAX , X , Y ) 

3 C 

If C THIS SUBROUTINE PLACES POINTS ON BOTTOM-FRONT- TOP BOUNDARY IN 

5 C ANGULAR FASHION. 

6 C 

7 DIMENSION XIW, 40) .Ymo, 40) 

6 Q 

9 .LOGICAL CLUSTR 

10 C' ” 

11 ■ DATA. -PI/ 3. 141592654/ 

12 C 

13 SINHIX)=0.5*(EXPIX)-EXP(-X)) 

14 C 

15 ETARU=ATAN2(YMAX,XMAX-X0RG) 

16 ETARL=ATAN2(-YMIN,XMAX-X0RG) 

17 DETA=(2.0«PI-(ETARU+ETARL))/UMAX-I) 

18 CLUSTR = .FALSE. 

19 IF( BETA. GT. 0.0) CLUSTR = .TRUE. 

20 IFI.NOT. CLUSTR) GO TO 14 

21 FACT=PI/(2.0*PI-(ETARUtETARL) ) 

22 FACTR= I. 0/FACT 

23 ETACT=(ETAC-ETARU)*FACT 

24 B=0.5*ALOG((I .t(EXP(BETA)-l. )*ETACT/PI )/(I .t(EXP(-BETA)-l . )‘ 

25 1 ETACT/PD) 

26 -RSB = l./SINHIB) 

27 14 ETA=ETARU 

28 ANGI=ATAN2(YMAX,XMIN-XORG) 

29 ANG2=ATAN2(YMIN.XMIN-XORG)■^2.0*PI 

30 NSIDE = I 

31 C 

32 ETARUD=ETARU*1B0,/PI 

33 ETARLD=ETARLM80./PI 

34 ANGID=ANGIMBO./PI 

35 ANG2D=ANG2*I80./PI 

36 WRITE (6, 109) CLUSTR,ETARUD,ETARL0,ANG1D,ANG2D 

37 I F ( CLUSTR . AND . ETAC . LT . ETARU. OR . CLUSTR. AND . ETAC . GT . (2 . 0*P I -ETARL ) ) 

38 I GO TO 22 

39 C 

40 DO 9 UJ=2,JMAX 

41 J=JMAX+1-JJ 

42 ETA = ETA + DETA 

43 IF ( .NOT. CLUSTR) GO TO 26 

44 ETAT»(ETA-ETARU)«FACT 

45 PHIT=ETACT»(SINH(BETA»ETAT/PI-B)*RSBtl.) 

46 PHI=ETARU+PHIT«FACTR 

47 GO TO 27 

48 26 PHI=ETA 

49 C 

50 27 GO TO (1 ,2.3) .NSlDE 

51 T IF(PHI.GT.ANGl) NSIOE=2 

52 GO TO 3 

53 2 IFIPHl .GT.ANG2) NSIDE=3 

54 C 

55 3 GO TO (10, 11, 12), NSIDE 

56 10 Y(J,KMAX) = YMAX 

57 XU, KMAX) == YMAX/TAN(PHI ) + XORG 

58 GO TO 21 

59 11 XU, KMAX) = XMIN 

60 Y(U,KMAX) = ( XMIN - XORG) «TAN(PHI I 

61 GO TO 21 

62 12 X(U,KMAX)=XORGtYMIN/TAN(PHI ) 

63 Y(U,KMAX)=YMIN 

64 21 CONTINUE 

65 C 

66 ETAD=ETAM80./PI 

67 PHIO=PHIMBO./PI 

68 WRITE(6,113) J, KMAX, XU, KMAX) ,J, KMAX, Y(U, KMAX) ,ETAO,PHID, NSIDE 

69 9 CONTINUE 

70 C 

71 RETURN 

72 C 

73 22 WR1TE(6,M4) 

74 STOP 

75 C 

76 109 F0RMAT(/8H CLUSTR= ,L 1 ,5X,6HETARU* ,F8. 2,5X ,6HETARL= ,FB. 2,5X , 

77 1 5HANG 1=,F8. 2, 5X,5HANG2=,F8. 2/ /24H OUTER BOUNDARY ON TOP, , 

78 2 18HFR0NT, AND BOTTOMS,) 

79 113 F0RMATC3H X( , 13, IH, , I3,2H)= ,F12.5,5X,2HY( , 13, IH. , I3,2H)=,F12.5, 

80 1 5X,4HETA=,F8.2,5X,4HPHI = ,FB.2,5X,6HNSIDE=, 1 1 ) 

81 114 FORMAT (/23H ERROR EXIT, BAD ETAC.) 

82 C 

83 END 
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RGRIDD - OUTPUT 
I ‘DECK OUTPUT 

SUBROUTINE OUTPUTfX. Y. JMAX.KMAX.XVAL) 
DIMENSION X(HO.HO) .Y{40,'+b) 

WRITE(6. too) XVAL 

100 rORMAT( IHl .5X.3HX 0 i 5// /5X ,7HY ARRAY/) 

IF(JHAX.LE.PO) GO TO 400 
WRI TE(6.?00) ( (X(J,K) , J*1 .UMAX) .K«l ,KMAX) 
eOO FORMAT(POF6.3/3X,eOF6.3) 

WRlTr(6,3001 

300 F0RMAT(///5X,7HZ ARRAY) 

1 1 WRI rE(6.aOO)v ( (Y(J.K) ,J»1.,JMAX) ,K=1 .KMAX) 

1? RETURN 

13 400 WR1TE(6,500) ( (XU, K) ,J«1 .UMAX) .K».l , KMAX) 

14 500 FORMATIPOF6.3) 

15 WRITE(6.300) 

16 WRITE (6. 500) ( (Y(J.K) ,J*l ,JMAX) ,K*I .KMAX) 

17 RETURN 

1 0 END 


PAGE 13 


RGRIDD - PLAWT 
I 'DECK PLAWT 

e SUBROUTINE PLAWT(N,M,X.Y, XMAX.XMIN.YMAX.YMIN.XNN.OYT, 0X1, 

3 1 DY0I,DX01,DS1,ITITLE,JMAX,KHAX.XNI.J0MAX,K0MAX) 

c 

5 C THIS SUBROUTINE IS ONE OF THE SUBROUTINES THAT PLOTS GRIDS 

6 C ON THE SCHOEO PLOTTER. 

7 C ' ■ ■ 

B COMMON/PLOTC/SING 

9 DIMENSION XIHO.'tOI.YP+O, '♦01. XX(H0),YY(t01,TIT( 151, ITITLE(I3) -- 

10 C 

11 C READJUST PLOT LIMITS SO AS TO AVIOD A STRECHEO PLOT. 

IE IW=I T 

13 IF(JOMAX.GT. JMAX.AND.KOMAX.EQ.KMAXl IW=0 

!>♦ XD1F=XMAX-XMIN 

15 YDIF=YMAX-YMIN 

16 mXDIF.LT.YDIF I GO TO 4 

17 XDIFH=X0IF<Q.5 

18 YMIO^IYMAX*YMIN)"0.5 

19 YMX-YMlDtXDIFH 

20 YMN=YM1D-X0IFH 

21 XMX^XMAX 

22 XMN^XMIN 

23 GO TO 5 

Elf ^ YDIFH=YDIF"0.5 

25 XMID>(XMAX+XMIN)0Q.5 

26 XMX=XMID+YDIFH 

27 XMN=XMID-YDIFH 

28 YMX=YMAX 

29 YMN=YMIN 

30 5 CONTINUE 

?I C 

3? C PLOT THE LINES. 

33 CALL AXIS(XMN,XMX.YMN.YMX,0,O,XMIN,XMAX,YMIN,YMAX) 

3'+ CALL TITLE! ITITLE, 78) 

35 ENC0DEI63. IQ.TIT) M.N.XNN.Oyi ,DXI ,DS1 

36 10 F0RMAT(5HKMAX=. 12,6H UMAX-, lEtiFH XN=,F5. I ,5H DYI=,F8.7,5H DXt* 

37 I .F8.7.5H DSI=,F8.7) 

38 CALL PRINTVI63,TIT,80,9501 

39 IF(M.EQ.KMAX) GO TO 30 

ilO ENCODE!27.20,Tm KMAX, JMAX.XNI 

'll 20 F0RMAT(6HKIMAX=, I2.7H JIMAX«, I2.5H XNI«,F5. 1 1 

'♦2 CALL PRINTVC27, TIT, 150,925) 

'♦3 30 D01J=I,M 

'♦'♦ MAX=JMAX 

“♦S IFIJ.GT.KMAX.OR. IW.EQ.O) MAX»N 

>♦6 1- CALL PLOT(X(l,J), Yd, J),N,0, MAXI 

1+7 D02I = I,N 

•♦8 D03J=1,M 

‘♦9 XX(J)=XII,JI 

50 3 YY(J)=Y( I , J) 

51 MAX=KMAX 

52 IF(I.GT.JMAX) MAX=M 

53 2 CALL PLOT(XX,YY,M,0,MAX) 

S') IF(SING.LE.O.O) RETURN 

55 IXI = IXV(X(JMAX, 1 ) ) 

56 IYl=IYV(Y(JMAX, 1 ) ) 

57 CALL LINEV(IXI,IY|-15,IX1,IYI) 

58 CALL LINEV(IXI,1Y1-15,IXI,IYI) 

59 RETURN 

60 END 
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RGRIDD - PLOT 

1 ‘DECK PLOT 

SUBROUT I NE PLOT ( X .Y , NBR , NSYM , MAX ) 

C' ■ ' 

C THIS SUBROUTINE IS ONE OF THOSE THAT PLOTS GRIDS 

C ON THE SC^OEO PLOTTER. 

C 

DIMENSION X(l), YU). MARKPT(S) 

DATA MARKPT /42, 16, 55,30, 

C SYMBOLS ARE, IN ORDERS. . + X 0 • 

IF (NSYM .GT. 0 .AND. NSYM .LE. 5) GO TO 1 00 
J=IABS(NBRI-I 
DO no 1 = 1, J 
IFI I .EQ.MAX) GO TO I 10 

CALL LINEVI IXVIXdll, lYVIYdl), lXV(Xd + 1 1) , lYVIYdt.I II ) 
110 CONTINUE 
RETURN 

100 CALL APLOTV(NBR,X,Y, I , 1 , I ,MARKPT(NSYM) ] 

RETURN 
END 
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RGRIDD - PLOTBU 

1 ‘DECK PLOTBU 

2 SUBROUTINE PLOTBUt JOMAX.KOMAK.X.Y.XNO.XN.DYI .0X1 ,DV01 ,DX01 ,DS1 , 

3 1 ITITLE.JMAX.KMAX, IBLOUPI 

DIMENSION X('tO,>tO).Y(‘♦0,^OI.ITITLEIl) > 

5 IF(JMAX.EQ.JOMAX) GO TO 100 

6 IBH=lBL0UP/2 

7 J1»JMAX-IBH*1 

8 J2=JMAX*IBH 

9 Kl»KMAX-IBHtl 

10 K2=KMAXMBH 

11 MAXJ-IBH , . 

12 MAXK-IBH i- 

13 GO TO 200 

m too JI«MAX0(JMAX-2MBH*1 ,1 I 

15 J2-JMAX ■ . 

16 Kl=MAXa(KMAX-a*IBH*l,l) 

17 K2=KMAX 

le MAXJ=JMAX 

19 MAXK=KMAX 

20 200 JJ=-0 

21 XMIN=1.0E36 

22 YMIN=I.0E36 

23 XMAX=-1.0E36 

2*t YMAX— 1.0E36 

25 DO 300 J=J1,J2 

26 JJ=JJ+1 

27 KK=0 

28 DO 300 K=K1,K2 

29 KK=KK+1 

30 X(JJ,KK)=X(J,K) 

31 Y(JJ,KKI=YfJ,K) 

32 XM1N=AM1NI (XMIN,X(JJ,KK1) 

33 XMAX=AMAX1(XMAX,X(JJ,KKU 

3t YMIN=AMINl(YMIN,Y(jJ,KK)l 

35 YMAX=AMAXI (YMAX.YUJ.KKll 

36 300 CONTINUE 

37 ITITLE(5)=6HBLOWUP 

38 IT1TLE(6)=6H OF MO 

39 ITITLE(7)=6HST CON 

“♦O ITITLE(S)=6HGESTED 

41 ITITLE(9)=6H AREA 

42 CALL PLAWT(JJ,KK,X,Y,XMAX,XMIN.YMAX,YMIN,XN0,DY1 ,0X1 , 

43 I DYOl.DXOliDSl.ITITLE.MAXJ.MAXK.XN.JOMAX.KOMAX) 

44 RETURN 

45 END 
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RGRIDD - RELAX 
I *OECK RELAX 

E SUBROUT I NE RELAX ( UMAX , KMAX , JOMAX , KOMAX , X , Y , OMEGA . MAX I T . WB . WT , WL . WR 

31 . ,WOER,WOET) 

If C THIS SUBROUTINE SOLVES BY SLOP THE DIFFERENTIAL EQUATIONS BASED 

5 C ON A MODIFIED THOMPSON-THAMES-MAST IN S METHOD OF GENERATING GRIDS. 

6 C THE MODIFICATION EMPLOYS SPECIALIZED SOURCE TERMS INVOLVING FREE 

7 C PARAMETERS WP AND WQ THAT ARE COMPUTED FROM THE BOUNDARY VALM^S. 

8 DIMENSION X(H0 . U ,W0( I ) . WT( )) . WL (1 ) ,WR( 1 ) ,WOER( I ) ,WOET( 1) , Y(H0 , II 

9 DIMENSION A(H0) ,B(40l ,C(40) ,D(‘+0I ,F(40) .GIHOJ 

10 IW«1 '' 

11 IFIJOMAX.GT. UMAX, AND, KOMAX. EQ. KMAX) IW*0 . ' 

la KMM«KOMAX“I 

13 JMM«JOMAX-t 

IH ICOUNT*0 

15 a I COUNT* I COUNT + 1 

16 RSUM*0. 

17 RXSUM=0.0 . ' : 

18 RYSUM=0.0 

19 DO 1 K=2.KMM 

ao ji=a 

ai !F( (KOMAX. GT. KMAX. AND. K.LE.KMAX+i ) .OR. IW.EQ.O) Jl=JMAX+a 

aa 003J=J1,JMM 

as xxo=(X(j+i ,K)-x(j-r.Kn«o.5 

84 XED*(X(J,K+l)-X(J,K-m«0.5 

as YXD=(Y(J+1 ,K) -Y(J-l ,K) )»0.5 

as YED*(Y(J.K+1)-Y(J,K-1 ) )*0.5 

a7 AD=XED*‘a+YED**a 

as BD=XXD«XED+YXD*YED ■ 

89 GD=XXD**a*-YXD«*a 

30 XXED=(X(J^-l,K+l)-X(J+l,K-l)-X(J-l,K+l)+X(J-l.K-m*0.a5 

31 YXED=(Y(J+r.K+l)'Y(J+l,K-n-Y(J-l.K+l)+Y(J-l.K-m«0.a5 

3S BD=-a.0*BD 

33 WQ*.5MWL(K) + (J-1 .0)MWR(K)-WL(K))/JMM) 

34 WP=.5*(WB( J) + (K-1 .0)MWT(J)-WB(jn/KMM) 

35 IFtJOMAX.EQ. UMAX. OR. IW.EQ.O) GO TO 80 

36 IF(J.LE. JMAX+1 )WP=.5* (WOET( J) + (K-KMAX-l ) • (WT( J)-WOET( J) ) / (KMM-KMAX 

37 I ) ) 

38 1F(K.LE.KMAX+1 )WQ*.5MW0ER(K)+(J-JMAX-1 )«(WR(K)-WOER(K) )/fJMM~JMAX 

39 1 )) 

40 aO A(J)*AOM 1 .0-WP) 

41 B(J)*-AD-AD-GD-GD 

48 C(J)=ADM 1 .0+WP) 

43 F(J)=-BD*XXED-GDM{1.0+WQ)*X(J,K+I)-M1.0-WQ)*X(J.K-I)) 

44 3 G(J)*-BD«YXED-GDM(l.0+WQ)*y(J.K+l) + {1.0-WQ)*Y(J.K'in 

45 F(Jl )=F(J1 )-A(Jl )*X(J1-1 ,K) 

46 GUI )=G(J1 )-A(Jim(Jl-l ,K) 

47 F ( JMM ) =F ( JMM ) -C ( JMM ) * X ( JOMAX . K ) 

48 G ( JMM ) =G ( JMM ) -C ( JMM ) * Y f JOMAX , K ) 

49 CALL TRIBCA.B.C.D.F.Jl ,JMM) 

50 CALL TRIBCA.B.C.D.G. Jl , JMM) 

51 D04J=J1,JMM 

58 XC=OMEGA«(F(J)-X(J,K)) 

53 YC=OMEGAMG(J) -Y(J,K) ) 

54 RSUM=RSUM+ABS(XC)+ABS(YC) 

55 RXSUM=RXSUM+ABS ( XC ) 

56 RYSUM=RYSUM+ABS(YC) 

57 X(J,K)=X(J,K)+XC 

58 4 Y(J,K)«Y(J,K)+YC 

59 1 CONTINUE 

60 WRITE(6. 100)RSUM.RXSUM.RYSUM, ICOUNT 

61 IF(ICOUNT.LT.MAXIT) GO TO 8 

6a RETURN 

63 100 FORMATCaSH SUM OF RESIDUALS (X+Y),X.Y = ,3FS0.10. 

64 1 7H AFTER ,I5.ieH ITERATIONS.) 

65 END 
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RGRIDD - ROB 

1 •DECK ROB 

£ SUBROUTINE ROBIX.Y.WT, JMIN, JMAX.KMIN.KMAX.YMAX) 

3 DIMENSION XIM, 40) .YfilO. 40) 

4 YM-.5«(Y(I,KMINi-I)+Y(JMIN.KMIN)) 

5 DYMB=YUMIN.KMIN)-Y(JMIN,KMIN-I ) 

6 DYMT=Yn,KMINtl)-Ytl,KMIN) 

7 0YM=.5*(DYMB+DYMT) 

8 Y(JMAX,KMIN)=YM 

9 X(JMAX,KMIN)^X(JMAX,D . 

10 YUMAX.KMIN- I )=YM-DYM 

11 XUMAX.KMIN-I )=X(JMAX, 1 ) 

IB YIJMAX.KMINtl )=YMtDYM 

13 X(JMAX,KMlNtl)=X(JMAX, 1 ) 

14 YUMAX,KMAX)=YMAX 

15 X(JMAX,KMAX)=X( UMAX, 1 ) 

16 DYM=1.1*DYM 

17 E=EPS1L(YIJMAX,KMAX)-YI J14AX,KMINtl ) .0. ,DYM,KMAX-KMIN, .001,100.1,1) 

10 Kl=KM|Nti? 

19 KMAXMI=KMAX- ! 

BO DO 100 K=K| .KMAXMl 

B1 X( JMAX.KI'XIJMAX. I ) 

BB 100 Y(JMAX.K1=Y(JMAX,K-1 1 tDYMM I .OtE) ‘'(K-Kl ) 

B3 E=EPSIL(YI.JMAX.KM1N-I )-YtJMAX. 1 ) , 0 . 0 ,DYM,KM|N- 1 , . 001 , 1 00 , 1 , 1 ) 

B4 KP=KM1N-E 

B5 DO BOO KK^B.KB 

B6 K=KB-KK+2 

B7 X(JMAX,K)=X( UMAX, 1 ) 

BB BOO Y(JMAX,K)=YIJMAX,Ktll-DYM*n.OtE)**(KB-K) 

B9 CALL WCALClX.Y, NR, UMAX, UMAX, B, KMAXMl j 

30 RETURN 

31 END 
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RGRIOD - SLOPE 
1 *DECK SLOPE 

SUBROUTINE SLOPE(A,B.XN.Xa,Ya) 

JS^IOOO 
OX»A/(JS-l .0) 

X1=0.0 
Y1=B 

DO 100 j*a,js 
xa=(j-n«Dx 

CALL FCT(A.B,XN,l,xa,Ya) 

s=(Ya-Yn/(xa-xi) 

11 1F(S.LT.-1 .0) RETURN 

la xi=xa 

13 YI=Ya 

14 100 CONTINUE 

15 1^1TE(6,200) 

16 aOO FORMAT (5X,a7HST0PPED IN SUBROUTINE SLOPE ) 

n STOP 

16 END 
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RGRIDD - TITLE 
1 ‘DECK TITLE 

B SUBROUTINE TITLE! ITITLE.NCHARS) 

3 C 

C THIS SUBROUTINE IS ONE OF THOSE THAT PLOTS GRIDS 

5 C ON the SCtOaO PLOTTER. 

6 C 

7 C THE MAXIMUM NUMBER OF CHARACTERS ALLOWED IN THE TITLE 1$ 108, 

8 C 

9 ICHARS-IABS(NCHARS) 

10 IF (ICHARS .GT. IDS) ICHARS=I08 

11 IF ( ICHARS .GT. 51*) IX=I>t 

IB IF (ICHARS .LE. ST) IX=5I0- ( ICHARS/5) • 18 

13 1Y=990 

I*) CALL RITEBVUX.IY, 1010, 90,1, ICHARS, l.lTITLE.NLASTl 

15 RETURN 

16 END 
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RGRIDD - TOB 

1 ‘DECK TOB 

2 SUBROUTINE TOB(X,Y,WT, JMIN, JMAX.KMIN.KMAX) 

3 DIMENSION XlifO, HO) .Yl'tO.W) 

H XM=.5*IX(JMIN+I,l)tX(JMlN,KMlN)) 

5 0XMB=X(JM1N,KMIN)-X(JMIN-I ,KMIN) 

6 DXMT=XUMIN+I,I)-X(JMIN,1) 

1 OXM=.5«(OXMB+DXMT) 

B XUMIN.KMAX)=XM 

9 Y(JMIN,KMAX)*Y(I ,KMAX) 

10 X(JM1N-1.KMAX)=XM-DXM 

11 Y{JMIN-:I.KMAX)«Y(1,KMAX) 

IS XUMIN+I .KMAX)=XM+DXM 

13 Y(JMIN+1.KMAX)=Y(1,KMAX) 

IH DXM=1.1*DXM 

15 E=EPSlUX(JMAX,KMAX)-X(JMINtl ,KMAX) ,0. ,DXM, JMAX-JMIN, ,001,100, 1 ,I ) 

16 J1»JM1N+S 

17 JMAXM1=JMAX-1 

18 .00 100 J=J1,JMAXM1 

19 X(J,KMAX)=X(J-1 ,KMAX)+DXM'(1 ,0+E)**(J-Jl I 

50 1,00 Y(J,KMAX)=Y( 1 ,KMAX) 

51 E=EPSIL(X(JMIN-1 ,KMAX)-X( 1 ,KMAX) ,0.0,DXM,JM1N-1 , ,001 , 100, 1 , 1) 

SS JS=JMIN-S 

S3 DO SOO JJ=S,JS 

SH J=JS-JJ<-S 

55 X(J,KMAX)=X(J+l,KMAX)-DXM<(1.0+E)**(JS-Jl 

56 SOO Y( J,KMAX)=Y(1 ,KMAX) 

57 - CALL WCALC t X , Y , WT , S , UMAX- 1 , KMAX , KMAX ) 

SB RETURN 

S9 END 
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RGRIDD - TRIB 

1 *DECK TRIB 

2 subroutine: TRIB(A.B,C,X,F,NL.NU) 

3 OlfCNSION A(2) ,B(2) ,C(2) .X(B) .Ff8) 

4 C " 

5 C THIS SUBROUTINE SOLVES A TRI-DIAGONAL SYSTEM OF LINEAR 

6 C EQUATIONS. 

7 C 

8 X(NL)=C(NL)/B(NL) 

9 F(NL)sF(NL)/B(NL) 

10 NLPl = NL +I 

11 DO I J-NLPl.NU 

I? Z=1 ./(B(J)-A(J)«X(J-m 

13 X(J)=C(J)«Z 

m 1 F( J)=(F(J)-A(J)«F(J-1) )*Z 

15 NUPNL=NU+NL 

16 DO 2 Jl^NLPl ,NU . 

17 J=NUPNL-Jl 

IB ^ F( J)=F(J)-X(J)*F(J+U 

19 RETURN 

20 END 
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RGRIDD - WCALC 
1 ’DECK WCALC 

B SUBROUTINE WCALC(X,Y,W,Jt,JE,Kl ,K?) 

3 DIMENSION X(40, 40), Ymo, 40). , Win 

4 IRJl .EQ.JE) GO TO EOO 

5 DO 100 J^Jl ,J2 

6 T=XU+1 ,K1 )-X(J-l ,K1 ) 

7 Te=Y(J+l ,K1 )-Y(J-l ,K1 ) 

8 W(J)=-E.O<(TMX(Jtl,KI) a.O'XU.KD-tXU-l.Kl))* 

9 1 TE" (YUt) ,K1 ) ■•?.0*Y(J,KI )+Y(J-l ,K1 ) ) )/(T**a+Te**E) 

10 100 CONTINUE 

1 I RETURN 

IE EOO DO 300 K--K1 ,K? 

13 T=Y(J1 ,K*1 ) -Y(JI ,K-1 ) 

14 TE=X1 J1 ,K»1 )-X(Jl ,K-1 ) 

15 W(K)=-E.0MT«(Y( Jl ,K+1 )-E.0«Y(Jl ,K)+Y(J1 ,K-1 ) )♦, 

16 I TE< IX(J) ,K+I )-E.0«XUl ,K) tX( J1 ,K-I ) 1 )/ (T**S*TE**E) 

17 300 CONTINUE 

16 RETURN 

19 END 
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RGRIDD - XOFS 

1 ‘DECK XOFS 

2 SUBROUTINE XOFSIDS.Xl .OX.A.B.XN.EPSLON) 

3 IFIXl+DX.GE.AI DX=.999999*(A-X1 ) 

i* H=-.1*DX 

5 CALL ARCLENIXl ,X1+DX,A,B.XN. 16.DSOX1 

6 OXP=0.0 

7 DXM=A 

8 IF(DS-OSDX.GT.O.O) DXP^OX 

9 IF(DS-DS0X,LT,0,0) DXM=OX 

10 DO 500 I = I , 20 

11 IFtXltDX+H.CE.A' H .9MA-XI-0X) 

12 IFIOX+H.LT.O.QI H' -DX/2.0 

13 CALL ARCLENIXI .XI *OX*H,A,B,XN. IB.DSOXPHI 

1‘t D=(DSDXPH-DSDX1/H 

15 DX=DX-(OSDX-OSt/D 

16 IFIXl+OX.GE.Al DX=.999999'1A-XI) 

17 IF(DXP.EQ.O.O.OR.DXM.EQ.A) GO TO 950 

18 IFIDX.GE.DXP.OR.OX.LE.DXMI DX=(DXP*DXM)/2.0 

19 950 CALL ARCLEN(Xl,X|tOX,A,B.XN.16.0SDX) 

20 IF(ASS(OS-DSDX)/OS.LT.EPSLON) GO TO 600 

21 IF(DS-DSOX.GT.O.O) DXP=AMAX1 (DXP.DX) 

22 IFIDS •DSOX.L r.Q.Q) DXM=AMIN1 (OXM.DX) 

23 H=(OSDX-DS)/D 

29 500 CONTINUE 

25 WHITE(6,550) XI .DX.H.O.DSDX.DSOXPH.DS.DXP.DXM.A 

26 550 FORMAT (5X,26HSTOPPED IN SUBROUTINE XOFS /I0EI3.7) 

27 STOP 

28 600 X1=XU0X 

29 RETURN 

30 END 
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APPENDIX D 

COMPLETE N0ZL30 PRINTED OUTPUT FOR HIE TEST CASES 






PRINTED OUTPUT FOR TEST CASE NO. 1 


NMAX 

JMAX 

KMAX 

LNIAX 

LAMIN INVISC 

J1BC 

JMAXBC KPLANE 

K1 BC 

JK1WL 

JK1WU 

KW 

JKW 

KMAXBC 

200 

15 

5 

15 

. 1 0 

0 

1 1 

. 1 

0 : 

0 

0 

0 

2 ■ 


L1BC 

JL1WL 

JL1WU 

LW 

- JLW 

LMAXBC 

NRST 

IWRIT . 

NGRI 

NP 

KVIS 

LVIS 

KLVIS 

INFLT 

ISUTH 

NROUT 

1 

1 

15 

0 

0 

2 

0 

1 

0 

50 

1 

1 

1 

0 

0 

soo 


DT 

fsmach 

RMACH 

RE 

PR ■ 

RTDEGK 

FSP 

FST 

1 .0000000-02 

3. 0000000+00 

3.0000000+00 

1 .0000000+05 

1 .0000000+00 

3.0000000+02 

1.0000000+00 

1 .0000000+00 


GAMMA 

RMUEXP 

TW 

CNBR 

DTFAC 

RM 

SMU 

OMEGA 

1 .4000000+00 

1 . 0000000+00 

.0000000 

.0000000 

1 .1000000+00 

.0000000 

1.0000000-01 

.0000000 


DTMAX 

1 . 0000000-02 


THIS IS A RESTART FROM THE FOLLOWING INITIAL CONDITIONS 

KMAXR , JMAXR , LMAXR, ITMAXR, LMAXBR, L1BCR, FSMACR .GAMIVIAR.RER, SMUR.DTR.ALPR.CNBRR, PRR 
5 15 15 300 21 

.30000000+01 .14000000+01 .10000000+06 .50000000+00 .50000000-02 .00000000 .00000000 .10000000+01 

throat LOCATION X=0. AT JT= 1 
THROAT AREA AT= 6.66203-02 
K=1 


L 

vou 

wou 

HTOT 

ptot 

1 

.0000000 

.0000000 

2.8000000+00 

9.9999997-01 

2 

. 0000000 

3.7922165-03 

2.8000000+00 

1 .0070759+00 

3 

. 0000000 

3.7922165-03 

2.8000005+00 

1 .0465822+00 

4 

. 0000000 

6.4821022-03 

2.8000056+00 

1 . 1 871 473+00 

5 

.0000000 

T. 1 146608-02 

2.8000486+00 

1 .6938912+00 

6 

. 0000000 

1 .7710377-02 

2.8002935+00 

4. 1553235+00 

7 

. 0000000 

2.4520904-02 

2.8009583+00 

.1 . 9078504+01 

8 

.0000000 

2.7132189-02 

2.8013223+00 

3.6324695+01 

9 

.0000000 

.0000000 

2.8000000+00 

3.6732722+01 

1 0 
1 1 

.0000000 

.0000000 

2.8000000+00 

3.6732722+01 

12 

.0000000 

.0000000 

2.8000000+00 

3.6732722+01 

1 3 

. 0000000 

.0000000 

2.8000000+00 

3.6732722+01 

14 

.0000000 

.0000000 

2,8000000+00 

3.6732722+01 

15 

.0000000 

.0000000 

2.8000000+00 

3.6732722+01 



U.K.L, and max COURANT NBR 211 .6190S+02 

GF= 1.3405-02 4.9399-03 .0000 -1.5713-01 2.2832-04 

NC = 0 TIME = .0000 DT = .1000-01 


current flow at NC= 0 AS WRITTEN TO RESTART FILE 


d= 1 K= 1 L X Y Z R/RREF 

1 .010000 -.500000 .000000 .357143 

2 .010000 -.500000 .000089 .357863 

3 .010000 -.500000 .000226 .361819 

4 .010000 -.500000 .000436 .375084 

5 .010000 -.500000 .000758 .415174 

6 .010000 -.500000 .001252 .536464 

7 .010000 -.500000 .002010 .829016 

8 .010000 -.500000 .003172 .996343 

9 .010000 -.500000 .004956 1.000000 

10 .010000 -.500000 .007692 1.000000 

11 .010000 -.500000 .011890 1.000000 

12 .010000 -.500000 .018330 1.000000 

13 .010000 -.500000 .028210 1.000000 

14 .CICCOO " . !3 C C 0 00 Q/t'ioriy ^ r>Anrvr»A 

15 .010000 -.500000 .066620 1.000000 

d= 2 K= 1 L X Y Z R/RREF 

1 .080714 -.500000 .000000 .357143 

2 .080714 -.500000 .000253 .357863 

3 .080714 -.500000 .000642 .361819 

4 .080714 -.500000 .001238 .375084 

5 .080714 -.500000 .002153 .415174 

6 .080714 -.500000 .003557 .536464 

7 .080714 -.500000 .005710 .829016 

8 .080714 -.500000 .009013 .996343 

9 .080714 -.500000 .014080 1.000000 

10 .080714 -.500000 .021854 1.000000 

11 .080.714 -.500000 .033781 1.000000 

12 .080714 -.500000 .052077 1.000000 

13 .080714 -.500000 .080146 1.000000 

14 .080714 -.500000 .123208 1.000000 

15 .080714 -.500000 .189270 1.000000 

u= 3 K= i L A V Z 

1 .151429 -.500000 .000000 .357143 

2 .151429 -.500000 .000347 .357863 

3 .151429 -.5QOOOO .000879 .361819 

4 .151429 -.500000 .001696 .375084 

5 .151429 -.500000 .002949 .415174 

6 .151429 -.500000 .004872 .536464 

7 .151429 -.500000 ,007821 .829016 

8 .151-429 -.500000 .012345 .996343 

9 .151429 -.500000 .019286 1.000000 

10 .151429 -.500000 .029934 1.000000 

11 .151429 -.500000 .046270 1.000000 

12 .151429 -.500000 .071331 1.000000 

13 .151429 -.500000 .109777 1.000000 

14 .151429 -.500000 .168759 1.000000 

15 .151429 -.500000 .259245 1.000000 

X 

.222143 


d= 4 K= 1 L 
1 


Y 

500000 


Z 

000000 


R/RREF 

.357143 


CW= 5.0681+00 


U/AREF 

V/AR5F 

W/AREF 

T/TREF 

P/PREF 

ENT 

.000000 

.ooodoo 

.000000 

2.8COOOO 

1 .000000 

4.226693 

. 167855 

.000000 

.000637 

2.794365 

1 . 000000 

4.214988 

.425367 

.000000 

.001613 

2.76381 3 

1 . 000000 

4.15061 1 

.818316 

.000000 

.005304 

2 .666072 

1 .000000 

3.946677 

1 .398878 

.000000 

.01 5593 

2.408628 

1 .000000 

3.423657 

2. 163264 

.000000 

.038312 

1 .864058 

1 . 000000 

2.391349 

2.822899 

.000000 

.069220 

1 .206249 

1 .000000 

1 .300204 

2.996940 

.000000 

.081314 

1 .003670 

1 .000000 

1 .005142 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 . 000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 . 000000 

1 .OOOCOO 

o AAAAaA 

AAA AAA 

AA AAAA 

1 ArAAAfk 

1 . nnnn AO 

1 AAArAn 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.000000 

.000000 

.000000 

2.800000 

1 .000000 

4.226E93 

. 167855 

.000000 

.000224 

2.764365 

1 .000000 

4.214988 

.425367 

.000000 

.000568 

2.763813 

1.000000 

4. 15061 1 

.818316 

.000000 

.001867 

2.666072 

1 .000000 

3.946677 

1.398878 

.000000 

.005488 

2.408628 

1 .000000 

3.423657 

2.163264 

.000000 

.01 3485 

1 .864057 

1 .000000 

2.391349 

2.822899 

.000000 

.024364 

1 .206249 

1 .000000 

1 .300204 

2.996940 

.000000 

.028621 

1 .003670 

1 .000000 

1 .005142 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 . 000000 

1 .OOOCOO 


*/ 

v» A » \ c r* 

▼ /Tn 

• / i • » u. t 

r» / r»rs 1- r 

. f . , , w . 

rMT 

.000000 

.000000 

.000000 

2.800000 

1 .000000 

4.226E93 

. 167855 

.000000 

.000164 

2.794365 

1 .000000 

4.214988 

.425367 

.000000 

.000415 

2.763813 

1 .000000 

4.15061 1 

.818316 

.000000 

.001363 

2.666072 

1 . oocooo 

3.946677 

1 . 398878 

.000000 

.004007 

2-408628 

1.000000 

3.423657 

2. 163264 

.000000 

.009845 

1 .864058 

1 .000000 

2.391349 

2.822899 

.000000 

.01 7788 

1 .206249 

1.000000 

1 .300204 

2. 996940 

.000000 

. 020896 

1 .003670 

1 .000000 

1.005142 

3.000000 

.000000 

.COOOOO 

1 .COOOOO 

1 .000000 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .000000 

1-000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1.000000 

1 .000000 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1.000000 

1 .OOOCOO 

3.000000 

.000000 

•COOOOO 

1 .000000 

1 . OOOOOD 

1 .OOOCOO 

3.000000 

.000000 

-COOOOO 

1.000000 

1.000000 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .000000 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.000000 

.000000 

.000000 

2.800000 

1.000000 

4.226693 




00-'JO)tJI*>WK3-*r- OlXiCJIO-^OlDOO-^OlUt^WM-^r- Oli^WNJ-^OlOCO-qOTUI^. U1i^UM-‘OU300-JCn(JIX>UM 


.222143 

-.500000 

.000420 

.357863 

. 167855 

.000000 

. 0001 35 

2 . 784365 

1 . 000000 

4.214888 

.222143 

-.500000 

.001065 

.36181 9 

.425367 

.000000 

.000342 

2.763813 

1 .000000 

4.150611 

.222143 

-.500000 

.002054 

.375084 

.818316 

.000000 

.0011 25 

2.666072 

1 . 000000 

3.946E77 

.222143 

-.500000 

. 003572 

.415174 

1.. 398878 

.000000 

. 003308 

2.4C8628 

1 . 000000 

3.423E57 

.222143 

-.500000 

.005900 

.536464 

2. 163264 

.000000 

. 0081 29 

1 .864058 

1 . 000000 

2.391349 

.222143 

-.500000 

.009472 

.829016 

2.822899 

.000000 

.014686 

1 .2C6249 

1 ,000000 

1.300204 

.222143 

-.500000 

.014952 

.996343 

2.99694Q 

.000000 

. 01 7252 

1 . 0C3670 

1 .000000 

1 .005142 

.222143 

-.500000 

.023359 

1 .000000 

3.000000 

.000000 

.000000 

1 . OCOOOO 

1 .000000 

1 .ooocoo 

.222143 

-.500000 

.036256 

1 .000000 

3.000000 

.000000 

, .cooooo 

1 .OCOOOO 

1 .000000 

1 .ooocoo 

.222143 

-.500000 

.056041 

1 .000000 

3.000000 

.000000 

.000000 

1 .OCOOOO 

1 . 000000 

1 .ooocoo 

.222143 

-.500000 

.086395 

1 .000000 

3.000000 

.000000 

, cooooo 

1 .OCOOOO 

1 .000000 

1 .ooocoo 

.222143 

-.500000 

.132961 

1 .000000 

3.000000 

.000000 

.cooooo 

1 .000060 

1 . 000000 

1 .ooocoo 

.222143 

-.500000 

.204399 

1 .000000 

3.000000 

.000000 

.cooooo 

1 . OCOOOO 

1 . 000000 

1 .ooocoo 

.222143 

-.500000 

.313995 

1 .000000 

3.O0OOOO 

.000000 

.cooooo 

1 . OCOOOO 

1 .000000 

1 .ooocoo 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

p/pref 

ENT 

.292857 

-.500000 

. 000000 

.357143 

.000000 

.000000 

.cooooo 

2.800000 

1 . 000000 

4.226693 

.292857 

-.500000 

.000483 

.357863 

. 167855 

.000000 

.0001 13 

2.784365 

1 .000000 

4.214888 

.292857 

-.500000 

. 001223 

.36181 9 

.425367 

.000000 

.C00298 

2 . 76381 3 

1 . 000000 

4.15061 1 



^ r- 

r- t 


e\ r\ r\r\r\ 

^ n ^ 

c. r: t-- r\ 

4 t\r\r\t\r\r\ 

n n 

.292857 

-.500000 

.0041 01 

.415174 

1.398878 

.000000 

.C02881 

2 .4C8628 

1 . 000000 

3.423E57 

.292857 

-.500000 

.006775 

.536464 

2. 163264 

.000000 

.007080 

1 .864058 

1.000000 

2.391349 

.292857 

-.500000 

.010876 

.829016 

2.822899 

.000000 

.01 2791 

1 .2C6249 

1 .Oooooo 

1 .300204 

.292857 

-.500000 

.017168 

.996343 

2.996940 

.000000 

.01 5026 

1 .0C3670 

1 ,000000 

1 .005142 

.292857 

-.500000 

.026820 

1 .000000 

3. 000000 

.000000 

.COOOOO 

1 . OCOOOO 

1 .000000 

1 .OOOCOO 

.292857 

-.500000 

. 041 628 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 .000000 

1 .OOOCOO 

.292857 

-.500000 

.064346 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 .000000 

1 .OOOCOO 

.292857 

-.500000 

. 0991 97 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .OOOCOO 

.292857 

-.500000 

.152664 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .OOOCOO 

.292857 

-.500000 

.234688 

1 .000000 

3.000000 

.000000 

.cooooo 

1 . OCOOOO 

1 .oooooo 

1 .ooocoo 

.292857 

-.500000 

.360524 

1 .000000 

3.000000 

.000000 

,000000 

1 .OCOOOO 

1 .oooOoo 

1 .ooocoo 

X 

Y 

Z 

r/rref 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

p/pref 

ENT 

.363571 

-.500000 

.000000 

. 357143 

. 000000 

.000000 

.COOOOO 

2.800000 

1 . oooooo 

4.226693 

.363571 

-.500000 

.000538 

.357863 

. 167855 

.000000 

.C00106 

2.784365 

1 .oooooo 

4.214888 

.363571 

-.500000 

.001363 

.361819 

.425367 

.000000 

.C00268 

2 . 76381 3 

1 .oooooo 

4 . 1 5061 1 

.363571 

-.500000 

. 002628 

.375084 

. 81 8316 

.000000 

.C00880 

2.666072 

1 . oooooo 

3.946E77 

.363571 

-.500000 

.004570 

.415174 

1 .398878 

.000000 

.C02586 

2.4C8628 

1 . oooooo 

3 .423=57 

.363571 

-.500000 

.007549 

.536464 

2. 163264 

.000000 

.006354 

1 .864057 

1 .oooooo 

2.391349 

. 36357 1 

-.500000 

.0121 18 

. 82901 6 

2.822899 

.000000 

.Cl 1480 

1 .2CB249 

1 .oooooo 

1 .300204 

.363571 

-.500000 

.019129 

.996343 

2.996940 

.000000 

.01 3486 

1 .0C3670 

1 . oooooo 

1 .005142 

.363571 

-.500000 

. 029883 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 .oooooo 

1 .OOOCOO 

.363571 

-.500000 

.046383 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .OOOCOO 

.363571 

-.500000 

,071695 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .OOOCOO 

.363571 

-.500000 

. 1 10527 

1 .000000 

3. 000000 

,000000 

.COOOOO 

1 . OCOOOO 

1 . oooooo 

1 .OOOCOO 

,363571 

-.500000 

.170099 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .OOOCOO 

.363571 

-.500000 

.261492 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 . oooooo 

1 .ooOcoo 

.363571 

-.500000 

.401700 

1 .000000 

3.000000 

.000000 

.COOOOO 

1 .OCOOOO 

1 .oooooo 

r. ooocoo 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

p/pref 

ENT 

.434286 

-.500000 

.000000 

.357143 

.000000 

.000000 

.000000 

2 .8C0000 

1 .oooooo 

4.226693 

.434286 

-.500000 

.000588 

.357863 

. 167855 

.000000 

.C00097 

2.784365 

1 .oooooo 

4.214888 

.434286 

-.500000 

.001489 

.361819 

.425367 

.000000 

.C00245 

2 .76381 3 

1 .oooooo 

4. 1506 IT 

.434286 

-.500000 

.002873 

.375084 

.818316 

.000000 

.C00805 

2.666072 

1 .oooooo 

3.946=77 

.434286 

-.500000 

.004995 

.415174 

1 .398878 

.000000 

.002366 

2.408628 

1 .oooooo 

3.423=57 

.434286 

-.500000 

.008250 

.536464 

2. 163264 

.000000 

.C05814 

1 . 864057 

1 .oooooo 

2,391349 

.434286 

-.500000 

.013244 

.829016 

2.822899 

.000000 

.Cl 0504 

1 .2C6249 

1 .oooooo 

1 .300204 

.434286 

-.500000 

.020906 

.996343 

2.996940 

.000000 

.01 2339 

1 .003670 

1.000000 

1 .005142 



J= 8 K= 


J= 10 K= 


9 

.434286 

-.500000 

.032661 

1 .000000 

10 

.434286 

-.500000 

.050693 

1 .000000 

11 

.434286 

-.500000 

.078357 

1 .000000 

12 

.434286 

-.500000 

.120798 

1 .000000 

13 

.434286 

-.500000 

. 1 85907 

1 .000000 

14 

.434286 

-.500000 

.285793 

1 .000000 

15 

.434286 

-.500000 

.439030 

1 .000000 

L 

X 

Y 

Z 

R/RREF 

1 

.505000 

-.500000 

.000000 

.357143 

2 

.505000 

-.500000 

.000634 

.357863 

3 

.505000 

-.500000 

.001606 

.361819 

4 

.505000 

-.500000 

.003098 

.375084 

5 

.505000 

-.500000 

.005386 

.415174 

6 

.505000 

-.500000 

. 008896 

.536464 

7 

.505000 

-.500000 

.014282 

.82901 6 

8 

.505000 

-.500000 

.022544 

.996343 

9 

.505000 

-.500000 

.035219 

1 .000000 

10 

.505000 

-.500000 

.054665 

1 .000000 

11 

.505000 

-.500000 

. 084496 

1 .000000 

12 

.505000 

-.500000 

. 1 30262 

1 .000000 

13 

.505000 

-.500000 

. 200472 

1 .000000 

14 

.505000 

-.500000 

.3081 83 

1 .000000 

15 

.505000 

-.500000 

.473426 

1 .000000 

L 

X 

Y 

Z 

R/RREF 

1 

.575714 

-.500000 

.000000 

.357143 

2 

,575714 

-.500000 

.000677 

.357863 

3 

.575714 

-.500000 

.001715 

.361819 

4 

.575714 

-.500000 

.003307 

.375084 

5 

.575714 

-.500000 

.005751 

.415174 

6 

.575714 

-.500000 

.009499 

.536464 

7 

.575714 

-.500000 

.015249 

.829016 

8 

.575714 

-.500000 

,024071 

.996343 

9 

.575714 

-.500000 

. 037604 

1 .000000 

10 

.575714 

-.500000 

.053367 

1 .000000 

11 

.575714 

-.500000 

.090218 

1 .000000 

12 

.575714 

-.500000 

.139083 

1 .000000 

13 

.575714 

-.500000 

.214048 

1 .000000 

1/1 

57571 4 

- . snonoo 

. 32Q054 

1 .000000 

15 

.575714 

-.50,0000 

.505487 

1 .000000 

L 

X 

Y 

Z 

R/RREF 

1 

.646429 

-.500000 

.000000 

.357143 

2 

.646429 

- . 500000 

.000717 

.357863 

3 

.646429 

-.500000 

.001817 

.361 81 9 

4 

.646429 

-.500000 

.003505 

.375084 

5 

.646429 

-.500000 

.006094 

.415174 

6 

.646429 

-.500000 

.010065 

.536464 

7 

.646429 

-.500000 

.016159 

.829016 

8 

.646429 

-.500000 

.025506 

. 996343 

9 

.646429 

- . 500000 

.039847 

1 .000000 

10 

. 646429 

-.500000 

.061847 

1 .000000 

11 

.646429 

-.500000 

.095599 

1 .000000 

12 

.646429 

-.500000 

.147378 

1 .000000 

13 

.646429 

-.500000 

.226813 

1 .000000 

14 

. 646429 

-.500000 

.348677 

1 .000000 

15 

.646429 

-.500000 

.535633 

1 .000000 


3.000000 

.000000 

.COOGOO 

1 .oeoGoo 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.000000 

1 .oeoooo 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.COOGOO 

1 .oeoooo 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.COOGOO 

1 .oeoooo 

1 .000000 

1 .ooocoo 

3.000000 

.000000 

.COOGOO 

1 .oeoooo 

1 .000000 

1 .ooocoo 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

. 000000 

.000000 

.COOOOO 

2.800000 

1 .000000 

4 .226693 

.167855 

.000000 

.C00090 

2.7S4365 

1 .000000 

4.214988 

.425367 

,000000 

.CO 0227 

2.763813 

1 . OOOOOO 

4 . 150611 

.818316 

.000000 

.000746 

2.666072 

1 .ooeooo 

3.946677 

1 . 398878 

.000000 

. C021 94 

2 .408628 

1 .OOGOOO 

3.423657 

2. 163264 

.000000 

.005391 

1 .864057 

1 .OOOOOO 

2.391349 

2.822899 

.000000 

.C09741 

1 ,206249 

1 .OOOOOO 

1 .300204 

2.996940 

.000000 

.01 1442 

1 .003670 

1 .000000 

1 .005142 

3.000000 

.000000 

.COOOOO 

1.000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .ooeooo 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 . oeoooo 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .ooocoo 

3.000000 

.000000 

.COOOOO 

1 . oeoooo 

1 .OOOOOO 

1 .ooocoo 

3. 000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .ooocoo 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .ooocoo 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.000000 

.000000 

.COOOOO 

2.8COOOO 

1 ,000000 

4.226693 

.167855 

.000000 

.C00084 

2.7S4365 

1 .OOOOOO 

4.21 4988 

.425367 

.000000 

.C00213 

2.763813 

1 .OOOOOO 

4 .15061 1 

.818316 

.000000 

.000699 

2.666072 

1 .OOOOOO 

3.946677 

1.398878 

,000000 

.C02055 

2.4C8628 

1 .OOOOOO 

3.423657 

2. 163264 

.000000 

,005049 

1 .864058 

1.000000 

2.391349 

2.822899 

.000000 

.0091 23 

1 .2C6249 

1 .OOOOOO 

1 .300204 

2.996940 

.000000 

.01 0717 

1 .003670 

1 ,000000 

1 .005142 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1.000000 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .OOOOOO 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.onoooo 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .ooocoo 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.000000 

.000000 

.COOOOO 

2.8C0000 

1 .OOOOOO 

4 .226693 

. 167855 

.000000 

.C00079 

2.794365 

1 .OOOOOO 

4 . 21 4988 

.425367 

.000000 

,000201 

2 .76381 3 

1 .OOOOOO 

4 .15061 1 

.818316 

.000000 

.000660 

2.666072 

1.000000 

3 .946677 

1 . 398378 

.000000 

.001 939 

2 .408628 

1 .OOOOOO 

3 .423657 

2. 163264 

.000000 

.004765 

1 .864058 

1 .OOOOOO 

2.391349 

2.822899 

.000000 

.CO 860 9 

1 .206249 

1 .OOOOOO 

1 .300204 

2.996940 

.0000,00 

.010114 

1 .003670 

1 .OOOOOO 

1 .005142 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

,000000 

.COOOOO 

1 .oeoooo 

1 . OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.000000 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .OOOCOO 

3.000000 

.000000 

.COOOOO 

1 .oeoooo 

1 .OOOOOO 

1 .ooocoo 

3.000000 

.000000 

.COOOOO 

1 .000000 

1 .OOOOOO 

1 .ooocoo 



d= 11 K= 


d= 12 K= 


d= 13 K= 


d= 14 K= 


L 

X 

Y 

z 


R/RREF 

1 

.717143 

-.500000 

.000000 


.357143 

2 

.717143 

-.500000 

.000755 


.357863 

3 

.71 7143 

-.500000 

.001914 


.361819 

4 

.717143 

-.500000 

.003691 


.375084 

5 

.717143 

-.500000 

. 006418 


.41 5174 

6 

.71 7143 

-.500000 

.010602 


.536464 

7 

.71 7143 

-.500000 

.017019 


.829016 

8 

.717143 

-.500000 

.026865 


.996343 

9 

.717143 

-.500000 

.041970 

1 

.000000 

10 

.71 7143 

-.500000 

.065142 

1 

. 000000 

11 

.71 7143 

-.500000 

. 1 00692 

1 

.000000 

12 

.717143 

-.500000 

.155230 

1 

.000000 

13 

.71 7143 

-.500000 

.238897 

1 

.000000 

14 

.717143 

-.500000 

. 367254 

1 

. 000000 

15 

.71 7143 

-.500000 

.5641 70 

1 

.000000 

L 

X 

Y 

Z 


R/RREF 

1 

.787857 

-.500000 

.000000 


.357143 



v: n ^ r\ r\ 

P A "7 


•?> C “T O A* o 

3 

. 787857 

-.500000 

.002006 


.36181 9 

4 

.787857 

-.500000 

.003869 


.375084 

5 

.787857 

-.500000 

.006727 


.41 5174 

6 

.787857 

-.500000 

.011112 


.536464 

7 

.787857 

-.500000 

.017839 


.829016 

8 

.787857 

-.500000 

.0281 59 


.996343 

9 

.787857 

-.500000 

. 043990 

1 

.000000 

10 

.787857 

-.500000 

.068279 

1 

.000000 

11 

.787857 

-.500000 

. 1 05540 

1 

.000000 

12 

.787857 

-.500000 

. 1 62703 

1 

.000000 

13 

.787857 

-.500000 

.250399 

1 

.000000 

14 

.787857 

-.500000 

.384935 

1 

. 000000 

15 

.787857 

-.500000 

.591331 

1 

.000000 

L 

X 

Y 

Z 


R/RREF 

1 

.858571 

-.500000 

.000000 


.357143 

2 

.858571 

-.500000 

.000826 


.357863 

3 

.858571 

-.500000 

.002094 


.361819 

4 

. 853571 

-.500000 

. 004039 


. 375084 

b 

. ODCJO t \ 

• . ouwuuw 

. C w V w ^ o 


. H I id 1 / *+ 

6 

.858571 

-.500000 

.011600 


.536464 

7 

.858571 

-.500000 

.018622 


.829016 

8 

.858571 

-.500000 

.029395 


.996343 

9 

.858571 

-.500000 

.045922 

1 

.000000 

10 

.858571 

-.500000 

.071277 

1 

.000000 

11 

.858571 

-.500000 

.110174 

1 

. 000000 

12 

.858571 

-.500000 

. 1 69848 

1 

.000000 

13 

.858571 

-.500000 

.261394 

1 

.000000 

14 

.858571 

-.500000 

.401839 

1 

.000000 

15 

.858571 

-.500000 

.617298 

1 

.000000 

L 

X 

Y 

Z 


R/RREF 

1 

.929286 

-.500000 

.000000 


.357143 

2 

.929286 

-.500000 

.000860 


.357863 

3 

.929286 

-.500000 

.0021 79 


.36181 9 

4 

.929286 

-.500000 

.004202 


. 375084 

5 

.929286 

-.500000 

.007306 


.415174 

6 

.929286 

-.500000 

.012068 


.536464 


U/AREF 

V/AREF 

W/AREF 

. 000000 

.000000 

.000000 

. 167855 

.000000 

.000075 

.425367 

.000000 

. 0001 90 

.818316 

.000000 

.000626 

1 . 398878 

.000000 

.001841 

2. 163264 

.000000 

. C04524 

2.822899 

.000000 

.0081 74 

2.996940 

.000000 

.009602 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 


U/AREF 

V/AREF 

W/AREF 

. 000000 

.000000 

.000000 

■( n'7 otzrr 

A A A A A A 

A A A A *7 A 

. 425367 

.000000 

.000182 

.818316 

.000000 

.000598 

1 . 398878 

.000000 

.001757 

2.163264 

.000000 

.004316 

2.822899 

.000000 

.007798 

2.996940 

.000000 

.009161 

3.000000 

.000000 

.000000 

3. 000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3. 000000 

.000000 

. 000000 

3.000000 

.000000 

.000000 


U/AREF 

V/AREF 

W/AREF 

. 000000 

.000000 

.000000 

. 167855 

.000000 

.000069 

. 425367 

.000000 

.0001 74 

.818316 

.000000 

.000572 

\ . 

• W WU 

. \j<j 1 

2. 163264 

.000000 

.0041 35 

2.822899 

.000000 

.007470 

2.996940 

.000000 

.008776 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.O'OOOOO ■ 

.000000 

3.000000 

.000000 

. 000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

3.000000 

.000000 

.000000 

U/AREF 

V/AREF 

W/AREF 

.000000 

.000000 

.000000 

. 167855 

.000000 

.000066 

.425367 

.000000 

.000167 

. 81 8316 

.000000 

.000550 

1 . 398878 

.000000 

.001618 

2. 163264 

.000000 

.003974 


T/TREF 

P/PREF 

ENT 

2.800000 

1 .000000 

4.226E93 

2.794365 

1 . 000000 

4 .21 4988 

2.763813 

1 . 000000 

4 . 1 5061 1 

2.666072 

1 . 000000 

3.946E77 

2.408628 

1 .000000 

3.423557 

1 .864057 

1 .OOCOOO 

2.391349 

1 .206249 

1.000000 

1 .300204 

1 .003670 

1 .000000 

1 .005142 

1 . 000000 

1 . 000000 

1 .OOOCOO 

1 .000000 

1 . 000000 

1 .OOOCOO 

1 .000000 

1 .000000 

1 .OOOCOO 

1 .ocoooo 

1 .000000 

1 .OOOCOO 

1 . 000000 

1 . 000000 

1 .OOOCOO 

1 . ocoooo 

1 . 000000 

1 .OOOCOO 

1 .ocoooo 

1 . 000000 

1 .OOOCOO 

T/TREF 

P/PREF 

ENT 

2.800000 

1 . OOCOOO 

4 .226693 

o _ 7r /I occ: 

1 

/j _ 9 i /5CDQ 

2.763813 

1 . 000000 

4 . 1 5061 1 

2.666072 

1 . 000000 

3 .946577 

2.408628 

1 .OOCOOO 

3.423557 

1 .864058 

1 . OOCOOO 

2.391349 

1 .206249 

1 . 000000 

1 .300204 

1 .003670 

1 . 000000 

1 .005142 

1 .OCOOOO 

1 . OOCOOO 

1 .OOOCOO 

1 .000000 

1 . 000000 

1 .OOOCOO 

1 .0000.00 

1 . 000000 

1 .OOOCOO 

1 .ocoooo 

1 .000000 

1 .OOOCOO 

1 .ocoooo 

1 . OOCOOO 

1 .OOOCOO 

1 . ocoooo 

1 . 000000 

1 .OOOCOO 

1 .ocoooo 

1 . OOCOOO 

1 .OOOCOO 

T/TREF 

P/PREF 

ENT 

2 .800000 

1 .OOCOOO 

4.226593 

2.794365 

1 . 000000 

4 .214988 

2.763813 

1 . 000000 

4.15061 1 

2.666072 

1 . oooooo 

4 A A A A 

3.946577 

-* A Arr- *7 

1 .864058 

1 • 

1 .000000 

w . 

2.391349 

1 .206249 

1 .oooooo 

1 .300204 

1 .0C3670 

1 . oooooo 

1 .005142 

1 .ocoooo 

1 .oooooo 

1 .OOOCOO 

1 .OCOOOO 

1 .oooooo 

1 .OOOCOO 

1 .OCOOOO 

1.000000 

1 .OOOCOO 

1 .OCOOOO 

1 .oooooo 

1 .OOOCOO 

1 .000000 

1 . oooooo 

1 .OOOCOO 

1 .ocoooo 

1 .oooooo 

1 .OOOCOO 

1 .ocoooo 

1.000000 

1 .OOOCOO 

T/TREF 

P/PREF 

ENT 

2.8COOOO 

1 .oooooo 

4.226E93 

2 .794365 

1 .oooooo 

4 .21 4988 

2.763813 

1 .oooooo 

4.15061 1 

2.666072 

1 .oooooo 

3.946577 

2.408628 

1 .oooooo 

3.423557 

1 .864058 

1.000000 

2.391349 



7 

.929286 

-.500000 

.019374 

.829016 

2.822899 

.000000 

,007181 

1 .206249 

1 .000000 

1 .300204 

8 

.929286 

-.500000 

.030582 

.996343 

2.996940 

.000000 

-008435 

1 .003670 

1 .GOOOOO 

1 .005142 

9 

.929286 

-.500000 

.047776 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .000000 

10 

.929236 

-.600000 

.0741 54 

1 .000000 

3.000000 

.000000 

.000000 

1 .000 000 

1 .000000 

1 .OOOC'OO 

11 

.929286 

-.500000 

. 1 14622 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1.000000 

1 .ooocoo 

12 

.929286 

-.500000 

. 1 76704 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

13 

.929286 

-.500000 

.271946 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

14 

.929286 

-.500000 

.418060 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

15 

.929286 

-.500000 

.642216 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 . 000000 

1 .ooocoo 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 .000000 

-.500000 

. 000000 

.357143 

.000000 

.000000 

.000000 

2.8C0000 

1 .000000 

4.226893 

2 

1 .000000 

-.500000 

. 000892 

. 357863 

. 167855 

.000000 

.000064 

2.794365 

1 . 000000 

4.214938 

3 

1 .000000 

-.500000 

.002260 

.361819 

.425367 

.000000 

.000161 

2.763813 

1 . 000000 

4 . 1 5081 1 

4 

1 .000000 

-.500000 

.004359 

.375084 

.818316 

.000000 

.000530 

2.666072 

1 .000000 

3.946577 

5 

1 .000000 

-.500000 

.007579 

.415174 

1 .398878 

.000000 

.001559 

2.408628 

1 .000000 

3.423557 

6 

1 .000000 

-.500000 

.012519 

.536464 

2.163264 

.000000 

.003831 

1 .864058 

1 .000000 

2.391349 

7 

1 .000000 

-.500000 

.020098 

.82901 6 

2.822899 

.000000 

.006922 

1 .206249 

1 .000000 

1 .300204 

8 

1 .000000 

-.500000 

.031724 

.996343 

2.996940 

.000000 

.0081 31 

1 . 003670 

1 .000000 

1 .005142 

i? 

1 . VJUUVJV.' V 


• VtSjOW 

1 < U W V UU 


• N./ »./ V V.' ^ 

^ ^ ^ 
• ^ O W w 

1 . CCCCCO 

4 /\ A n 

4 A A r o 

10 

1 .000000 

-.500000 

. 076924 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 . 000000 

1 .ooocoo 

11 

1 .000000 

-.500000 

. 1 18903 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

12 

1 .000000 

-.500000 

.183304 

1.000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

13 

1 .000000 

-.500000 

.282103 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1 .000000 

1 .ooocoo 

14 

1 .000000 

-.500000 

.433674 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1.000000 

1 .ooocoo 

15 

1 .000000 

-.500000 

.666203 

1 .000000 

3.000000 

.000000 

.000000 

1 .000000 

1.000000 

1 .ooocoo 


NC=200 TIME= 2.0000 DT= .1000-01 MAXIMUM DELTA0/0= ~1 .706-05AT U,K,L,N=15, 1, 5, 2 
GF= 3.2079-04 4.6633-03 .0000 -1.6968-01 1.1273-04 Cw= 5.0681+00 


CURRENT FLOW AT NC= 200 AS WRITTEN TO RESTART FILE 


L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.010000 

-.500000 

. 000000 

.357143 

.000000 

.000000 

.000000 

2.800000 

1 .OOOOOO 

4.226693 

2 

.010000 

-.500000 

.000089 

.357863 

. 167855 

.000000 

.000637 

2.7S4365 

1 . OOOOOO 

4.214S88 

3 

.010000 

-.500000 

.000226 

.361819 

.425367 

.000000 

.001613 

2.76381 3 

1 .OOOOOO 

4.15061 1 

4 

.010000 

-.500000 

. 000436 

.375084 

.818316 

.000000 

.005304 

2.666072 

1 .OOOOOO 

3.946577 

5 

.010000 

-.500000 

.000758 

.41 5174 

1 . 398878 

.000000 

.01 5593 

2.408628 

1 .OOOOOO 

3.423557 

6 

.010000 

-.500000 

.001252 

.536464 

2. 163264 

.000000 

.038312 

1 .864058 

1 . OOOOOO 

2.391349 

7 

.010000 

-.500000 

.002010 

.829016 

2.822899 

.000000 

.069220 

1 .206249 

1 . OOOOOO 

1 .300204 

8 

.010000 

-.500000 

.003172 

.996343 

2.996940 

.000000 

.081314 

1 .003670 

1 . OOOOOO 

1 .005142 

9 

.010000 

-.500000 

. 004956 

1 . 000000 

3. OOOOOO 

.000000 

. OOOOOO 

1 . OOOOOO 

1 . OOOOOO 

1 .OOOOOO 

10 

.010000 

-.500000 

.007692 

1 .000000 

3.000000 

.000000 

.000000 

1 . OOOOOO 

1 . OOOOOO 

1 .OOOOOO 

11 

.010000 

-.500000 

.01 1890 

1 .000000 

3.000000 

.000000 

.OOOOOO 

1 . OOOOOO 

1 .OOOOOO 

1 .OOOOOO 

12 

.010000 

-.500000 

.018330 

1 .000000 

3.000000 

.000000 

.OOOOOO 

1 .OOOOOO 

1 . OOOOOO 

1 .OOOOOO 

13 

.010000 

-.500000 

. 028210 

1 .000000 

3.000000 

.000000 

.OOOOOO 

1 .OOOOOO 

1 .OOOOOO 

1 .OOOOOO 

14 

. 01 oouo 

-. 6GOOOU 

. 0^*385 / 

1 . oooooo 

3. ooOooo 

. ouuuuo 

. oouuOO 

1 . OiiOOuO 

i . uOCvOO 

t . 0 V wOC 

15 

.010000 

-.500000 

.066620 

1 .000000 

3.000000 

.000000 

.OOOOOO 

1 .OOOOOO 

1 .OOOOOO 

1 .OOOOOO 


L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.080714 

-.500000 

.OOOOOO 

.412761 

.OOOOOO 

.OOOOOO 

.OOOOOO 

2.815870 

1 . 162282 

4.01 1742 

2 

.08071 4 

-.500000 

. 000253 

.413776 

. 147031 

.000000 

.000237 

2.811 531 

1 . 163343 

4.001629 

3 

.080714 

-.500000 

.000642 

.41631 1 

. 342501 

.OOOOOO 

.000898 

2. 7S2330 

1 . 162478 

3.964602 

4 

.080714 

-.500000 

.001238 

.426021 

.644745 

.OOOOOO 

.003565 

2.732422 

1 . 164068 

3.843930 

5 

.080714 

-.500000 

. 002153 

.453482 

1.117190 

.OOOOOO 

.01 0793 

2.565235 

1 . 163289 

3.519679 

6 

.080714 

-.500000 

.003557 

.547723 

1 . 849216 

.OOOOOO 

.032544 

2. 128648 

1 .165909 

2.708192 

7 

.080714 

-.500000 

.005710 

.883527 

2. 725908 

.000000 

.085935 

1 .320577 

1 . 1 66765 

1 .387637 

8 

.080714 

-.500000 

.009013 

1 . 119655 

2.963187 

.OOOOOO 

. 11 2531 

1 .045138 

1.1701 94 

.998941 

9 

.080714 

-.500000 

.014080 

1.11 4965 

2.961983 

.OOOOOO 

.0971 18 

1 .045068 

1 .165213 

1 .000553 

10 

.080714 

-.500000 

.021854 

1 .123731 

2.957422 

.OOOOOO 

.11 3900 

1 . 048 1 92 

1 . 1 77886 

1 .000405 

11 

.080714 

-.500000 

. 033781 

1 .050126 

2.981731 

.OOOOOO 

. 042705 

1 .020526 

1 .071681 

1 .000754 

12 

.080714 

-.500000 

.052077 

.994287 

3. 002504 

.OOOOOO 

-.005309 

.997196 

.991500 

.999484 

13 

.080714 

-.500000 

.080146 

1 .000195 

2.999893 

.OOOOOO 

-.001582 

1 .000276 

1.000471 

1 .000197 

14 

.080714 

-.500000 

.123208 

1 .000250 

2.999905 

.OOOOOO 

-.001230 

1 .000008 

1.000258 

.999908 

15 

.080714 

-.500000 

.189270 

1 .OOOOOO 

3.000000 

.OOOOOO 

-.001997 

1 .OOOOOO 

1 .OOOOOO 

1 .OOOOOO 



0= 3 K= 


d= 4 K= 


d= 5 K= 


J= 6 K= 


L 

X 

Y 

z 

R/RR£F 

U/AREF 

V/AREF 

W/AREF 

t/tref 

P/PREF 

ENT 

1 

.151429 

-.500000 

.000000 

.396005 

.000000 

.000000 

.000000 

2.805887 

1.111145 

4.064338 

2 

.151429 

-.500000 

.000347 

.405610 

.140424 

.000000 

.0001 97 

2.801962 

1 . 136504 

4.019933 

3 

.151429 

-.500000 

.000879 

.399058 

.326490 

.000000 

.000641 

2 . 784597 

1 . 1 11215 

4.021130 

4 

.151429 

-.500000 

.001696 

.416271 

.612009 

.000000 

. 0027 1 2 

2.731321 

1 .136970 

3.878129 

5 

.151429 

-.500000 

.002949 

.430237 

1 . 056361 

.000000 

.006866 

2.583099 

1 . 1 11344 

3.619579 

6 

.151429 

-.500000 

.004872 

.518684 

1.751025 

.000000 

.021597 

2.1S4151 

1 .138070 

2.853C24 

7 

.151429 

-.500000 

.007821 

.798181 

2.655008 

.000000 

. 056487 

1 .394495 

1 . 113060 

1 .526C77 

8 

.151429 

-.500000 

.012345 

1 .094939 

2.961747 

.000000 

.091563 

1 .046383 

1 .1457^6 

1 .009101 

9 

.151429 

-.500000 

.019286 

1.088481 

2.972305 

.000000 

. 075769 

1 .031 367 

1 .122623 

.996976 

10 

.151429 

-.500000 

.029934 

1 .123208 

2.957920 

.000000 

.11 1497 

1 .048086 

1 .177218 

1. .0 00490 

11 

.151429 

-.500000 

.046270 

1.101781 

2.964716 

.000000 

.088444 

1 .040416 

1 .146310 

1 .000850 

12 

.151429 

-.500000 

.071331 

1 .015566 

2.994191 

.000000 

.01 5017 

1 .006433 

1 .022100 

1 .000234 

13 

.151429 

-.500000 

.109777 

.999691 

3.000274 

.000000 

-.002671 

.999932 

.999623 

1 .OOOC55 

14 

.151429 

-.500000 

.168759 

1 .000145 

2.999932 

.000000 

-.001548 

.999972 

1 .0001 17 

.999914 

15 

.151429 

-.500000 

.259245 

1 .000000 

3.000000 

.000000 

-.002417 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.222143 

-.500000 

.000000 

.386941 

. 000000 

.000000 

.000000 

2.805834 

1 .085691 

4.102C80 

2 
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3 

.222143 

-.500000 

. 001065 

.389802 

.319676 

.000000 

.000433 

2.785320 

1.085724 

4.060107 

4 

.222143 

-.500000 

. 002054 

.407754 

.599876 

.000000 

.002061 

2.734043 

1.114818 

3.914225 

5 

.222143 

-.500000 

.003572 

.418947 

1 . 034208 

.000000 

.0051 58 

2.591676 

1 . 085774 

3.670432 

6 

.222143 

-.500000 

.005900 

.503363 

1 . 718803 

.000000 

.01 6278 

2.216068 

1 . 115486 

2.916289 

7 

.222143 

-.500000 

.009472 

.756986 

2.614410 

.000000 

.044290 

1 .435937 

1 .086984 

1 .605C92 

8 

.222143 

-.500000 

.014952 

1.070598 

2.963060 

.000000 

.072019 

1 .045549 

1 . 119363 

1 .017404 

9 

.222143 

-.500000 

.023359 

1 .073794 

2.978823 

.000000 

.064749 

1 .023209 

1.098715 

.994480 

10 

.222143 

-.500000 

.036256 

1 .092640 

2.968229 

.000000 

.081634 

1 .036840 

1 .132893 

1 .000739 

1 1 

.222143 

-.500000 

.056041 

1 . 1 18681 

2.960046 

.000000 

.104305 

1 .046161 

1 .170320 

1 .000268 

12 

.222143 

-.500000 

.086395 

1.041385 

2.984385 

.000000 

,038271 

1 .017433 

1.059539 

1 .001C63 

13 

.222143 

-.500000 

.132961 

1.002782 

2.999340 

.000000 

-.000218 

1 .001 033 

1.003818 

.999921 

14 

.222143 

-.500000 

.204399 

.999806 

3.000125 

.000000 

-.002070 

.999851 

.999657 

.999928 

15 

.222143 

-.500000 

.313995 

1 .000000 

3.000000 

.000000 

-.002801 

1 .000000 

1.000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.292857 

-.500000 

. 000000 

.385832 

.000000 

.000000 

.000000 

2.806087 

1 .082679 

4. 107161 

2 

.292857 

-.500000 

.000483 

.389203 

. 135500 

.000000 

.0001 1 1 

2.802414 

1 .090709 

4.087537 

3 

.292857 

-.500000 

.001223 

.388592 

.314323 

.000000 

.000424 

2 . 786293 

1 .082731 

4.066579 

4 

.292857 

-.500000 

. 002359 

.398665 

.590962 

.000000 

.001548 

2.736271 

1.090854 

3.952902 

5 

. 292857 

-.500000 

. 0041 n 1 

,416729 

1 .017955 

.000000 

.004724 

2.598660 

1 .082937 

3.688145 

6 

.292857 

-.500000 

.006775 

.489196 

1 .696883 

.000000 

.012676 

2.230318 

1 .091061 

2.968751 

7 

.292857 

-.500000 

.010876 

.742538 

2.590813 

.000000 

.039263 

1 .480165 

1.084229 

1 .644805 

8 

.292857 

-.500000 

.017168 

1.045786 

2.963605 

.000000 

.057757 

1 .045052 

1 . 092901 

1 .026504 

9 

.292857 

-.500000 

.026820 

1 .073470 

2-981099 

.000000 

.062230 

1 .020777 

1.095773 

.992236 

10 

.292857 

-.500000 

.041628 

1 .066107 

2.977269 

.000000 

.056465 

1 .026134 

1 . 093969 

1 .000193 

11 

.292857 

-.500000 

.064346 

1.11 3468 

2.962257 

.000000 

.101997 

1 .044364 

1 .162865 

1 .000416 

12 

.292857 

-.500000 

.099197 

1 .062832 

2.976828 

.000000 

.056536 

1 . 025995 

1.090460 

1 .001289 

13 

.292857 

-.500000 

.152664 

1 .008789 

2.997016 

.000000 

.005348 

1 .003470 

1 .012290 

.999964 

14 

.292857 

-.500000 

.234688 

.999453 

3.000365 

.000000 

-.002460 

.999698 

.999152 

.999917 

15 

.292857 

-.500000 

.360524 

1 .000000 

3.000000 

.000000 

-.002994 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.363571 

-.500000 

.000000 

.387198 

.000000 

.000000 

.000000 

2.805869 

1.086428 

4.101C40 

2 

.363571 

-.500000 

.000538 

.38131 7 

. 134081 

.000000 

.000098 

2.802271 

1.068552 

4.120937 

3 

.363571 

-.500000 

.001363 

.389897 

.310829 

.000000 

.000457 

2.786631 

1.086500 

4.061620 

4 

.363571 

-.500000 

.002628 

.390364 

.584858 

.000000 

.001102 

2.73731 2 

1.068549 

3.987625 

5 

.363571 

-.500000 

.004570 

.417526 

1.007575 

.000000 

.004558 

2 . 603086 

1 . 086855 

3.691605 

6 

.363571 

-.500000 

.007549 

.477224 

1.682007 

.000000 

.009960 

2.228843 

1 .068430 

3.009779 





7 .363571 -.500000 .012118 .738476 

8 .363571 -.500000 .019129 1.023116 

9 .363571 -.500000 .029883 1.076583 

10 .363571 -.500000 .046383 1.049448 

11 .363571 -.500000 .071695 1.099464 

12 .363571 -.500000 .110527 1.077323 

13 .363571 -.500000 .170099 1.016492 

14 .363571 -.500000 .261492 .999571 

15 .363571 -.500000 .401700 1.000000 

tl= 7 K= 1 L X Y Z R/RREF 

1 .434286 -.500000 .000000 .387983 

2 .434286 -.500000 .000588 .375561 

3 .434286 -.500000 .001489 .390641 

4 .434286 -.500000 .002873 .384350 

5 .434286 -.500000 .004995 .418007 

6 .434286 -.500000 .008250 .469082 

7 .434286 -.500000 .013244 .736402 

8 .434286 -.500000 .020906 1.005769 

9 .434286 -.500000 .032661 1.077631 

10 .434286 -.500000 .050693 1.040672 

11 .434286 -.500000 .078357 1.084060 

12 .434286 -.500000 .120798 1.085181 

13 .434286 -.500000 .185907 1.024572 

14 .434286 -.500000 .285793 1.000132 

15 .434286 -.500000 .439030 1.000000 

J= 8 K= 1 L X Y Z R/RREF 

1 .505000 -.500000 .000000 .387340 

2 .505000 -.500000 .000634 .372238 

3 .505000 -.500000 .001606 .389966 

4 .505000 -.500000 .003098 .380890 

5 .505000 -.500000 .005386 .417164 

6 .505000 -.500000 .008896 .464753 

7 .505000 -.500000 .014282 .732993 

8 .505000 -.500000 .022544 .994214 

9 .505000 -.500000 .035219 1.075631 

10 .505000 -.500000 .054665 1.036982 

11 .505000 -.500000 .084496 1.070448 

12 ,c;nciO00 -.500000 .130262 1.087689 

13 .505000 -.500000 .200472 1.032385 

14 .505000 -.500000 .308183 1.001365 

15 .505000 -.500000 .473426 1.000000 

J= 9 K= 1 L X Y . Z R/RREF 

1 .575714 -.500000 .000000 .385579 

2 .575714 -.500000 .000677 .370884 

3 .575714 -.500000 .001715 .388181 

4 .575714 -.500000 .003307 .379484 

5 .575714 -.500000 .005751 .415256 

6 .575714 -.500000 .009499 .463379 

7 .575714 -.500000 .015249 .728290 

8 .575714 -.500000 .024071 .987498 

9 .575714 -.500000 .037604 1.071564 

10 .575714 -.500000 .058367 1.036214 

11 .575714 -.500000 .090218 1.059477 

12 .575714 -.500000 .139083 1.086524 

13 .575714 -.500000 .214048 1.039237 


2.578329 

.000000 

.035893 

2.962893 

.000000 

.048247 

2.982633 

.000000 

.059602 

2. 982779 

.000000 

.042669 

2.966982 

.000000 

.090874 

2. 972284 

.000000 

.0681 70 

2.994019 

.000000 

.01 2576 

3.000470 

.000000 

-.002534 

3.000000 

.000000 

-.003279 

U/AREF 

V/AREF 

W/AREF 

. 000000 

.000000 

.000000 

. 133199 

.000000 

.000090 

. 308929 

.000000 

.000480 

.581106 

.000000 

.000781 

1 . 002516 

.000000 

.004366 

1 .674055 

.000000 

.0081 25 

2.572604 

.000000 

.032879 

2.960903 

.000000 

.042606 

2. 984822 

.000000 

.054993 

2.985532 

.000000 

.037722 

2.972064 

.000000 

.076685 

2.970240 

.000000 

.074505 

2.990816 

.000000 

.020264 

3.000362 

.000000 

-.002145 

3. 000000 

.000000 

-.003447 


U/AREF 

V/AREF 

W/AREF 

. 000000 

.000000 

.000000 

. 132647 

.000000 

.000083 

. 308010 

.000000 

.000476 

. 578934 

.000000 

.000599 

1 . 000874 

.000000 

.004083 

1.671519 

.000000 

.007037 

2.569769 

.000000 

.030033 

2.95791 5 

.000000 

.039460 

2.987575 

.000000 

.049250 

2.986677 

.000000 

.037255 

2.976447 

.000000 

.062649 

2.970016 

.000000 

.076691 

2.987914 

.000000 

.027531 

2.999974 

.000000 

-.001268 

3.000000 

.000000 

-.003678 

U/AREF 

V/A,REF 

W/AREF. 

. 000000 

.000000 

.000000 

. 132324 

,000000 

.000078 

.307671 

.000000 

.000448 

.577884 

.000000 

.000527 

1 . 001228 

.000000 

.003731 

1 . 673061 

.000000 

.006479 

2.568410 

.000000 

.027460 

2.954528 

.000000 

.037697 

2.990543 

.000000 

.043508 

2.987070 

.000000 

.038304 

2.979958 

.000000 

.050428 

2.970939 

.000000 

.076333 

2.985419 

.000000 

.033885 


1 .47361 3 

1 . 088228 

1 .663600 

1 .045345 

1 .069509 

1 .035633 

1 .019681 

1 .097771 

.990023 

1 .019004 

1 .069392 

.999520 

1 .039628 

1 .143034 

1 .000935 

1 .031 408 

1 . 1111 59 

1.001 134 

1 .006694 

1 .023296 

1 .000129 

.999720 

.999291 

.999692 

1 .000000 

1 . OOOOOO 

1 .ooocoo 

T/TREF 

P/PREF 

ENT 

2.805388 

1 .088443 

4.097CT8 

2.801839 

1.052260 

4.145445 

2.78651 1 

1.088526 

4.058351 

2.737534 

1 .052170 

4.012997 

2.605104 

1 .088951 

3.692766 

2.242441 

1.051889 

3.035439 

1 .480540 

1.090273 

1 .673301 

1 .046769 

1 .052808 

1 .044364 

1 .018034 

1 .097065 

.988C39 

1 .015077 

1 .056362 

.999C1 9 

1 .034236 

1.121174 

1 .001379 

1 .034167 

1 .122258 

1 .000698 

1 .010078 

1 . 034898 

1 .000318 

.99991 5 

1 .000047 

.999662 

1 . OCOOOO 

1 . OOOOOO 

1 .OOOCOO 

T/TREF 

P/PREF 

ENT 

2.804742 

1 ,086389 

4.098791 

2.801222 

1 .042722 

4.159290 

2.766063 

1 .086470 

4 .060505 

2.737274 

1 .042602 

4.027154 

2.605429 

1 .086891 

3.696209 

2.242669 

1 .042286 

3.047C28 

1 .46441 2 

1 . 088064 

1 .680794 

1 .049363 

1 .043291 

1 .051601 

1 .015587 

1 .092396 

.986397 

1 .013238 

1 .050709 

.998626 

1 .029263 

1 ,101772 

1 .001613 

1 .034954 

1 . 125708 

1 .000735 

1 .013300 

1 .0461 16 

1 .000464 

1 .000394 

1 .001760 

.999648 

1 .000000 

1 .OOOOOO 

1 .OOOCOO 

T/TREF 

P/PREF 

ENT 

2.804129 

1.081215 

4.1053.72 

2.800627 

1 .038709 

4.164472 

2.765524 

1 .081287 

4.067180 

2 . 736860 

1 .038595 

4.032506 

2.604791 

1 .081655 

3.702C87 

2.240759 

1 .038322 

3.048C38 

1 .466551 

1 .082640 

1 .687555 

1 .05261 2 

1.039452 

1 .057923 

1 .012708 

1.085181 

.985C92 

1 .012534 

1 .049202 

.998228 

1 .025081 

1 .086050 

1 .001662 

1 .034447 

1 .123951 

1 .000673 

1 .016070 

1.055938 

1 .000548 



U = 10 K = 


U = 11 K = 


J = 12 K = 


ii = 13 K = 


14 

.575714 

-.500000 

.329054 

1 .002992 

2.999360 

.000000 

.000055 

1 .001045 

1 . 004040 

.999649 

15 

.575714 

-.500000 

.505487 

1 .000000 

3.000000 

.000000 

-.003728 

1 .000000 

1 .000000 

1 .ooocoo 

9- 

L 

X 

Y 

Z 

R/RREF 

, U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.646429 

-.500000 

. 000000 

.383185 

. 000000 

.000000 

.000000 

2.803607 

1.074301 

4.1 14646 

2 

.646429 

-.500000 

.000717 

.370814 

.132124 

.000000 

.000074 

2.800116 

1 .036323 

4 . 164 C 26 

3 

.646429 

-.500000 

.001817 

. 385767 

.307545 

.000000 

.000404 

2.785000 

1 .074360 

4.076574 

4 

.646429 

-.500000 

.003505 

.379408 

. 577442 

.000000 

.000533 

2.736468 

1 . 038238 

4.032252 

5 

.646429 

-.500000 

.006094 

.412722 

1 , 002207 

.000000 

.003350 

2.603815 

1.074652 

3.709771 

6 

.646429 

-.500000 

.010065 

.463819 

1 . 676750 

.000000 

.006241 

2.238032 

1 .038041 

3.043176 

7 

.646429 

-.500000 

.016159 

.722491 

2.566738 

.000000 

.025226 

1 .468535 

1 .075453 

1 .695220 

8 

.646429 

-.500000 

.025506 

.983947 

2.951 136 

.000000 

.036469 

1 .056214 

1.039259 

1 . 063 C 73 

9 

.646429 

-.500000 

.039847 

1.066519 

2.993292 

.000000 

.03851 1 

1 .009738 

1.076905 

. 984 C 60 

10 

.646429 

-.500000 

.061847 

1 .036931 

2.987212 

.000000 

.039194 

1 .012382 

1 .049821 

.997783 

11 

.646429 

-.500000 

.095599 

1 .050874 

2.982569 

.000000 

.040638 

1 .021697 

1.073675 

1.001617 

12 

.646429 

-.500000 

.147378 

1 .082835 

2.972557 

.000000 

.074016 

1 . 033065 

1 . 1 18639 

1 .000697 

13 

.646429 

-.500000 

.226813 

1 .045184 

2.983490 

.000000 

.039196 

1.018418 

1 .064433 

1 .000573 

14 

.646429 

-.500000 

.348677 

1.005158 

2.998506 

.000000 

.001766 

1 . 001932 

1 .007100 

.999672 

15 

.646429 

-.500000 

.535633 

1 .000000 

3. 000000 

.000000 

-.003790 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.717143 

-.500000 

.000000 

.380775 

. 000000 

.000000 

.000000 

2.803242 

1 .067405 

4 . 1 24708 

2 

.717143 

-.500000 

.000755 

.371334 

. 131996 

.000000 

.000069 

2 . 7 S 9757 

1 .039644 

4.161 162 

3 

.717143 

-.500000 

.001914 

.383341 

.307500 

.000000 

.000356 

2.764596 

1 .067451 

4.086278 

4 

.717143 

-.500000 

. 003691 

.379941 

. 577344 

.000000 

.000564 

2 . 736187 

1 .039589 

4.029577 

5 

.717143 

-.500000 

.006418 

.410198 

1 . 003421 

.000000 

.002987 

2.602813 

1 .067669 

3.717452 

6 

.717143 

-.500000 

.010602 

.465104 

1 .681625 

.000000 

.0061 13 

2.234914 

1 .039468 

3.035573 

7 

.717143 

-.500000 

.017019 

.717069 

2.565471 

.000000 

.023348 

1.469843 

1 .068319 

1 .701630 

8 

.717143 

-.500000 

.026865 

.982139 

2. 948076 

.000000 

.035392 

1 .059666 

1 .040739 

1 .067332 

9 

.717143 

-.500000 

.041970 

1 .061649 

2. 995642 

.000000 

.034410 

1 .007058 

1 .069142 

.983246 

10 

.717143 

-.500000 

.065142 

1 .038421 

2.987313 

.000000 

.039512 

1 .012430 

1 .051329 

.997277 

11 

.717143 

-.500000 

. 1 00692 

1 .044372 

2.984502 

.000000 

.033357 

1 .019082 

1.064300 

1 .001537 

12 

.717143 

-.500000 

. 1 55230 

1 .077969 

2.974461 

.000000 

.070775 

1 .031 279 

1.11 1686 

1 .000768 

13 

.717143 

-.500000 

.238897 

1 .049790 

2.982056 

.000000 

.043283 

1 .020197 

1 .070993 

1 .000560 

14 

.717143 

-.500000 

. 367254 

1 . 007483 

2. 997538 

.000000 

. 003770 

1 .002892 

1.010397 

.999606 

15 

.717143 

-.500000 

.564170 

1 .000000 

3.000000 

.000000 

-.003589 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

Z 

r/rref 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.787857 

-.500000 

.000000 

.378477 

. 000000 

.000000 

.000000 

2.802995 

1 .060868 

4.1 34345 

Z 

- YbVbt)/ 

- . suouuu 

. 000 1 

. Kj 

. I 3 1 9^3 


. JuTJTToT 

2 * 7595 i 3 

1 . 

4 . » 3 GC 7 G 

3 

.787857 

-.500000 

.002006 

.381032 

. 307522 

.000000 

.000300 

2.764276 

1 .060899 

4.095694 

4 

.787857 

-.500000 

.003869 

.380844 

. 577542 

.000000 

.000615 

2.735993 

1 .041987 

4.025465 

5 

.787857 

-.500000 

.006727 

.407807 

1 . 004635 

.000000 

.002620 

2.601 827 

1 .061043 

3.724745 

6 

.787857 

-.500000 

.011112 

.466868 

1 .687059 

.000000 

.006053 

2.231771 

1.041943 

3 . 02671 8 

7 

.787857 

-.500000 

.017839 

.711666 

2.563325 

.000000 

. 02171 1 

1 .461 659 

1 .061564 

1 . 709 C 67 

8 

. 78785 T 

-.500000 

.028159 

.981335 

2.945324 

.000000 

.034300 

1 -. 063036 

1 . 043,195 

1 ,. 071 C 78 

9 

.787857 

-.500000 

.043990 

1.057063 

2.997532 

.000000 

.031086 

1 .004649 

1.061977 

.982594 

10 

.787857 

-.500000 

.068279 

1.039891 

2.987586 

.000000 

.039140 

1 .012451 

1.052839 

.996733 

11 

.787857 

-.500000 

. 1 05540 

1 .039245 

2.985891 

.000000 

.028216 

1 .017002 

1 .056915 

1 .001463 

12 

.787857 

-.500000 

.1 62703 

1 .07231 4 

2.976501 

.000000 

.066710 

1 .029207 

1 .103632 

1 .000661 

13 

.787857 

-.500000 

.250399 

1 .053583 

2.981085 

.000000 

.046490 

1 .021630 

1.076372 

1 .000521 

14 

.787857 

-.500000 

.384935 

1 .010134 

2.996428 

.000000 

.005987 

1 .003993 

1 .014168 

.999652 

15 

.787857 

-.500000 

.591331 

1 .000000 

3^000000 

.000000 

-.003381 

1 .000000 

1.000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

t/tref 

P/PREF 

ENT 

1 

.858571 

-.500000 

.000000 

.37661 0 

.000000 

.000000 

.000000 

2.802953 

1.055621 

4 . 1 42465 

2 

.858571 

-.500000 

.000826 

.372967 

. 132030 

.000000 

.000063 

2 . 7 S 9464 

1.044107 

4.153431 

3 

.858571 

-.500000 

.002094 

.379163 

.307768 

.000000 

.000255 

2.784135 

1.055642 

4.103550 


4 

.858571 

-.500000 

.004039 

. 381635 

.578173 

.000000 

.000650 

2.735887 

1 . 0441 1 1 

4.021S68 

5 

.858571 

-.500000 

.007023 

.405907 

1.006171 

.000000 

.002331 

2.600924 

1 .055733 

3.73041 3 

6 

.858571 

-.500000 

.011600 

.468525 

1.692748 

.000000 

.005972 

2.228519 

1 .0441 17 

3 .01 8C27 

7 

.858571 

-.500000 

.018622 

.707696 

2. 562113 

.000000 

.020522 

1 .49241 6 

1 .0561 76 

1 .71 3764 

8 

.858571 

-.500000 

.029395 

.980686 

2.943062 

.000000 

.033254 

1 .065944 

1 .045356 

1 .074292 

9 

.858571 

-.500000 

.045922 

1 .053574 

2.998890 

.000000 

. 028918 

1 .002797 

1 .056521 

.982080 

10 

.858571 

-.500000 

.071277 

1 .041044 

2.988001 

.000000 

.038304 

1 .012307 

1 .053856 

.996149 

11 

.858571 

-.500000 

.110174 

1 .035520 

2.936881 

.000000 

. 024941 

1 .015486 

1 .051555 

1 .001407 

12 

.858571 

-.500000 

. 1 69848 

1 .066856 

2.978394 

.000000 

. 062498 

1 . 027203 

1 . 095878 

1 .000954 

13 

.858571 

-.500000 

.261394 

1 .056005 

2.980555 

.000000 

.048513 

1 .022523 

1 ,079789 

1 .000476 

14 

.858571 

-.500000 

.401839 

1 .012726 

2.995327 

.000000 

.008355 

1 .005070 

1 .017860 

.999999 

15 

.858571 

-.500000 

.617298 

1 .000000 

3.000000 

.000000 

-.002845 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.929286 

-.500000 

. 000000 

.37491 7 

.000000 

.000000 

.000000 

2.802934 

1 .050867 

4 . 14991 3 

2 

.929286 

-.500000 

.000860 

.373578 

. 132159 

.000000 

.000061 

2 . 799440 

1 .045808 

4.150675 

3 

.929286 

-.500000 

. 0021 79 

.377469 

. 308031 

.000000 

. 00021 0 

2.784012 

1 .050877 

4.11 0729 

4 

.929286 

-.500000 

. 004202 

. 382277 

. 578872 

.000000 

.000682 

2.735806 

1 .045837 

4 .01 9147 

5 

.929286 

-.500000 

.007306 

.404175 

1 . 007389 

.000000 

. 002033 

2.600162 

1 .050919 

3.735706 

c 


tz r\ r\ r\ 

^ i O A CO 

/X K Al O C O 

< cri*7Coo 

AAA AAA 


O 9ac:qa7 

1 

n 1 1 r 

7 

.929286 

-.500000 

.019374 

.703565 

2.559709 

.000000 

. 01 9241 

1 .494237 

1 .051293 

1 .719678 

8 

.929286 

-.500000 

.030582 

.979758 

2.941000 

.000000 

.032019 

1 .068733 

1 .047100 

1 .07751 1 

9 

.929286 

-.500000 

. 047776 

1 .050425 

2-999959 

.000000 

. 027058 

1 .001 177 

1 .051662 

.981668 

10 

.929286 

-.500000 

.074154 

1 .042146 

2.988506 

.000000 

.037327 

1.012133 

1 .054791 

.995557 

1 1 

.929286 

-.500000 

. 1 14622 

1 .032399 

2.987637 

.000000 

.022763 

1 .014217 

1 ,047077 

1 .001364 

12 

.929286 

-.500000 

. 1 76704 

1 .061343 

2.980250 

.000000 

.058071 

1 .025160 

1 .088047 

1 .001035 

13 

.929286 

-.500000 

.2.71946 

1 .058040 

2.980234 

.000000 

.0501 24 

1 .023261 

1 .082651 

1 .000427 

14 

.929286 

-.500000 

.418060 

1 .015437 

2.994176 

.000000 

.01 0762 

1 .006193 

1 .021725 

1 .000046 

15 

.929286 

-.500000 

.642216 

1 .000000 

3.000000 

.000000 

-.002326 

1 .000000 

1 .000000 

1 .OOOCOO 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 .000000 

-.500000 

. 000000 

.373685 

. 000000 

.000000 

.000000 

2.803077 

1 . 047469 

4.155589 

2 

1 .000000 

-.500000 

. 000892 

.373834 

. 132562 

.000000 

.000060 

2.799560 

1 .046569 

4 . 1 4971 7 

3 

1 . 000000 

-.500000 

.002260 

.376249 

.308941 

.000000 

.000181 

2.783989 

1 .047473 

4. 1 1 601 8 

4 

1 .000000 

-.500000 

. 004359 

.382595 

. 580806 

.000000 

.000701 

2.73555-7 

1 .046610 

4.017447 

5 

1 .000000 

-.500000 

. 007579 

.403085 

1 .01091 2 

.000000 

.001847 

2.598677 

1 . 047486 

3.737608 

6 

1 .000000 

-.500000 

.012519 

.471234 

1 . 705452 

.000000 

.005684 

2.221 149 

1 .046680 

3.001 118 

7 

1 .000000 

-.500000 

.020098 

.701415 

2.559450 

.000000 

.018446 

1 .493857 

1 .047814 

1 .721548 

8 

1 .000000 

-.500000 

. 031724 

.978487 

2.939576 

.000000 

.030852 

1 .070793 

1 .047757 

1 .080149 

9 

1 .onnooo 

-.500000 

. 049560 

1 .048150 

3-000669 

.000000 

.025906 

.999972 

1 .048120 

.981338 

10 

1 .000000 

-.500000 

. 076924 . 

1 .042428 

2.989272 

.000000 

.036099 

1 .01 1 61 2 

1 ,054532 

.994937 

1 1 

1 .000000 

-.500000 

. 1 18903 

1 .030459 

2.988084 

.000000 

.021985 

1 .013428 

1 .044296 

1 .001338 

12 

1 .000000 

-.500000 

.183304 

1 .056554 

2.981773 

.000000 

.053795 

1 .023380 

1 .081257 

1 .001107 

13 

1 .000000 

-.500000 

. 2821 03 

1 .058709 

2.980346 

.000000 

.050603 

1 .023482 

1 .083569 

1 .000390 

14 

1 .000000 

-.500000 

.433674 

1 .017983 

2.993103 

.000000 

.01 3256 

1 .007245 

1 .025358 

1 .000090 

15 

1 .000000 

-.500000 

.666203 

1 .000000 

3.000000 

.000000 

-.001442 

1 .000000 

1 .000000 

1 .OOOCOO 


GENERALIZED FORCES FROM DIRECT INTEGRATION OF WALL SURFACE STRESSES 
.0000 -4.6633-03 .0000 1.6968-01 -1.1273-04 



INITIAL OUTPUT FOR TEST CASE NO. 2 (INITIAL START RUN) SHOWING INPUT DATA AND FLOWFIELD INITIAL DATA 


NHAX 

JMAX 

kmax 

LMAX 

lam IN INVISC 

Jiec JHAXBC KPLANE KlBC 

JKIWL 

JKIWU 

KW 

JKW 

KMAXBC 

100 

23 

5 

15 

1 0 

0 111 

0 

0 

0 

0 

3 


LIBC JLIWL 

JLIWU LW 

JLW LHAXBC NRST 

lURlT NGRI 

NP KVIS 

LVIS KLVIS 

inflt isuth 

NROUT 

1 0 

0 0 

0 1 0 

1 0 

50 1 

1 1 

0 1 

too 

DT 

FSMACH 

RMACH RE 

PR 

RTDEGK 

FSP 

FST 


5 OOCOOOOE-02 1 

OOOOOOOE^OO 1 

OOOOOOOE-OO 9 4000000E*05 

7 2000000E-0! 

2 9500000E-02 

1 OOOOOOOE'OO ' 

1 OOOOOOOE‘00 



GAMMA RMUEXP TW 

I 4000000E*00 1 OOOOOOOE-00 0 


CNBR 

0 


OTFAC 

I oooooooE»oo 0 


RM 


SMU OMEGA 

5 OOOOOOOE-02 0 


DTMAX 

5 OOOOOOOE-02 


THIS IS A RESTART FROM THE FOLLOWING INITIAL CONDITIONS 

KMAXR JMAXR , LMAXR . I TMAXR . LMAXBR . L I BCR , FSMACR . CAMMAR RER . SMUR . OTR . ALPR . CNBRR . PRR 
5 23 15 0 I I 

I0000000E»01 UOOOOOOE'OI 94000000E-06 50000000E-00 000 72000000E*00 


THROAT LOCATION X= 

^0 AT JT = 

14 




THROAT 

AREA 

AT« 3 

71195E*00 





K * 1 
L 


VOU 


wou 

HTOT 


PTOT 

1 

0 


0 


1 OOOOOOOE*00 

1 

OOOOOOOE-OO 

2 

0 


0 


I OOOOOOOE'OO 

1 

OOOOOOOE-OO 

3 

0 


0 


1 OOOOOOOE-OO 

1 

OOC'OOOOE-OO 

4 

0 


0 


1 OOOOOOOE*00 

1 

OOCOOOOE-00 

5 

0 


0 


1 OOOOOOOE'OO 

1 

OOOOOOOE-OO 

6 

0 


0 


I OOOOOOOE-00 

I 

OOCCOOOE-00 

7 

0 


0 


I OOOOOOOE-OO 

i 

OOC'OOOOE-OO 

8 

0 


0 


I OOOOOOOE.OO 

1 

OOC'OOOOE-OO 

9 

0 


0 


1 OOOOOOOE-OO 

9 

8'265270E-01 

10 

0 


0 


1 OOOOOOOE-OO 

9 

8I0C459E-O1 

1 1 

0 


0 


1 OOOOOOOE-OO 

9 

740010IE-01 

12 

0 


0 


1 OOOOOOOE-OO 

9 

68598 17E -01 

13 

0 


0 


1 OOOOOOOE-OO 

9 

6476258E-01 

14 

0 


0 


1 OOOOOOOE-OO 

9 

6247059C-01 

15 

0 


0 


1 OOOOOOOE-OO 

9 

61708I5E-01 



J.K.L. AND MAX COURANT NBR U I 15 47326E-03 ' 

GFs 3 9504E-02-7 2512E*0C 0 -4 4539E*01 I 6831E-I4 

NC ■ 0 TIME = 0 0000 DT = 5000E-01 

CURRENT now AT NC» 0 AS WRITTEN TO RESTART FILE 


J* I K = 


J* 2 K* 


J* 3 K« 


L 


X 


Y 


Z 

R/RREF 

1 

-7 

423905 

0 

000000 

0 

OOOOOO 

972497 

2 

-7 

423905 

0 

000000 

1 

238146 

972497 

3 

-7 

423905 

0 

000000 

1 

880363 

972497 

4 

-7 

423905 

0 

000000 

2 

213475 

972497 

5 

-7 

423905 

0 

000000 

2 

380257 

972497 

6 

-7 

423905 

0 

000000 

2 

475878 

972497 

7 

-7 

423905 

0 

000000 

2 

522364 

972497 

8 

-7 

423905 

0 

000000 

2 

546476 

972497 

9 

-7 

423905 

0 

000000 

2 

558982 

96961 1 

10 

-7 

423905 

0 

ocoooo 

2 

565469 

967182 

1 1 

-7 

423905 

0 

000000 

2 

568834 

965204 

12 

-7 

423905 

0 

000000 

2 

570579 

963672 

13 

-7 

423905 

0 

000000 

2 

571484 

962580 

14 

-7 

423905 

0 

000000 

2 

571954 

961926 

15 

-7 

423905 

0 

000000 

2 

572197 

961708 

L 


X 


Y 


Z 

R/RPEF 

1 

-6 

310319 

0 

000000 

0 

OOOOOO 

972497 

2 

-6 

3I03I9 

0 

000000 

1 

238146 

972497 

3 

-6 

310319 

0 

000000 

1 

880363 

972497 

4 

-6 

310319 

0 

000000 

2 

213475 

972497 

5 

-6 

310319 

0 

000000 

2 

386257 

972497 

6 

-6 

310319 

0 

000000 

2 

475878 

972497 

7 

-6 

310319 

0 

000000 

2 

522364 

972497 

8 

-6 

310319 

0 

oooooo 

2 

546476 

972497 

9 

-6 

310319 

0 

000000 

2 

558982 

96961 1 

10 

-6 

310319 

0 

oooooo 

2 

565469 

967182 

1 1 

-6 

310319 

0 

oooooo 

2 

568834 

965204 

12 

-6 

310319 

0 

oooooo 

2 

570579 

963672 

13 

-6 

310319 

0 

oooooo 

2 

571484 

962580 

14 

-6 

310319 

0 

oooooo 

2 

571954 

961926 

15 

-6 

310319 

0 

oooooo 

2 

572197 

961708 

L 


X 


Y 


Z 

R/RREF 



IU-- 5 OOOOOE-02 
CW. 9 9745E-0I 


U/AREF 
235515 
235515 
235515 
235516 
235515 
235516 
235515 
235515 
201870 
168225 
134580 
100935 
067290 
033645 
0 000000 

U/AREF 
235515 
235515 
235515 
235515 
235515 
235515 
235515 
235515 
20.870 
168225 
1 34580 
100935 
067290 
033645 
0 000000 


V/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 qooooo 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 

V/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 


W/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 

W/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 OOOOOQ 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 


T/TREF 
988906 
988906 
988906 
988906 
988906 
988906 
988906 
988906 
991850 
994340 
996378 
997962 
999094 
999774 
1 000000 

T/TREF 
988906 
988906 
988906 
988906 
988906 
988906 
988906 
988906 
991850 
994340 
996378 
997962 
999094 
999774 
1 000000 


P/PREF 
961708 
961708 
961708 
961708 
96 1 708 
961738 
961 ’08 
961708 
961708 
961708 
961708 
961708 
961708 
961708 
.961708 

P/PREF 

961703 

961708 

961708 

.961708 

961708 

961708 

961708 

.961708 

961708 

961708 

.961708 

961708 

961708 

961708 

961708 


ENT 

I 000000 
1 000000 
i 000000 
1 000000 
1 000000 
1 000000 
1 000000 
I 000000 
1 004169 
1 007701 
1 010593 
1 012844 
1 014453 
1 015418 
1 015740 

ENT 

1 000000 
I 000000 
1 000000 
1 000000 
1 000000 
I 000000 
I 000000 
1 000000 
I 004169 
I 007701 
1 010593 
1 012844 
1 014453 
1 015418 
I 015740 


U/AREF V/AREF W/AREF T/TREF P/PREF ENT 


1 

-5 

196733 

0 

000000 

0 000000 

972497 

235515 

0 000000 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

2 

-5 

196733 

0 000000 

1 

238146 

972497 

235515 

0 000000 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

3 

-5 

196733 

0 

000000 

1 

880363 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

4 

-5 

196733 

0 000000 

2 

213475 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

988906 

961708 

I OOOOOO 

5 

-5 

196733 

0 

000000 

2 

386257 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

6 

-5 

196733 

0 

000000 

2 

475878 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

988906 

.961708 

1 OOOOOO 

7 

-5 

196733 

0 

000000 

2 

522364 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

.988906 

961708 

1 OOOOOO 

8 

-5 

196733 

0 

000000 

2 

546476 

972497 

235515 

0 OOOOOO 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

9 

-5 

196733 

0 

000000 

2 

558932 

96961 1 

201870 

0 OOOOOO 

0 OOOOOO 

991850 

.961708 

1 004169 

10 

-5 

196733 

0 

000000 

2 

565469 

967182 

168225 

0 OOOOOO 

0 OOOOOO 

.994340 

961708 

1 007701 

11 

-5 

196733 

0 

000000 

2 

568834 

965204 

1 34580 

0 OOOOOO 

0 OOOOOO 

996378 

.961708 

1 010593 

12 

-5 

196733 

0 

000000 

2 570579 

963672 

100935 

0 OOOOOO 

0 OOOOOO 

. 997962 

.961708 

1 012844 

13 

-5 

196733 

0 

000000 

2 

571484 

962580 

067290 

0 OOOOOO 

0 OOOOOO 

999094 

961708 

1 014453 

14 

-5 

196733 

0 

000000 

2 571954 

961926 

033645 

0 OOOOOO 

0 OOOOOO 

999774 

.961708 

1 015418 

15 

-5 

196733 

0 

000000 

2 

572197 

961708 

0 000000 

0 OOOOOO 

0 OOOOOO 

1 OOOOOO 

961708 

I 015740 

L 


X 


Y 


Z 

R/RPEF 

0/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

• 4 

222346 

0 

000000 

0 

000000 

972497 

235516 

0 OOOOOO 

0 OOOOOO 

988906 

961708 

1 OOOOOO 

2 

-4 

222346 

0 

000000 

1 

238146 

972497 

235515 

0 OOOOOO 

- 0221 19 

988906 

961708 

1 OOOOOO 

3 

-4 

222346 

0 

000000 

1 

880363 

972497 

235515 

0 OOOOOO 

- 033592 

988906 

.961708 

1 OOOOOO 

4 

-4 

222346 

0 

000000 

2 

213475 

972497 

235515 

0 OOOOOO 

- 039543 

988906 

961708 

1 OOOOOO 

5 

-4 

222346 

0 

000000 

2 

386257 

972497 

235515 

0 OOOOOO 

- 042630 

988906 

961708 

1 OOOOOO 

6 

-4 

222346 

0 

000000 

2 

475878 

972497 

235515 

0 OOOOOO 

- 044231 

988906 

961708 

1 OOOOOO 

7 

-4 

222346 

0 

000000 

2 

522364 

972497 

235515 

0 OOOOOO 

- 045061 

988906 

.961708 

1 OOOOOO 

8 

-4 

222346 

0 

000000 

2 

546476 

972497 

235515 

0 OOOOOO 

- 045492 

988906 

961708 

1 OOOOOO 

9 

-4 

222346 

0 

000000 

2 

558982 

96961 1 

201870 

0 OOOOOO 

- 039185 

.991850 

961708 

1 004169 

10 

-4 

222346 

0 

000000 

2 

565469 

967182 

168225 

0 OOOOOO 

- 032737 

994340 

961708 

1 007701 

1 1 

-4 

222346 

0 

000000 

2 

568834 

965204 

1 34530 

0 OOOOOO 

- 026224 

996378 

961708 

1 010593 

12 

-4 

222346 

0 

000000 

2 

570579 

963572 

100935 

0 OOOOOO 

- 019681 

997962 

961708 

1 012844 

13 

-4 

222346 

0 

000000 

2 

57 1 484 

962580 

067290 

0 OOOOOO 

- 013125 

999094 

961708 

1 014453 

14 

-4 

222346 

0 

000000 

2 

571954 

961926 

033645 

0 OOOOOO 

- 006564 

999774 

961708 ' 

1 015418 

15 

• 4 

222346 

0 

000000 

2 

572197 

961708 

0 000000 

0 OOOOOO 

0 OOOOOO 

1 OOOOOO 

961708 

1 015740 

L 


X 


Y 


2 

R/RRER 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-3 

340757 

0 

000000 

0 

000000 

962328 

276066 

0 OOOOOO 

0 OOOOOO 

984758 

947660 

1 OOOOOO 

2 

-3 

340757 

0 

000000 

1 

063838 

962328 

276066 

0 OOOOOO 

- 054584 

984758 

947660 

1 OOOOOO 

3 

-3 

340757 

0 

000000 

1 

615641 

962328 

276066 

0 OOOOOO 

- 082896 

.984758 

.947660 

1 OOOOOO 

4 

-3 

340757 

0 

000000 

1 

901857 

962328 

276066 

0 OOOOOO 

- . 097582 

.984758 

947660 

1 OOOOOO 

5 

-3 

340757 

0 

000000 

2 

050315 

962328 

276066 

0 OOOOOO 

- 105199 

984758 

.947660 

1 OOOOOO 

6 

-3 

340757 

0 

000000 

2 

127319 

962328 

276066 

0 OOOOOO 

-.109150 

984758 

947660 

1 OOOOOO 

7 

-3 

340757 

0 

000000 

2 

167260 

962328 

276066 

0.000000 

- 111199 

.984758 

947660 

1 OOOOOO 

8 

-3 

340757 

0 

000000 

2 

187977 

962328 

276066 

0 OOOOOO 

- 112262 

984758 

947660 

1 OOOOOO 

9 

-3 

340757 

0 

000000 

2 

198723 

958393 

236628 

0 OOOOOO 

-.096697 

988801 

947660 

1 005754 

10 

-3 

340757 

0 

000000 

2 

204297 

955088 

197190 

0 OOOOOO 

- 080785 

992223 

947660 

1 010630 

1 1 

-3 

340757 

0 

000000 

2 

207188 

952400 

157752 

0 OOOOOO 

- 064713 

995023 

947660 

1 014624 

12 

-3 

340757 

0 

000000 

2 

208688 

950321 

1 18314 

0 OOOOOO 

- 048568 

997200 

947660 

1 017734 

13 

-3 

340757 

0 

000000 

2 

209465 

94884 1 

078876 

0 OOOOOO 

- 032390 

998756 

947660 

1 019957 

14 

-3 

340757 

0 

000000 

2 

209869 

947955 

039438 

0 OOOOOO 

- 016198 

999689 

. 947660 

1 .021292 

15 

-3 

340757 

0 

000000 

2 

210078 

947660 

0 000000 

0.000000 

0 OOOOOO 

1 OOOOOO 

.947660 

1 021737 

L 


X 


Y 


Z 

R/RREE 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

412769 

0 

000000 

0 

000000 

943990 

337579 

0 OOOOOO 

0 OOOOOO 

977208 

922475 

1 OOOOOO 

2 

-2 412769 

0 

000000 


880355 

94 3990 

337579 

0 OOOOOO 

- 066747 

977208 

922475 

1 OOOOOO 

3 

-2 

4 1 2769 

0 

000000 

1 

336987 

943990 

337579 

0 OOOOOO 

- 101368 

977208 

922475 

1 OOOOOO 

4 

•2 

412769 

0 

000000 

1 

573839 

943990 

337579 

0 OOOOOO 

- 1 19325 

977208 

922475 

1 OOOOOO 

5 

-2 

412769 

0 

000000 

1 

69669 1 

943990 

337579 

0 OOOOOO 

- 1 28640 

977208 

.922475 

1 OOOOOO 

6 

-2 

412769 

0 

000000 

1 

760414 

943990 

337579 

0 OOOOOO 

- 133471 

977208 

922475 

1 OOOOOO 

7 

-2 

412769 

0 

000000 

1 

793467 

943990 

337579 

0 OOOOOO 

- 1 35977 

977208 

.922475 

1 OOOOOO 

8 

-2 

412769 

0 

OOOC^ 7 

1 

81061 1 

943990 

337579 

0 OOOOOO 

-.137277 

977208 

.922475 

1 OOOOOO 

9 

-2 

412769 

0 

000000 

1 

819503 

938185 

289354 

0 OOOOOO 

- 118244 

.983255 

922475 

1 008674 

10 

-2 

412769 

0 

000000 

1 

824116 

933328 

241128 

0 OOOOOO 

- 098786 

988371 

922475 

1 016030 

11 

-2 

412769 

0 000000 

1 

826508 

929392 

192903 

0 OOOOOO 

- 079133 

992558 

922475 

1 022060 

12 

-2 

412769 

0 000000 

1 

827749 

926353 

144677 

0 OOOOOO 

- 059390 

995814 

922475 

1 .026757 

13 

-2 412769 

0 

000000 

1 

828393 

924194 

096451 

0 OOOOOO 

- 039607 

998139 

922475 

1 0301 15 

14 

-2 

412769 

0 

000000 

1 

828727 

922904 

048226 

0 OOOOOO 

- 019807 

999535 

922475 

1 032132 


9 


J« 7 K« I 


J* 9 K» I 


Jt 10 Ks I 


15 

-2 412769 

0 000000 

* 

828900 

922475 

0 000000 

0 000000 

0 oooooo 

I OOOOOO 

922475 

1 032805 

L 


X 


Y 


z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 1 

855976 

0 

000000 

0 

000000 

924597 

392888 

0 000000 

0 oooooo 

969128 

896053 

1 OOOOOO 

2 

•.1 

855976 

0 

000000 


770265 

924597 

392888 

0 000000 

- 077682 

969128 

896053 

1 OOOOOO 

3 


855976 

0 000000 

1 

169795 

924597 

392888 

0 000000 

- 117976 

969128 

896053 

1 OOOOOO 

4 

. ] 

855976 

0 

000000 


377027 

924597 

392688 

0 000000 

- 138875 

969128 

896053 

I OOOOOO 

5 

] 

855976 

0 000000 

1 

484617 

924597 

392888 

0 000000 

- 149716 

969128 

896053 

1 OOOOOO 

6 

• 1 

855976 

0 

000000 

1 

540271 

924597 

392888 

0 000000 

- 155339 

969128 

896053 

1 OOOOOO 

7 

. ] 

855976 

0 

000000 

t 

569191 

924597 

392688 

0 000000 

- 158255 

969128 

896053 

1 OOOOOO 

8 

. ) 

855976 

0 

000000 

1 

584191 

924597 

392888 

0 000000 

- 159768 

969128 

896053 

I OOOOOO 

9 


855976 

0 

000000 

1 

591971 

916849 

336761 

0 000000 

- 1 3761 7 

977318 

896053 

1 011852 

10 

-1 

855976 

0 000000 

1 

596007 

910393 

280634 

0 000000 

- 114971 

984249 

896053 

1 021912 

II 

- 1 

855976 • 

0 

000000 

1 

598100 

905178 

224508 

0 000000 

- 092098 

989919 

896053 

1 030164 

12 

. 1 

855976 

0 

000000 

1 

599186 

901 163 

1 63381 

0 000000 

- 069120 

994330 

896053 

1 036595 

13 

. ] 

855976 

0 

000000 

1 

599749 

898317 

1 12254 

0 000000 

- 046096 

997480 

896053 

1 041 196 

14 

. i 

855976 

0 

000000 

1 

600041 

896618 

056127 

0 000000 

- 023052 

999370 

896053 

1 043959 

15 

- I 

855976 

0 

000000 

i 

600 1 93 

396053 

0 000000 

0 000000 

0 OOOOOO 

1 OOOOOO 

896053 

I 044880 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-I 

391932 

0 

000000 

0 

000000 

898460 

457848 

0 000000 

0 OOOOOO 

958075 

860792 

1 OOOOOO 

2 

-1 

391982 

0 

000000 


678523 

898460 

457848 

0 000000 

- 090526 

958075 

860792 

1 OOOOOO 

3 

-1 

391982 

0 

000000 

I 

030463 

898460 

457848 

0 000000 

- 137482 

958075 

860792 

I OOOOOO 

4 

-i 

391982 

0 

000000 

1 

213018 

898460 

457848 

0 ooocoo 

- 161837 

958075 

860792 

1 OOOOOO 

5 

-1 

391982 

0 

000000 

1 

307706 

893460 

457848 

0 000000 

- 174470 

958075 

860792 

I OOOOOO 

6 

-! 

391982 

0 

OOOOOQ 

1 

356819 

898460 

457848 

0 000000 

- 181022 

958075 

860792 

I OOOOOO 

7 

-1 

391982 

0 

000000 

1 

382294 

898460 

45 7848 

0 000000 

- 184421 

958075 

860792 

I oooooo 

8 

-1 

39 1 982 

0 

000000 

1 

395508 

898460 

457848 

0 000000 

- 186184 

953075 

860792 

1 oooooo 

9 

•1 

391982 

0 

000000 

1 

40236! 

888149 

392442 

0 000000 

- 160370 

969198 

860792 

I 016291 

10 

-1 

391982 

0 

000000 

I 

405316 

879607 

327035 

0 000000 

- 133981 

976610 

860792 

I 030135 

II 


391982 

0 

000000 

1 

407760 

872740 

261628 

0 000000 

- 107325 

986310 

860792 

1 041501 

12 

-1 

391982 

0 

000000 

t 

408717 

867472 

19C22I 

0 000000 

- 080548 

992299 

860792 

1 050366 

13 

• 1 

391982 

0 

000000 

1 

409213 

863748 

130814 

0 000000 

- 053718 

996578 

860792 

1 056711 

14 


391982 

0 

000000 

J 

409470 

861529 

065407 

0 000000 

- 026864 

999144 

860792 

1 060523 

15 

-I 

391982 

0 

000000 

1 

409604 

860792 

0 000000 

0 000000 

0 OOOOOO 

1 OOOOOO 

860792 

1 061795 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

y/APEF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 


1 1 3586 

0 

000000 

0 

000000 

874172 

5)1713 

0 000000 

0 OOOOOO 

947630 

828392 

1 OOOOOO 

2 


1 1 3586 

0 

000000 


623478 

874 1 72 

51 1713 

0 000000 

- 101177 

947630 

828392 

1 OOOOOO 

3 

. ! 

1 1 3586 

0 

000000 


946871 

874172 

511713 

0 000000 

- 153656 

947630 

828392 

1 OOOOOO 

4 

- 1 

1 1 3586 

0 

000000 

t 

1 14613 

874 1 72 

51 1713 

0 000000 

- 180877 

947630 

828392 

1 OOOOOO 

5 

- } 

1 1 3586 

0 

000000 

I 

201618 

874172 

511713 

0 000000 

- 194996 

947630 

828392 

1 oooooo 

6 

- 1 

1 1 3586 

0 

000000 

1 

246748 

874172 

51I7I3 

0 oooooo 

- 202319 

947630 

828392 

1 oooooo 

7 


1 1 3586 

0 

000000 

1 

270156 

874172 

511713 

0 oooooo 

- 206II8 

947630 

828392 

I oooooo 

8 


1 1 3586 

0 

000000 

! 

282298 

874172 

511713 

0 oooooo 

- 208088 

947630 

828392 

1 oooooo 

9 

- { 

1 1 3586 

0 

000000 

} 

288595 

861540 

43861 1 

0 oooooo 

- 179237 

961524 

828392 

I 020587 

10 

- 1 

1 1 3586 

0 

000000 

1 

291862 

85 II 33 

365509 

0 oooooo 

- 149743 

973281 

828392 

1 038100 

II 

. ] 

1 13586 

0 

000000 

1 

293556 

842804 

292407 

0 oooooo 

- 1 19952 

982900 

828392 

1 052491 

12 

- { 

1 1 3586 

0 

000000 

1 

294435 

836437 

219306 

0 oooooo 

- 090025 

990381 

828392 

1 063724 

13 

- ] 

1 1 3586 

0 000000 

1 

294891 

831948 

146204 

0 oooooo 

- 060038 

935725 

828392 

1 071768 

14 

. ] 

1 1 3586 

0 

000000 

1 

295127 

829278 

073102 

0 oooooo 

- 030024 

998931 

828392 

I 076603 

15 

• 1 

1 1 3586 

0 000000 

I 

295250 

828392 

0 000000 

0 oooooo 

--0 OOOOOO 

I OOOOOO 

828392 

1 078216 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

y/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- 

881589 

0 

000000 

0 

000000 

844754 

571215 

0 oooooo 

0 OOOOOO 

934743 

789627 

I OOOOOO 

2 

- 

881589 

0 000000 


577608 

844754 

57I2I5 

0 oooooo 

- II07I3 

934743 

789627 

1 OOOOOO 

3 

- 

88 1 589 

0 

000000 


877208 

844754 

57I2I5 

0 oooooo 

- 168139 

934743 

789627 

I OOOOOO 

4 

- 

881589 

0 

000000 

I 

032608 

844754 

57I2I5 

0 oooooo 

- 197926 

934743 

789627 

1 OOOOOO 

5 

- 

881589 

0 

000000 

I 

113213 

844754 

571215 

0 oooooo 

- 213376 

934743 

789627 

I OOOOOO 

6 

- 

881589 

0 

000000 

! 

155022 

844754 

57I2I5 

0 oooooo 

- 221389 

934743 

789627 

1 OOOOOO 

7 

- 

881589 

0 

000000 

1 

176708 

844754 

5ZI2I5 

0 oooooo 

- 225546 

934743 

789627 

1 OOOOOO 

8 

- 

881589 

0 

000000 

I 

187956 

844754 

571215 

0 oooooo 

- 227702 

934743 

789627 

1 OOOOOO 

9 

- 

881589 

0 

000000 

1 

193790 

829392 

489613 

0 oooooo 

- 196)32 

952056 

789627 

1 026026 

10 

- 

881589 

0 

000000 

1 

196817 

816823 

40801 1 

0 oooooo 

- 163857 

966705 

789627 

1 048197 

II 

- 

881589 

0 

000000 

! 

198386 

806819 

326409 

0 oooooo 

- 1 31258 

978691 

789627 

I 066437 


12 


881589 

0 000000 

) 

199201 

799207 

244807 

0 000000 

- 098510 

988014 

789627 

I 

080686 

13 

• 

881589 

0 

000000 

i 

199623 

793856 

163204 

0 000000 

- 065697 

994673 

789627 

1 

090896 

14 

. 

881589 

0 

000000 

1 

199842 

790680 

081602 

0 000000 

- 032854 

998668 

789627 

1 

097036 

15 

- 

881589 

0 000000 

1 

199955 

789627 

0 000000 

0 000000 

0 oooooo 

1 OOOOOO 

789627 

I 

099085 

L 


X 


Y 


z 

R/RREF 

0/APEF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 


649592 

0 

000000 

0 

000000 

801045 

651583 

0 000000 

0 oooooo 

915088 

733027 


OOOOOO 

2 


649592 

0 

000000 


533547 

801045 

651583 

0 000000 

- 105368 

915088 

. 733027 


OOOOOO 

3 


649592 

0 

000000 


810293 

801045 

651583 

0 000000 

- 160021 

915088 

. 733027 


OOOOOO 

4 


649592 

0 

000000 


953839 

801045 

651583 

0 000000 

- 188370 

915088 

733027 


OOOOOO 

5 


649592 

0 

000000 

1 

029295 

801045 

651583 

0 000000 

- 203074 

915088 

. 733027 


OOOOOO 

6 


649592 

0 

000000 

1 

066915 

801045 

651583 

0 000000 

- 210701 

915088 

733027 


oooooo 

7 


649592 

0 000000 

1 

086947 

801045 

651583 

0 oooooo 

- 214657 

915088 

733027 


oooooo 

8 


649592 

0 

000000 

1 

097337 

801045 

651583 

0 oooooo 

- 216708 

915088 

733027 


oooooo 

9 


649592 

0 

000000 

1 

102726 

781799 

556499 

0 oooooo 

- 186662 

937616 

733027 


034634 

10 


649592 

0 

000000 

1 

105522 

766222 

465416 

0 oooooo 

- 155946 

956678 

733027 


064201 

11 


649592 

0 

000000 

1 

106972 

753931 

372333 

0 oooooo 

- 124921 

972274 

733027 


088569 

12 


649592 

0 

000000 

1 

107724 

744641 

279250 

0 oooooo 

- 093754 

984404 

733027 


107630 

13 


649592 

0 

000000 

1 

1081 14 

738144 

186166 

0 oooooo 

- 062525 

993068 

733027 


121303 

14 


649592 

0 

000000 

1 

108316 

734300 

093083 

0 oooooo 

- 031268 

998267 

733027 


129529 

15 


649592 

0 

000000 

1 

108421 

733027 

0 000000 

0 oooooo 

0 OOOOOO 

1 OOOOOO 

733027 


132275 

L 


X 


T 


Z 

P/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 


4 1 7595 

0 

000000 

0 

000000 

747803 

740757 

0 oooooo 

0 OOOOOO 

890256 

665736 

I 

OOOOOO 

2 


4 1 7595 

0 

000000 


502575 

747803 

740757 

0 oooooo 

- 076688 

890256 

665736 

1 

OOOOOO 

3 


4 1 7595 

0 

000000 


763256 

747603 

740757 

0 oooooo 

- 116465 

890256 

665736 

1 

OOOOOO 

4 


4 1 7595 

0 000000 


898469 

747803 

740757 

0 oooooo 

- 137097 

890256 

665736 

1 

OOOOOO 

5 


4 1 7595 

0 

000000 


968603 

747803 

740757 

0 oooooo 

- 147799 

890256 

665736 

1 

OOOOOO 

6 


4 1 7595 

0 

000000 

1 

004981 

747803 

740757 

0 oooooo 

- 153349 

890256 

665736 

1 

OOOOOO 

7 


4 1 7595 

0 

000000 

1 

023850 

747803 

740757 

0 oooooo 

- 156229 

890256 

665736 

I 

OOOOOO 

8 


4 1 7595 

0 

000000 

1 

033637 

747803 

740757 

0 oooooo 

- 157722 

890256 

665736 

1 

OOOOOO 

9 


417595 

0 

000000 

1 

038714 

724121 

634934 

0 oooooo 

- 135854 

919372 

665736 

1 

046085 

10 


417595 

0 

000000 

1 

04 1 347 

705223 

529112 

0 oooooo 

- 113499 

944008 

665736 

I 

085538 

1 1 


4 1 7595 

0 

000000 

1 

042713 

690479 

423290 

0 oooooo 

- 090918 

964165 

665736 

I 

118127 

12 


417595 

0 

000000 

1 

043421 

679431 

317467 

0 oooooo 

- 068235 

979843 

665736 

1 

143663 

13 


4 1 7595 

0 

000000 

1 

043788 

67 1 754 

211645 

0 oooooo 

- 045506 

991041 

665736 

1 

162004 

14 


417595 

0 

000000 

1 

043979 

667230 

105822 

0 oooooo 

- 022757 

997760 

665736 

1 

173048 

15 


4 1 7595 

0 

000000 

1 

044078 

665736 

0 000000 

0 oooooo 

0 OOOOOO 

1 OOOOOO 

665736 

1 

176736 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 


185598 

0 

000000 

0 

000000 

687354 

834445 

0 oooooo 

0 OOOOOO 

860740 

591634 


OOOOOO 

2 


185598 

0 

000000 


48551 1 

687354 

834445 

0 oooooo 

- 042397 

860740 

591634 


OOOOOO 

3 


185598 

0 

000000 


737342 

687354 

834445 

0 oooooo 

- 064387 

860740 

591634 


OOOOOO 

4 


185598 

0 

000000 


867964 

687354 

834445 

0 oooooo 

- 075794 

860740 

591634 


OOOOOO 

5 


185598 

0 

000000 


935717 

687354 

834445 

0 oooooo 

- 081710 

860740 

591634 


OOOOOO 

6 


185598 

0 

000000 


970350 

687354 

834445 

0 oooooo 

- 084779 

860740 

591634 


OOOOOO 

7 


185598 

0 

000000 


989088 

687354 

834445 

0 oooooo 

- 086371 

860740 

591634 


OOOOOO 

8 


185598 

0 

000000 


998543 

687354 

834445 

0 oooooo 

- 087197 

860740 

591634 


OOOOOO 

9 

- 

185598 

0 

000000 

1 

003447 

659064 

715238 

0 oooooo 

- 075107 

897687 

591634 


060605 

10 


185598 

0 

000000 

1 

005991 

636885 

596032 

0 oooooo 

- 062748 

928949 

591634 


112673 

1 1 


185598 

0 

000000 

1 

007310 

619818 

476825 

0 oooooo 

- 050264 

954527 

591634 


155800 

12 

- 

185598 

0 

000000 

I 

007995 

607164 

357619 

0 oooooo 

- 037724 

974422 

591634 


189665 

13 

- 

185598 

0 

000000 

1 

008350 

598437 

238413 

0 oooooo 

- 025158 

988632 

591634 


214024 

14 

- 

185598 

0 

000000 

1 

008534 

593320 

1 19206 

0 oooooo 

- 012581 

997158 

591634 


228707 

15 

- 

185598 

0 

000000 

1 

008629 

591634 

0 000000 

0 'OOOOOO 

0 OOOOOO 

1 OOOOOO 

591634 


233613 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 

000000 

0 

000000 

0 

000000 

633938 

912871 

0 OOOOOO 

0 OOOOOO 

833333 

528282 

I 

OOOOOO 

2 

0 

000000 

0 

000000 


481357 

633938 

912871 

0 OOOOOO 

- 008290 

833333 

528282 

1 

OOOOOO 

3 

0 

000000 

0 

000000 


731034 

633938 

912871 

0 OOOOOO 

- 012589 

833333 

528282 

1 

OOOOOO 

4 

0 000000 

0 

000000 


860538 

633938 

912871 

0 oooooo 

- 014820 

833333 

528282 

1 

OOOOOO 

5 

0 

000000 

0 

000000 


927712 

633938 

91287 1 

0 oooooo 

- 015977 

833333 

528282 

t 

OOOOOO 

6 

0 

000000 

0 

000000 


962554 

633938 

912871 

0 oooooo 

- 016577 

833333 

528282 

1 

OOOOOO 

7 

0 

000000 

0 

000000 


980626 

633938 

912871 

0 oooooo 

- 016888 

833333 

528282 

1 

oooooo 

8 

0 000000 

0 

000000 


990000 

633938 

912871 

0 oooooo 

- 017049 

833333 

528282 

1 

OOOOOO 


J* 15 K. 


J* 16 K* 


J« 17 K» 


J« 18 K. 


9 

0 000000 

0 000000 

994862 

601996 

782461 

0 OOOOOO 

- 014685 

877551 

528282 

1 075066 

10 

0 000000 

0 000000 

997384 

577379 

652051 

0 OOOOOO 

- 012269 

914966 

528282 

1 139779 

II 

0 000000 

0 

000000 

998692 

558686 

521641 

0 OOOOOO 

- 009828 

945578 

528282 

1 193521 

12 

0 000000 

0 

000000 

999371 

544964 

391230 

0 OOOOOO 

- 007376 

969383 

528282 

1 235806 

13 

0 000000 

0 

000000 

999723 

535568 

260820 

0 OOOOOO 

- 004919 

986395 

528282 

1 266265 

14 

0 000000 

0 

000000 

999905 

530085 

I304I0 

0 OOOOOO 

- 002460 

996599 

528282 

1 284642 

15 

0 000000 

0 

000000 

1 oooooo 

528282 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

i OOOOOO 

528282 

1 290785 

L 

X 


Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/F>REF 

ENT 

I 

139198 

0 

000000 

0 oooooo 

605042 

954132 

0 OOOOOO 

0 oooooo 

817926 

494880 

1 OOOOOO 

2 

I39I98 

0 

000000 

482562 

605042 

954132 

0 oooooo 

009103 

817926 

. 494880 

1 OOOOOO 

3 

139198 

0 

000000 

732863 

605042 

954132 

0 oooooo 

013825 

817926 

494880 

1 OOOOOO 

4 

139198 

0 

000000 

862692 

605042 

954132 

0 oooooo 

016274 

817926 

494880 

1 OOOOOO 

5 

139198 

0 

000000 

930033 

605042 

954132 

0 oooooo 

017545 

8 17926 

494880 

1 OOOOOO 

6 

139758 

0 

oooooo 

964962 

605042 

954 1 32 

0 oooooo 

018204 

817926 

494880 

1 OOOOOO 

7 

139198 

0 

000000 

983080 

605042 

954132 

0 oooooo 

018545 

817926 

494880 

1 OOOOOO 

8 

139198 

0 

oooooo 

.992477 

605042 

954 1 32 

0 oooooo 

018723 

817926 

494880 

1 OOOOOO 

9 

. 139198 

0 

oooooo 

997351 

571302 

817827 

0 oooooo 

016127 

866232 

494880 

1 083647 

10 

■.39198 

0 

oooooo 

999880 

545559 

681523 

0 oooooo 

013473 

907105 

494880 

I 155902 

II 

139198 

0 

oooooo 

1 001 191 

526162 

545218 

0 oooooo 

010793 

940547 

494880 

1 21 5998 

12 

139198 

0 

oooooo 

1 001871 

512002 

408914 

0 oooooo 

008100 

966558 

494880 

I 263337 

13 

139198 

0 

oooooo 

1 002224 

502346 

272609 

0 oooooo 

005402 

985137 

494880 

I 297464 

14 

139198 

0 

oooooo 

I 002407 

496726 

1 36305 

0 oooooo 

002701 

996284 

494880 

1 318064 

15 

1 391 98 

0 

oooooo 

1 002502 

494880 

0 OOOOOO 

0 oooooo 

0 oooooo 

I OOOOOO 

494880 

I 324952 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

1 

324796 

0 

oooooo 

0 OOOOOO 

587148 

979379 

0 oooooo 

0 oooooo 

808163 

474512 

1 OOOOOO 

2 

.324796 

0 

oooooo 

484456 

587148 

979379 

0 oooooo 

009997 

808163 

474512 

1 OOOOOO 

3 

324 796 

0 

oooooo 

735740 

587148 

979379 

0 oooooo 

015182 

803163 

474512 

1 OOOOOO 

4 

324796 

0 

oooooo 

866078 

587148 

979379 

0 oooooo 

017872 

808163 

474512 

1 OOOOOO 

5 

324796 

0 

oooooo 

933684 

537148 

979379 

0 oooooo 

019267 

808163 

.474512 

1 OOOOOO 

6 

324796 

0 

oooooo 

968750 

587148 

979379 

0 oooooo 

019990 

808163 

474512 

1 OOOOOO 

7 

324796 

0 

oooooo 

986939 

587148 

979379 

0 oooooo 

020366 

808163 

474512 

1 OOOOOO 

8 

324796 

0 

oooooo 

996373 

587148 

979379 

0 oooooo 

020560 

. 808163 

474512 

1 OOOOOO 

9 

,324796 

0 

oooooo 

1 001267 

552362 

839468 

0 oooooo . 

017710 

859059 

474512 

1 089264 

10 

. 324796 

0 

oooooo 

I 003305 

525994 

699557 

0 oooooo 

014796 

9021 24 

474512 

1 166471 

n 

324796 

0 

oooooo 

1 005122 

506222 

559645 

0 oooooo 

011852 

937359 

474512 

I 230750 

12 

. 324796 

0 

oooooo 

1 005805 

491842 

419734 

0 oooooo 

008895 

964765 

474512 

1 281419 

13 

324796 

0 

oooooo 

1 006159 

48206! 

279323 

0 oooooo 

005932 

984340 

474512 

1 317966 

14 

324796 

0 

oooooo 

1 005342 

476377 

13991 1 

0 oooooo 

002967 

996085 

474512 

1 340035 

15 

324796 

0 

oooooo 

1 006438 

474512 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

I OOOOOO 

474512 

1 347415 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

w/ahef 

T/TREF 

P/PREF 

ENT 

1 

603192 

0 

oooooo 

0 OOOOOO 

568850 

1 005005 

0 oooooo 

0 OOOOOO 

797993 

453938 

1 OOOOOO 

2 

603192 

0 

oooooo 

487298 

568850 

1 005005 

0 oooooo 

010258 

797993 

453938 

1 OOOOOO 

3 

603192 

0 

oooooo 

740055 

568850 

1 005005 

0 oooooo 

015579 

797993 

453938 

I OOOOOO 

4 

603192 

0 

oooooo 

87! 159 

568850 

1 005005 

0 oooooo 

018339 

797993 

453938 

1 OOOOOO 

5 

603192 

0 

oooooo 

939161 

568850 

I 005005 

0 oooooo 

019771 

797993 

453938 

1 OOOOOO 

6 

603192 

0 

oooooo 

974433 

568850 

I 005005 

0 oooooo 

020513 

797993 

453938 

1 OOOOOO 

7 

603192 

0 

oooooo 

992728 

568850 

1 005005 

0 oooooo 

020899 

797993 

453938 

1 OOOOOO 

8 

603192 

0 

oooooo 

I 002218 

568850 

1 005005 

0 oooooo 

021098 

797993 

453938 

1 OOOOOO 

9 

603192 

0 

oooooo 

1 007140 

533050 

861433 

0 oooooo 

018173 

851587 

453938 

1 095271 

10 

603192 

0 

oooooo 

I 009693 

506099 

717861 

0 oooooo 

015183 

896935 

453938 

1 177787 

II 

603192 

0 

oooooo 

1 01 1017 

485995 

574289 

0 oooooo 

012162 

934038 

453938 

1 246557 

12 

603192 

0 

oooooo 

1 011704 

471430 

430717 

0 oooooo 

009128 

962897 

453938 

1 300807 

13 

603192 

0 

oooooo 

1 012061 

461549 

287144 

0 oooooo 

006087 

983510 

453938 

1 339959 

14 

603192 

0 

oooooo 

I 012245 

455817 

143572 

0 oooooo 

003044 

995877 

453938 

1 363608 

15 

603192 

0 

oooooo 

1 012341 

453938 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

I OOOOOO 

453938 

1 371518 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

1 206385 

0 

oooooo 

0 OOOOOO 

640822 

1 043966 

0 oooooo 

0 OOOOOO 

782027 

422937 

1 OOOOOO 

2 

I 206385 

0 

oooooo 

493455 

540822 

1 043966 

0 oooooo 

010656 

782027 

422937 

1 OOOOOO 

3 

I 206385 

0 

oooooo 

749406 

540822 

I 043966 

0 oooooo 

016183 

782027 

422937 

1 OOOOOO 

4 

1 206385 

0 

oooooo 

882166 

540322 

I 043966 

0 oooooo 

019050 

782027 

422937 

1 OOOOOO 

5 

1 206385 

0 

oooooo 

951027 

540822 

I 043966 

0 oooooo 

020537 

782027 

422937 

1 OOOOOO 



6 1.206385 0000000 986745 540822 

7 1 206385 0000000 I 005271 640822 

8 1.206385 0000000 1 014881 540822 

9 1 206385 0 000000 1 019865 503583 

10 1 206385 0 000000 1 022451 475858 

1 1 1 206385 0 000000 1 023792 455346 

12 1 206385 0 000000 1 024487 440576 

13 1 206385 0 000000 I 024848 430599 

14 1 206385 0000000 1 025035 424827 

15 1.206335 0000000 1 025132 422937 

J. 19 K» 1 L X Y Z R/RREF 

1 1 809577 0 000000 0 000000 619521 

2 1 809577 0.000000 499612 619521 

3 1 809577 0 000000 758757 619521 

4 1809577 0000000 893173 519521 

5 1 809577 0 000000 962893 519521 

6 1809577 0000000 999057 519521 

7 1 809577 0 000000 1 017814 519521 

8 1 809577 0 000000 1 027544 519521 

9 I 809577 0 000000 1 032590 481285 

10 1 809577 0 000000 I 035208 453070 

11 I 809577 0 000000 1 036566 432333 

12 1 809577 0 000000 I 037270 417471 

13 1 809577 0 000000 1 037635 407466 

14 1 809577 0 000000 1 037825 401690 

15 1 809577 0 000000 1 037323 399801 

J» 20 K« 1 L X Y Z R/RREF 

1 2 366370 0 000000 0 000000 503032 

2 2 366370 0 000000 505295 503032 

3 2 366370 0 000000 767388 503032 

4 2 366370 0 000000 903333 503032 

5 2 366370 0 000000 973847 503032 

6 2 366370 0 000000 1 010422 503032 

7 2 366370 0 000000 1 029393 503032 

8 2 366370 0 000000 I 039233 503032 

9 2 366370 0 000000 1 044337 464085 

10 2 366370 0 000000 1 046984 435551 

• 112 366370 0 000000 1 043357 4 1 4690 

12 2 366370 0 000000 1 049070 399796 

13 2 366370 0 000000 I 049439 389796 

14 2 366370 0 000000 1 049631 384033 

15 2 366370 0 000000 I 049730 382150 

J. 21 K* 1 L X Y Z R/RREF 

1 3 108760 0 000000 0 000000 484093 

2 3 108760 0 000000 512873 484093 

3 3 108760 0 000000 .778896 484093 

4 3 108760 0 000000 916880 484093 

5 3 108760 0 000000 988451 434093 

6 3 108760 0 000000 1 025575 484093 

7 3 108760 0 000000 1 044830 484093 

8 3 108760 0 000000 1 054818 484093 

9 3 108760 0 000000 1 059999 444397 

10 3 108760 0 000000 1 062686 415564 

11 3108760 0000000 1064080 394615 

12 3 108760 0 000000 I 064802 379727 

13 3 108760 0 000000 I 065177 369763 

14 3 108760 0 000000 I 065372 364031 

15 3 108760 0 000000 1 065473 362160 

J* 22 K« 1 L X Y Z R/RREF 

1 3 758352 0 000000 0 000000 469525 

2 3 758352 0 000000 519504 469525 


I 043966 

0 000000 

021309 

782027 

422937 

1 OOOOOO 

I 043966 

0 000000 

021709 

782027 

422937 

1 OOOOOO 

I 043966 

0 000000 

02I9I6 

782027 

422937 

1 OOOOOO 

894828 

0 000000 

018878 

839856 

422937 

1 105037 

745690 

0 000000 

015771 

883789 

422937 

1 196212 

596552 

0 000000 

012634 

928825 

422937 

1 272323 

447414 

0 000000 

009482 

959964 

422937 

1 332437 

298276 

0 000000 

006323 

982206 

422937 

I 375858 

1491 38 

0 000000 

003162 

995552 

422937 

1 402100 

0 000000 

0 000000 

0 OOOOOO 

1 OOOOOO 

422937 

1 410879 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 07341 1 

0 000000 

0 OOOOOO 

769558 

399801 

1 OOOOOO 

1 073411 

0 000000 

010957 

769558 

399801 

1 OOOOOO 

I 073411 

0 000000 

016640 

769558 

399801 

1 OOOOOO 

I 07341 1 

0 000000 

019588 

769558 

399801 

1 OOOOOO 

1 07341 1 

0 000000 

021117 

769553 

399801 

1 OOOOOO 

1 073411 

0 000000 

02I9I0 

769558 

399801 

I OOOOOO 

1 073411 

0 000000 

022321 

769558 

399801 

1 OOOOOO 

I 073411 

0 000000 

022534 

769558 

399801 

1 OOOOOO 

920067 

0 000000 

0I94I0 

830695 

399801 

1 112963 

766722 

0 000000 

016216 

882427 

399801 

1 211192 

613378 

0 000000 

012990 

924754 

399801 

1 293298 

460033 

0 000000 

009749 

957674 

399801 

1 358210 

306689 

0 oooooO 

006502 

981 188 

399801 

1 405127 

153344 

0 OOOOOO 

003251 

995297 

399801 

1 433495 

0 000000 

0 OOOOOO 

0 OOOOOO 

I OOOOOO 

399801 

1 442987 

U/AREF 

v/aref 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 096145 

0 OOOOOO 

0 OOOOOO 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

- 01II89 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

016992 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

020003 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

021564 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

022374 

759693 

382150 

1 OOOOOO 

I 096145 

0 OOOOOO 

022794 

759693 

382150 

1 OOOOOO 

1 096145 

0 OOOOOO 

023012 

759693 

382150 

1 OOOOOO 

939553 

0 OOOOOO 

01 982 I 

823448 

382150 

I 1 19431 

78296 1 

0 OOOOOO 

016560 

877394 

382150 

1 223431 

626369 

0 OOOOOO 

013265 

921532 

382150 

1 310453 

469776 

0 OOOOOO 

009956 

955862 

382150 

I 379303 

3I3I84 

0 OOOOOO 

006639 

980383 

382150 

I 429094 

156592 

0 OOOOOO 

003320 

995096 

.382150 

1 . 459208 

0 000000 

0 OOOOOO 

0 OOOOOO 

I OOOOOO 

382150 

1 469287 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 122229 

0 OOOOOO 

0 OOOOOO 

743120 

362160 

1 OOOOOO 

1 122229 

0 OOOOOO 

01 1455 

748120 

362160 

1 OOOOOO 

I 122229 

0 OOOOOO 

017397 

748120 

.362160 

1 OOOOOO 

1 122229 

0 OOOOOO 

020479 

748120 

362160 

1 OOOOOO 

1 122229 

0 OOOOOO 

022077 

748120 

362160 

1 OOOOOO 

1 122229 

0 OOOOOO 

022906 

748120 

362160 

1 OOOOOO 

I 122229 

0 OOOOOO 

023336 

748120 

362160 

1 OOOOOO 

I 122229 

0 OOOOOO 

023559 

748120 

362160 

I OOOOOO 

96191 1 

0 OOOOOO 

020293 

814946 

362160 

1 127249 

801592 ■ 

0 OOOOOO 

016954 

871490 

362160 

1 238247 

641274 

0 .OOOOOO . 

- .013581 .. 

917754. 

-362160 

1 331240 

480955 

0 OOOOOO 

0I0I92 

953736 

362160 

1 404881 

320637 

0 OOOOOO 

006797 

979438 

362160 

1 458169 

160318 

0 OOOOOO 

003399 

994860 

362160 

1 490412 

0 000000 

0 OOOOOO 

0 OOOOOO 

I OOOOOO 

362160 

1 501205 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 142295 

0 OOOOOO 

0 OOOOOO 

739033 

346994 

1 OOOOOO 

I 142295 

0 OOOOOO 

01 1660 

739033 

346994 

1 OOOOOO 



3 

3 758352 

0 

OOOOOO 

. 788966 

469525 

4 

3 758352 

0 

OOOOOO 

928734 

469525 

5 

3 758352 

0 

OOOOOO 

1 001231 

469525 

6 

3 758352 

0 

OOOOOO 

1 038834 

469525 

7 

3 758352 

0 

OOOOOO 

1 058338 

469525 

8 

3 758352 

0 

OOOOOO 

1 066455 

469525 

9 

3 758352 

0 

OOOOOO 

1 073703 

429306 

to 

3 758352 

0 

OOOOOO 

1 076425 

400292 

1 1 

3 758352 

0 

OOOOOO 

1 077836 

379317 

12 

3 758352 

0 

OOOOOO 

I 078569 

364464 

13 

3 758352 

0 

OOOOOO 

1 078948 

354547 

14 

3 758352 

0 

OOOOOO 

! 079145 

343852 

15 

3 758352 

0 

OOOOOO 

1 079248 

346994 

L 

X 


Y 

Z 

R/RREF 

1 

4 222346 

0 

OOOOOO 

0 OOOOOO 

459995 

2 

4 222346 

0 

OOOOOO 

524240 

459995 

3 

4 222346 

0 

OOOOOO 

796159 

459995 

4 

4 222346 

0 

OOOOOO 

937201 

459995 

5 

4 222346 

0 

OOOOOO 

1 010358 

459995 

6 

4 222346 

0 

OOOOOO 

1 048305 

459995 

7 

4 222346 

0 

OOOOOO 

1 067987 

459995 

8 

4 222346 

0 

OOOOOO 

! 078196 

459995 

9 

4 222346 

0 

OOOOOO 

1 0S349I 

419458 

10 

4 222346 

0 

OOOOOO 

1 086238 

390350 

1 1 

4 222346 

0 

OOOOOO 

1 087663 

369378 

12 

4 222346 

0 

OOOOOO 

1 08S402 

354562 

13 

4 222346 

0 

OOOOOO 

I 088785 

344687 

14 

4 222346 

0 

OOOOOO 

1 088984 

33902! 

15 

4 222346 

0 

OOOOOO 

1 089087 

337174 


I 142295 
I 142295 
t 142295 
I 142295 
1 142295 
I 142295 
9791 10 
815925 
652740 
489555 
326370 
163185 
0 000000 

0/AREF 
1 155432 
1 155432 
I 155432 
I 155432 
I 155432 
I 155432 
1 155432 
I 155432 
990371 
825309 
660247 
495185 
330124 
165062 
0 OOOOOO 


0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 

V/AREF 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 


017708 
020845 
022472 
023316 
023754 
023981 
020656 
017257 
013824 
010375 
006919 
003460 
0 OOOOOO 

W/AREF 
0 OOOOOO 
011794 
0I79I 1 
021084 
022730 
023584 
024027 
024256 
020893 
017455 
013982 
010494 
006998 
003500 
0 OOOOOO 


739033 
. 739033 
.739033 
, 739033 
739033 
739033 
808269 
866853 
914786 
.952067 
978697 
994674 
1 OOOOOO 

T/TREF 
732995 
732995 
732995 
732995 
732995 
732995 
732995 
732995 
803833 
863773 
912815 
950958 
978204 
994551 
1 OOOOOO 


346994 
346994 
346994 
346994 
346994 
. 346994 
346994 
346994 
346994 
. 346994 
. 346994 
346994 
346994 

P/PREF 

337174 

337174 

337174 

337174 

337174 

.337174 

337174 

.337174 

337174 

337174 

337174 

337174 

337174 

.337174 

337174 


I OOOOOO 
I OOOOOO 
1 OOOOOO 
I OOOOOO 
1 OOOOOO 
1 OOOOOO 
1 1 33572 
1 250244 
1 348089 
1 425626 
I 481762 
1 515738 
1 5271 13 

ENT 

1 OOOOOO 
1 OOOOOO 
I OOOOOO 
I OOOOOO 
1 OOOOOO 
1 OOOOOO 
I OOOOOO 
I OOOOOO 
I 137865 
1 258398 
I 359547 
I 439741 
I 497819 
1 532979 
I 544751 


FINAL FLOWFIELD PRINTED OUTPUT FOR TEST CASE NO. 2 (RESULTS OF RESTART RUN) 


NC-500 TiHE« 112 2923 DT« 
GT«-3 1357E-06-7 26I2E-00 0 


3000E-00 MAXtMUH DElTAQ/Q»-9 064E-05AT J.K.L.N* 3. I.U. 2 
-4 4406£*01-3 26I4E-04 CW« 9 9721E-0I 


CURPENT FLOW AT NC« 500 AS WRITTEN TO RESTART FILE 


L 


X 


T 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7 

423905 

0 

000000 

0 oooooo 

972928 

23364 7 

0 

OOOOOO 

0 oooooo 

989082 

962305 

1 OOOOOO 

2 

-7 

423905 

0 

000000 

1 238146 

973457 

231334 

0 

OOOOOO 

0 oooooo 

989297 

963038 

1 OOOOOO 

3 

• 7 

423905 

0 

000000 

1 880363 

973972 

229060 

0 

OOOOOO 

0 oooooo 

989506 

963751 

1 OOOOOO 

4 

-7 

423905 

0 

000000 

2 213475 

973734 

2301 12 

0 

OOOOOO 

0 oooooo 

989410 

963422 

» OOOOOO 

0 

-7 

423905 

0 

000000 

2 366257 

973218 

232379 

0 

OOOOOO 

0 oooooo 

989200 

962707 

1 OOOOOO 

6 

-7 

423905 

0 

000000 

2 475878 

972770 

234333 

0 

oooooo 

0 oooooo 

989018 

962087 

1 OOOOOO 

7 

-7 

423905 

0 

ocoooo 

2 522364 

973697 

230278 

0 

OOOOOO 

0 oooooo 

989394 

963370 

1 OOOOOO 

8 

-7 

423905 

0 

000000 

2 546476 

977340 

213615 

0 

oooooo 

0 oooooo 

990874 

968421 

1 OOOOOO 

9 

-7 

423905 

0 

000000 

2 558982 

975670 

168460 

0 

oooooo 

0 oooooo 

994324 

970132 

1 004169 

10 

-7 

423905 

0 

000000 

2 565469 

974918 

III503 

0 

oooooo 

0 oooooo 

997513 

972493 

1 007701 

1 1 

-7 

423905 

0 

oocooo 

2 568834 

972277 

059507 

0 

oooooo 

0 oooooo 

999292 

971589 

1 010593 

12 

-7 

423905 

0 

009000 

2 570579 

968223 

027844 

0 

oooooo 

0 oooooo 

999845 

968073 

1 012844 

13 

-7 

423905 

0 

000000 

2 571484 

964690 

012237 

0 

oooooo 

0 oooooo 

999970 

964661 

1 014453 

14 

-7 

423905 

0 

000000 

2 571954 

962460 

004731 

0 

oooooo 

0 oooooo 

999996 

962456 

1 015418 

15 

-7 

423905 

0 

000000 

2 572197 

961708 

0 OOOOOO 

0 

oooooo 

0 oooooo 

I oooooo 

961708 

1 015740 

L 


X 


y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-6 

310319 

0 

000000 

0 OOOOOO 

974604 

233344 

0 

oooooo 

0 oooooo 

989798 

964661 

1 000035 

2 

-6 

3I03I9 

0 

000000 

1 238146 

976131 

230664 

0 

oooooo 

- 003279 

990386 

966746 

1 000003 

3 

-6 

310319 

0 

000000 

1 880363 

977602 

228133 

0 

oooooo 

- 003291 

990910 

968716 

999930 

4 

-6 

310319 

0 

000000 

2 213475 

977939 

229145 

0 

oooooo 

- 002075 

990941 

969080 

999823 

5 

-6 

310319 

0 

000000 

2 386257 

978629 

231069 

0 

000000 

- 001-345- 

- -991086 

969906 

999687 

$ 

-6 

310319 

0 

000000 

2 475878 

978629 

232977 

0 

oooooo 

- 000783 

990930 

969753 

999530 

7 

-6 

310319 

0 

000000 

2 522364 

978901 

229477 

0 

oooooo 

- 000530 

991151 

970238 

999641 

8 

•*•6 

310319 

0 

000000 

2 546476 

977764 

212653 

0 

oooooo 

- 000257 

991979 

969922 

1 000942 

9 

-6 

310319 

0 

oooooo 

2 558982 

975617 

169062 

0 OOOOOO 

- 000117 

994564 

970313 

I C04433 

10 

-6 

310319 

0 

000000 

2 565469 

973153 

1 1 1467 

0 

oooooo 

- 000037 

996710 

969952 

1 007619 

n 

-6 

310319 

0 

oooooo 

2 568834 

972408 

059457 

0 

oooooo 

- 000009 

997856 

970323 

! 009087 


12 -6 310319 0 000000 2 570579 

13 -6 310319 0 000000 2 57 U84 

14 -6 310319 0 000000 2 571954 

15 -6 310319 0 000000 2 572197 

J* 3 K« 1 L X Y 2 

1 -5 196733 0 000000 0 000000 

2 -5 196733 0 000000 1 238146 

3 -5 196733 0 000000 1 880363 

4 -5 196733 0 000000 2 213475 

5 -5 196733 0 000000 2 386257 

6 -5 196733 0 000000 2 475378 

7 -5 196733 0 000000 2 522364 

8 -5 196733 0 000000 2 546476 

9 -5 196733 0 000000 2 558982 

10 -5 196733 0 000000 2 565469 

11 -5 196733 -0000000 2568334 

12 -5 196733 0 000000 2 570579 

13 -5 196733 0 000000 2 571484 

14 -5 196733 0 000000 2 571954 

15 -5 196733 0 000000 2 572197 

J» 4 K« 1 L X Y Z 

1 -4 222346 0 000000 0 000000 

2 -4 222346 0 000000 1 238146 

3 -4 222346 0 000000 1 880363 

4 -4 222346 0 000000 2 213475 

5 -4 222346 0 000000 2 386257 

6 -4 222346 0 000000 2 475878 

7 -4 222346 0 000000 2 522364 

8 -4 222346 0 000000 2 546476 

9 -4 222346 0 000000 2 558982 

10 -4 222346 0 000000 2 565469 

11 -4 222346 0 000000 2 568334 

12 -4 222346 0 000000 2 570579 

13 -4 222346 0 000000 2 571484 

14 -4 222346 0000000 2571954 

15 -4 222346 0 000000 2 572197 

J* 5 K. 1 L X Y Z 

1 -3 340757 0 000000 0 000000 

2 -3 340757 0 000000 I 063838 

3 - 3 340757 0 000000 1 6.1 564 1 

4 -3 340757 0 000000 I 901857 

5 -3 340757 0 000000 2 050315 

6 -3 340757 0 000000 2 127319 

7 -3 340757 0 000000 2 167260 

8 -3 340757 0 000000 2 187977 

9 -3 340757 0 000000 2 193723 

10 -3 340757 0 000000 2 204297 

11 -3 340757 0 000000 2 207188 

12 -3 340757 0 000000 2 208688 

13 -3340757 0000000 2209465 

14 -3 340757 0 000000 2 209869 

15 -3 340757 0 OOOCOO 2 210078 

6 K> 1 L X Y Z 

1 -2 412769 0 000000 0 000000 

2 -2 412769 0 000000 880355 

3 -2 412769 0 000000 1 336987 

4 -2 412769 0 000000 1 573839 

5 -2 412769 0 000000 I 696691 

6 -2 412769 0 000000 I 760414 

7 -2 412769 0 000000 1 793467 

8 -2 412769 0 000000 1 8106! I 


971765 

027861 

0 000000 

- 000001 

998138 

969955 

1 009639 

972035 

012197 

0 000000 

- oooooo 

998240 

970324 

1 009630 

971649 

004699 

0 000000 

, oooooo 

998257 

969955 

1 009808 

972014 

0 000000 

0 000000 

0 oooooo 

998261 

970324 

1 009660 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT ; 

970735 

240096 

0 000000 

0 oooooo 

987987 

959074 

999795 

973304 

234307 

0 000000 

- 008701 

988939 

962538 

999701 

975446 

224648 

0 000000 

- 008979 

989652 

965352 

999542 

975352 

220124 

0 000000 

- 005749 

989450 

965062 

999376 

976322 

218853 

0 000000 

- 003433 

989702 

966267 

999234 

975830 

218763 

0 000000 

- 001875 

989425 

965511 

999156 

9761 18 

211010 

0 000000 

- 001014 

990083 

966437 

999702 

974166 

187696 

0 000000 

- 000416 

991186 

965579 

1 001618 

972695 

141726 

0 000000 

- 000139 

993586 

966456 

1 004650 

970443 

087057 

0 000000 

• 000027 

994994 

965585 

1 007007 

970543* 

042684 

0 000000 

- 000007 

995795 

966461 

I 007776 

969643 

018789 

0 000000 

- 000002 

995319 

965589 

1 008174 

970477 

007926 

0 000000 

- 000001 

995864 

966463 

1 007873 

969610 

003018 

0 000000 

- 000001 

995853 

965589 

I 008223 

970487 

0 000000 

0 000000 

0 oooooo 

995853 

966463 

1 007858 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

966854 

252 145 

0 000000 

0 oooooo 

9864 35 

953739 

999825 

971412 

242767 

0 oooooo 

- 025466 

988137 

959888 

999668 

977270 

223722 

0 oooooo 

- 036709 

990315 

967805 

999465 

978589 

209976 

0 oooooo 

- 03807? 

990778 

969564 

999393 

981165 

202666 

0 oooooo 

- 038358 

991750 

973071 

999322 

980809 

193959 

0 oooooo 

- 037823 

991708 

972677 

999425 

981764 

188984 

0 oooooo 

- 036116 

992828 

974722 

1 000164 

979526 

166415 

0 oooooo 

- 031811 

993845 

973497 

1 002102 

978764 

128862 

0 oooooo 

- 024722 

996222 

975067 

1 004813 

975904 

087060 

0 oooooo 

- 016767 

997641 

973602 

1 007422 

975961 

051562 

0 oooooo 

- 009985 

999102 

975085 

1 008873 

974068 

027231 

0 oooooo 

- 005291 

999519 

973599 

1 010079 

975320 

012716 

0 oooooo 

- 002476 

999755 

975081 

1 009799 

973807 

005022 

0 oooooo 

- 000980 

999784 

973597 

1 010455 

975283 

0 000000 

0 oooooo 

0 OOOOOO 

999793 

975081 

1 009853 

R/RREF 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

956940 

289534 

0 oooooo 

0 OOCMIOO 

983392 

941048 

I 000859 

962353 

280648 

u oooooo 

- 048 24 

985357 

948261 

1 000599 

970087 

261303 

0 oooooo 

- 074286 

988377 

958311 

t 000457 

971261 

244012 

0 oooooo 

- 082984 

9P9236 

960806 

I 000842 

974654 

233398 

0 oooooo 

- 087147 

990735 

965525 

1 001002 

973694 

227234 

0 oooooo 

- 088305 

99078! 

964718 
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758352 

0 

oooooo 

I 

077836 

364905 


291673 

0 oooooo 

006162 

946995 

345564 

1 417345 

12 

3 

758352 

0 

oooooo 

1 

078569 

361400 


147723 

0 oooooo 

003127 

956081 

345528 

1 436480 

13 

3 

758352 

0 

oooooo 

I 

078948 

3605 1 4 


069429 

0 oooooo 

001471 

958529 

345563 

1 441571 

14 

3 

758352 

0 

oooooo 

1 

079145 

360258 


027751 

0 oooooo 

000588 

959IU 

345527 

1 442859 

15 

3 

758352 

0 

oooooo 

1 

079243 

360253 

0 

OOOOOO 

0 oooooo 

0 OOOOOO 

959222 

345563 

! 443032 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

! 

4 

222346 

0 

oooooo 

0 

OOOOOO 

459347 


157112 

0 oooooo 

0 OOOOOO 

732683 

336556 

1 000138 

2 

4 

222346 

0 

OOC'OOO 


524240 

459246 

I 

157526 

0 oooooo 

01 1464 

732288 

336301 

999687 

3 

4 

222346 

0 

oooooo 


796159 

459596 

1 

159583 

0 oooooo 

017529 

731594 

336238 

998435 

4 

4 

222346 

0 

oooooo 


937201 

45979! 

1 

161814 

0 oooooo 

020694 

731167 

3.36184 

997682 

5 

4 

222346 

0 

oooooo 

1 

010358 

459353 

I 

161766 

0 oooooo 

022404 

731036 

336169 

997450 

6 

4 

222346 

0 

oooooo 

! 

048 305 

460298 


163202 

0 oooooo 

023173 

730265 

336139 

996012 

7 

4 

222346 

0 

oooooo 

1 

067937 

459776 

1 

163310 

0 oooooo 

023661 

731108 

336146 

997616 

8 

4 

222346 

0 

oooooo 

1 

078196 

445369 

1 

117201 

0 oooooo 

022891 

754716 

336127 

! 043027 

3 

4 

222346 

0 

oooooo 

1 

033491 

400673 


891051 

0 oooooo 

018603 

838936 

336140 

1 209519 

10 

4 

222346 

0 

oooooo 

I 

086238 

366412 


534961 

0 oooooo 

01 1267 

917336 

336123 

1 370694 

i 1 

4 

222346 

0 

oooooo 

1 

087663 

355042 


286107 

0 oooooo 

006046 

946756 

336138 

1 432604 

12 

4 

222346 

0 

oooooo 

I 

083402 

351773 


144832 

0 oooooo 

003066 

955507 

336122 

1 451204 

13 

4 

222346 

0 

oooooo 

I 

088785 

350925 


068.353 

0 oooooo 

001442 

957862 

336137 

! 456187 

14 

4 

222346 

0 

00CH3O0 

1 

088984 

350703 


027197 

0 oooooo 

0C0577 

958422 

336122 

1 457408 

15 

4 

222346 

0 

oooooo 

I 

089087 

350680 

0 

OOOOOO 

0 oooooo 

0 OOOOOO 

958529 

3^137 

1 457608 


generalized forces froh direct integration of wall surface stresses 

0 7 2612E*00 0 4 4406E-0I 3 2614E-04 


f 1 

FINAL PRINTED OUTPUT 

FOR TEST CASE 

NO. 3 

FLOWFIELD 

DATA AT 

STEP 500 


) i 


wTs^oo time:* 

16 51 15 01 

r> .5500E 

-01 MAXIMUK 

deltaq/q- 

5 248E-02AT J.K.L.N«I3. 

9. 9. 2 




GF« K8220E-02-7.ZI?7E-00-2, 

,2707E.ai - 

4 3906E-01- 

1 2344E-03 

CW. 9 7738E- 

•01 





J» 1 K» 

X 

Y 

Z 

,4/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/F>ReF 

ENT 

1 

-7.423905 

0.000000 

0 000000 

971593 

239387 

0 000000 

0 000000 

, 988539 

960457 

t. 000000 

2 

-7.423905 

0.000000 

! 238 1 46 

972041 

237476 

0 000000 

0 000000 

,988721 

961077 

I .000000 

3 

-7:423905 

0.000000 

, 1 8S0353 

973159 

232638 

0 000000 

0 000000 

.989176 

962625 

I 000000 

4 

-7 423905 

0 000000 

2 213475 

. 974497 

226720 

0 000000 

0 oocooo 

985720 

964479 

1 cooooo 

5 

-7 423905 

0 000000 

2 386257 

975792 

2208-42 

0 000000 

0 oocooo 

990246 

S66274 

I 000000 

6 

-7 423905 

0 000000 

2 475S78 

977258 

214005 

0 000000 

0 000000 

990840 

968307 

I 000000 

7 

-7 423905 

0 000000 

2 522364 

379256 

204326 

0 000000 

0 OOOGOO 

991650 

971079 

! 000000 

& 

-7 423905 

0 . 000000 

2 546476 

980755 

196759 

0 000000 

0 000000 

992257 

973161 

1 000000 

9 

-7 423905 

0 , 000000 

2 558932 

976595 

162769 

0 000000 

0 000000 

994701 

971420 

i 004169 

10 

-7 423905 

0 000000 

2 565469 

972383 

132717 

0 000000 

0 000000 

996477 

968962 

1 007701 

1 1 

-7 423905 

0 000000 

56BS3.1 

969435 

09B896 

0 000000 

0 000000 

998122 

967615 

1 010593 

12 

-7 423905 

0 000000 

7 570‘i?9 



0 000000 

0 OOOGOO 

99-320 1 

9C6I63 

I 012844 

13 

-7 423905 

0 000000 

2 571484 

364320 

■ 030290 

0 000000 

0 000000 

9998 1 7 

964144 

T 014453 

1 4 

-7 423905 

0 000000 

2 571954 

962403 

011852 

0 ocoooo 

0 000000 

999972 

962376 

1 015418 

’5 

-7 423905 

0 000000 

2 572197 

961708 

0 000000 

0 000000 

0 000000 ! 

000000 

961708 

t 015740 

J» ! K« 2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7 423S05 

1 670379 

0 000000 

972003 

237614 

0 QOOOOO 

0 ooooco 

, 988708 

961032 

l.OOOOOO 

2 

-7 423905 

1 670379 

1 238146 

972452 

235709 

0 000000 

0 000000 

988S83 

.961646 

! 000000 

3 

-7 423905 

1 670379 

1 8803S3 

973559 

230684 

0 000000 

0 000000 

989339 

9$3!79 

1 000000 

4 

-7 423905 

1 670379 

2 213475 

974883 

224983 

0 000000 

0 000000 

989S76 

.965014 

1 000000 

5 

-7 423905 

1 670379 

2 3S6257 

976164 

219123 

0 000000 

0 OOOGOO ■ 

990397 

966790 

! OOCOOO 

6 

-7 423905 

I 670379 

2 475878 

977610 

212329 

0 000000 

0 OOOGOO 

990333 

.968796 

i 000000 

7 

-7 423905 

1 670379 

2 522364 

979578 

202725 

0 000000 

0 000000 

991781 

971526 

1 000000 

8 

-7 423905 

i 670379 

2 5464 75 

981031 

195336 

0 000000 

0 000000 

992369 

973545 

1 000000 

9 

-7.423305 

1 670379 

2 558982 

976791 

161535 

0 000000 

0 000000 

994781 

.971694 

1 004169 

10 

-7.423905 

1 .670379 

2 565469 

972506 

. 131804 

0 000000 

0 000000 

996526 

.969127 

1 007701 

1 1 

-7.4239Q5 

1 670379 

2 568334 

969«83 

.096320 

0 OOOQOO 

0 000000 

9981 44 

967690 

r 010593 

12 

-7 423905 

1 .670379 

2 570579 

966375 

059671 

0 000000 

0 000000 

. 9992S8 

956186 

1.012844 

13 

-7 423905 

1 670379 

2 571484 

964323 

030134 

0 000000- 

0 000000 

999S18 

.964147 

I 014453 

14 

-7,423905 

1 670379 

2 571954 

S62403. 

on 827 

0 ocoooo 

0 000000 

999972 

.962376 

1 .015418 

15 

-7.423905 

1 .670379 

2 572197 

96 1703 

0 000000 

0 000000 

0 000000 1 

000000 

96 1 708 

I 015740 

J* I K» 3 U 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

I 

-7 4239C5 

3 246102 

0 000000 

973394 

231608 

b 000000 

0 000000 

989272 

96295! 

1 .000000 

2 

-7 423905 

3 246102 

I 238146 

973826 

229706 

0 000000 

0 000000 

989447 

. 963549 

1 000000 

3 

-7 423905 

3,246102 

1 880363 

974904 

224891 

0 000000 

0 000000 

939835 . 

965042 

1.000000 

4 

-7.423905 

3 246102 

2 213475 

976189 

219012 

0 000000 

0 000000 

990407 

366824 

I .000000 

5 

-7 423905 

3 246102 

2.366257 

977426 

213207 

0 000000 

0 000000 

990909 

. 968540 

I 000000 

6 

-7 4^3905 

3 245102 

2 476878 

97S810 

206527 

0 ooooco 

0 000000 

99 1 469 

970460 

1 000000 

7 

-7 423905 

3 246102 

2 522364 

980678 

. 157156 

0 000000 

0 000000 

992226 

.973054 

1 000000 

8 

-7.423905 

3 246102 

2 545476 

981983 

190344 

0 000000 

0 ooooco 

.992754 

.974867 

1 .000000 

9 

-7,423905 

3 246102 

2 558 3S2 

977479 

.157140 

0 .000000 

.0000000. 

,995061 

972652 

t 004169 

10 

-7 423905 

3 246102 

2 566469 . 

972930 

128462 

0 ooooo® 

0 OOOGOO 

996699 

969719 

1 007701 

1 1 

-7 42 3905 

3 246102 

2 568834 

969695 

094096 

0 000000 

0 000000 

993229 

967978 

1 010593 

12 

-7 423905 

3 2461 02 

2 570579 

966943 

058476 

0 000000 

0 000000 

999316 

966282 

1 012844 

13 

-7 423905 

3 245102 

2 571484 

964337 

029702 

0 oocooo 

0 OOOOQO 

999824 

.964167 

1 014453 

14 

-7 423905 

3 246102 

2 571954 

962405 

0! 1673 

0 000000 

0 000000 

933973 

.962379 

1 .015418 

15 

-7.423905 

3 246102 

2 572197 

961703 

0 ocoooo 

0 000000 

0 000000 1 

.000000 

961708 

1 .015740 

I K= 4 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT' 

1 I 

-7 423905 

3 555S07 

0 000000 

. 975913 

220265 

0 000000 

0 000000 

99-0297 

966448 

I 000000 

2 

-7,423905 

3 555807 

1 238146 

976334 

21G339 

0 000000 

0 000000 

990466 

967025 

1 000000 

! 3 

-7 423905 

3 555307 

I. 860363 

977370 

213476 

0 000000 

0 000000 

390386 

968461 

I 000000 

4 

-7.423905 

3 555S07 

2 213475 

378537 

. 207568 

0 000000 

0 oocooo 

99 1383 

970164 

1 000000 

5 

-7 423305 

3 . 555807 

2 336257 

979759 

2018IS 

0 000000 

0 OOCOOO 

991354 

971778 

1 000000 

6 

-7.423905 

3 555S07 

2 475873 

98103! 

195337 

0 000000 

0 000000 

992369 

.973544 

1.000000 

7 

-7 423905 

3.555807 

2 522364 

982723 

18637! 

0 000000 

0 ocoooo 

993053 

975896 

1 000000 

8 

-7 423905 

3 555807 

2 546476 

933775 

180581 

0 OOOOGO 

0 000000 

993478 

977359 

1 000000 

9 

-7 423905 

3.555.307 

2 55S932 

97S805 

148302 

0 000000 

0 ooooco 

.99560! 

.974500 

1 .004169 





J* 


J* 


J* 


I K* 


I K« 


I K* 


I K. 


5 


6 


7 


8 


to 

-7 423905 

3 555807 

2 

565469 

973787 

121436 

0 000000 

0 000000 

997051 

970915 

1 .007701 

11 

-7 423905 

3 555807 

2 

568834 

970142 

089068 

0 000000 

0 000000 

998413 

.968603 

I .010593 

12 

-7.423905 


555807 

2 

570579 

9671 H 

055436 

0 000000 

0 000000 

999385 

.966,16 

1 012844 

13 

-7.423905 

3 

,555807 

2 

571484 

964378 

028250 

0 OOCOOO 

0 000000 

999840 

. 964224 

1 014453 

14 

-7.423905 

3 

555807 

2 

571954 

. 9624 1 1 

011174 

0 000000 

0 000000 

. 999975 

962386 

I 015418 

15 

-7.423905 

3 555807 

2 

572197 

961703 

0 000000 

0 OOCOOO 

0 000000 

I oooooo 

.961708 

1.015740 

L 

X 


Y 


Z 

R/RREF 

U/AREF 

v/abef 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7.423905 

3 

659714 

0 

000000 

978232 

209343 

0 000000 

0 000000 

991235 

.969657 

1 OOOOOO 

2 

-7.423905 

3 

659714 

1 

238146 

978626 

207425 

0 000000 

0 000000 

,991395 

. 970205 

1 OOOOOO 

3 

-7.423905 

3 

659714 

1 

880363 

979602 

202605 

0 000000 

0 000000 

991790 

.971559 

1 OOOOOO 

4 

-7 423905 

3 

659714 

2 

213475 

980742 

1 96826 

0 000000 

0 000000 

992252 

973143 

I OOOOOO 

5 

-7.423905 

3 659714 

2 

386257 

981790 

191364 

0 000000 

0 000000 

,992676 

.974600 

1 OOOOOO 

6 

-7 423905 

3 

659714 

2 

475878 

982892 

185457 

0 000000 

0 000000 

.993121 

.976130 

1 OOOOOO 

7 

-7 423905 

3.659714 

2 

522364 

984333 

177435 

0 000000 

0 000000 

993703 

.978135 

1 OOOOOO 

8 

-7.423905 

3 659714 

2 

546476 

98S099 

173022 

0 OOCOOO 

0 000000 

,994013 

979201 

1 OOOOOO 

9 

-7 423905 

3 

659714 

2 

55S932 

979817 

141198 

0 000000 

0 000000 

9960 1 3 

975910 

1 004169 

10 

-7 423905 

3 

659714 

2 

565469 

974436 

1 15392 

0 000000 

0 000000 

997337 

971891 

1 007701 

1 1 

-7 423905 

3 

659714 

2 

568334 

970516 

084543 

0 000000 

0 000000 

938567 

.969125 

1 010593 

12 

-7 423905 

3 

659714 

2 

570579 

967245 

052862 

0 ocooco 

0 oonooo 

99944 1 

966705 

1 .012844 

13 

-7 423905 

3 

,659714 

2 

571484 

964410 

027040 

0 000000 

0 000000 

999854 

964269 

1 014453 

14 

-7 423905 

3 

6597 1 4 

2 

571954 

9624 1 7 

010594 

0 000000 

0 000000 

999978 

,962395 

1 015418 

15 

-7 423905 

3 

659714 

2 

572197 

961708 

0 000000 

0 000000 

0 000000 

1 OOOOOO 

.961708 

1 015740 

L 

X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7 423905 

3 

694574 

0 

000000 

972507 

165734 

0 000000 

0 000000 

994506 

.967165 

1 005658 

2 

-7.423905 

3 

694574 

1 

238145 

972829 

163734 

0 OOCOOO 

0 000000 

. 994638 

.967613 

I 005658 

3 

-7.423905 

3 

694574 

1 

880363 

973615 

153756 

0 000000 

0 000000 

994959 

.968707 

1 005658 

4 

-7 423905 

3 

694574 

2 

213475 

974503 

152933 

0 000000 

0 000000 

.995322 

.969344 

I 005658 

5 

-7 423905 

3 

694574 

2 

386257 

975269 

147726 

0 000000 

0 000000 

995635 

971013 

1 .005658 

6 

-7 423905 

3 

694574 

2 

475S78 

976013 

142498 

0 000000 

0 000000 

995939 

972049 

I 005658 

7 

-7.423905 

3 

694574 

2 

522364 

976966 

135501 

■ 0 000000 

0 000000 

996328 

.973373 

I 005658 

8 

-7 423905 

3 

694574 

2 

546476 

977514 

.131315 

0 000000 

0 000000 

996551 

974143 

I 005658 

9 

-7.423905 

3 

694574 

2 

558982 

973760 

IG8I05 

0 000000 

0 000000 

997663 

971484 

I 008330 

10 

-7 423905 

3 

694574 

2 

565469 

970124 

089280 

0 000000 

0 000000 

998406 

968577 

1 ,010593 

1 1 

-7 423905 

3 

694574 

2 

56S634 

967453 

065673 

0 000000 

0 COGOOO 

999137 

966628 

1 012445 

12 

-7 423905 

3 

694574 

2 

570579 

965293 

041 137 

0 000000 

0 000000 

999662 

964967 

I 013386 

13 

-7,423905 

3 

694574 

2 

571484 

963442 

021346 

0 000000 

0 000.000 

993909 

.963354 

I 014916 

14 

-7 423905 

3 

594574 

2 

571954 

962160 

008706 

0 000000 

0 000000 

999985 

962145 

1 015534 

15 

-7 423905 

3 

694574 

2 

572197 

961708 

0 000000 

0 000000 

0 000000 

1 OOOOOO 

961708 

1 015740 

L 

X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7 423905 

3 

706270 

0 

000000 

967338 

127310 

0 000000 

0 000000 

396758 

.964252 

1.010066 

2 

-7 423905 

3 

706270 

1. 

233145 

967617 

125444 

0 OOCOOO 

0 000000 

996853 

.964572 

1 .010066 

3 

-7,423905 

3 

706270 

1 

880363 

968162 

120885 

0 000000 

0 000000 

.997077 

965333 

I .010066 

4 

-7 423905 

3 

.706270 

2 

213475 

968749 

1 15782 

0 000000 

0 000000 

997313 

966151 

1 010066 

5 

-7 423905 

3 

706270 

2 

386257 

969210 

111608 

0 000000 

0 000000 

997503 

.966795 

1 010066 

6 

-7 423905 

3 

706270 

2 

475878 

969606 

107893 

0 000000 

0 oooooo 

997672 

.967348 

I 010066 

7 

-7 423905 

3 

706270 

2 

522364 

970105 

103022 

0 000000 

0 oooooo 

997877 

968046 

I .010066 

8 

-7 423905 

3 

706270 

2 

546476 

970444 

099577 

0 000000 

0 oooooo 

998017 

968520 

1 010066 

9 

-7 423905 

3 

706270 

2 

558982 

968280 

083328 

0 000000 

0 oooooo 

998611 

966935 

1 01 1570 

10 

-7 423905 

3 

706270 

2 

565469 

966291 

069044 

0 000000 

0 oooooo 

999047 

965370 

1 012844 

1 1 

-7 423905 

3 

706270 

2 

566834 

964855 

050994 

0 000000 

0 oooooo 

999480 

964353 

1 013886 

12 

-7 423905 

3 

706270 

2 

570579 

963676 

032382 

0 000000 

0 oooooo 

999790 

963474 

1.014697 

13 

-7 423905 

3 

706270 

2 

571484 

962664 

017164 

0 000000 

0 oooooo 

99934 1 

,962608 

1 015277 

14 

-7 423905 

3 

706270 

2 

571954 

961953 

007071 

0 000000 

0 oooooo 

.999990 

.961949 

1 .015624 

IS 

-7 423905 

3, 

706270 

2 

572197 

961708 

0 000000 

0 000000 

0 oooooo 

I OOOOOO 

961708 

1 015740 

L 

X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-7 423905 

3 

710194 

0 000000 

964645 

079587 

0 000000 

0 oooooo 

998733 

.963423 

t 013217 

2 

-7 423905 

3 

710194 

1 

238146 

964760 

078076 

0 000000 

0 oooooo 

998781 

963583 

1 0I32I7 

3 

-7 423905 

3 

710194 

1 

880363 

965023 

074509 

0 000000 

0 oooooo 

998890 

.963951 

I 013217 

4 

-7 423905 

3 

710194 

2 

213475 

965283 

070795 

0 000000 

0 oooooo 

. 998998 

.964316 

1 013217 

5 

-7 423905 

3 

710194 

2 

366257 

965461 

068143 

0 000000 

0 oooooo 

999071 

964564 

I .013217 

6 

-7.423905 

3 

710194 

2 

475378 

965590 

066156 

0 000000 

0 oooooo 

999125 

.964745 

1 013217 



7-7423905 3710194 2522364 965754 

8 -7 423905 3 710194 2 546476 965377 

9 -7 423905 3 710194 2 553932 964792 

10 -7 423905 3 7101S4 2 5€5459 963B46 

11 -7 423905 3 71Q194 2 563834 963154 

12 -7 423905 3 710194 2 570579 962593 

13 -7423905 3710194 2571484 962132 

14 -7 423905 3 710194 2 571954 961313 

15 -7 423905 3 710194 2 572197 961708 

J. I K» 9 L X Y. . Z R/R9EF 

! -7423905 3711511 0000000 962716 

2 -7 423905 3 711511 I 233146 962740 

3 -7 423905 3 7! 1511 1 8S0353 962793 

4 -7 423905 3 711511 2 213475 362S33 

5 -7 423905 3 71 151 I 2 386257 962862 

6 -7 423905 3 71151! 2 4 75878 9£-2375 

7 -7423905 3711511 2 522364 962894 

8 -7 423905 3 711511 2 546476 962910 

9 -7 423905 3 7! 151! 2 558332 962581 

10 -7 423905 3 711511 2 565459 962306 

1! -7 423905 3 71!5M 2 56 7834 36.2099 

12 -7 423905 3 71151! 2 67(X.79 360 93 7 

13 -7 42J905 3 711511 2 5714.34 361SI4 

14 -7423905 3711511 2571954 961735 

15 -7423905 371I51! 2572197 961708 

I K« 10 L X Y Z R/RREF 

1 -7 423905 3 71 1952 0 000000 961708 

2 -7 423905 3 711952 1 238146 961708 

3 -7 423905 3 7! 1952 1 880363 961703 

4 -7423905 3711952 2213475 961708 

5 -7423905 3711952 2386257 961708 

6 -7 423905 3 7! 1952 2 475878 961708 

7 -7423905 3711952 2 522364 961708 

8 -7 423905 3 711952 2 546476 961709 

9 -7 423905 3 71 1952 2 558982 961703 

10 -7423905 3711952 2565459 961703 

I! -7 423905 3 7U 952 2 568834 961708 

12 -7423905 3711952 2570579 961708 

13 -7423905 3 71 1952 2571484 961708 

14 -7423905 3711952 2571954 961703 

15 -7 423905 3 711952 2 572197 961708 

J= 2 K= 1 L X r Z R/RREF 

1 -6 310319 0 000000 0 OOOOOO 964885 

2 -6 310319 0 OOOOOO 1 238U6 . 965357 

3 -6 310319 0 OOOOOO l 880363 966410 

4 -6 310319 0 OOOOOO 2 213475 967630 

5 -6 310313 0 OOOOOO 2 386257 968911 

6 -6 310319 0 OOOOOO 2 475378 969855 

7 -6 310319 0 OOOOC'O. 2 522364 969000 

8 -6 310319 0 OOOOOO 2 546476 969151 

9 -6 310319 0 OOOOC'O 2 558982 967203 

10-6310319 0 OOOOOO 2565469 965171 

M -6 310319 0 OOOOOO 2 568834 963073 

12 -6 310319 0 OOOOOO 2 570579 961972 

13 -6 310319 0 OOOOOO 2 571484 961240 

14 -6 310319 0 OOOOOO 2 571954 961266 

15 -6 310319 0 OOOOOO 2 572197 961026 

J« 2 K» 2 L X Y Z R/RREF 

1 -6 310319 1 670379 0 OOOOOO 964924 

2 -6 310319 1 670379 1 238146 - 965386 

3 -6 310319 1 670379 I 830363 . 966413 


7 


063544 

0 

OOOOOO 

061508 

0 

000-900 

052253 

0 

OOOOOO 

043603 

0 

OOOOOO 

032469 

0 

OOOOOO 

021060 

0 

OOOOOO 

01 1563 

0 

OOOOOO 

004934 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

U/AREF 

v/aref 

031815 

0 

OOOOOO 

031002 

0 

OOOOOO 

029187 

0 

00-0000 

027536 

0 

OOOOOO 

026621 

0 

OOOOOO 

026101 

0 

OOOOOO 

025355 

0 

OOOOOO 

024662 

0 

OOOOOO 

021629 

0 

OO'OOOO 

018494 

0 

OOOOOO 

014234 

0 

OOOOOO 

009/08 

0 

OOOOOO 

006 703 

0 

OOOOOO 

002609 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

U/AREF 

V/AREF 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

U/AREF 

v/aref 

241392 

0 

OOOOOO 

23929! 

0 

OOOOOO 

234132 

0 

OOOOOO 

228122 

0 

OOOOOO 

222464 

G OOOOOO 

216310 

0 OOOOOO 

207516 

0 

ooo>ooo 

192954 

0 

OC’OOOO 

16799! 

0 

00-3000 

134957 

0 

OOOOOO 

096941 

0 

OOO'XO 

059736 

0 

OOOOOO 

030567 

0 

OOOOOO 

012315 

0 

OOOOOO 

0 OOOOOO 

0 

OOOOOO 

U/AREF 

v/aref 

239789 

- 

000379 

237697 


000359 

232557 


000300 


0 OOOOOO 999192 

0 OOOOOO 999243 

0 OO'OOOO 999454 

0 OOOOOO 999620 

0 OOOOOO 999739 

0 OOOOOO 99991 1 

0 OOOOOO 999973 

0 OOOOOO 999995 

0 OOOOOO t OOOOOO 

W/AREF T/TREF 

0 OOOOOO 999738 

0 OOOOOO 999808 

0 OOOOOO 999830 

0 OOOOOO 999348 

0 OOOOOO 999858 

0 OOOOOO 999854 

0 OOOOOO 999871 

0 OOOOOO 999878 

0 OOOOOO 999906 

0 OOOOOO 999932 

0 OOOOOO 999959 

0 OOOOOO 'j-i-wg 1 

0 OOOOOO 999993 

C OOOOOO 999999 

0 OOOOOO 1 OOOOOO 

W/AREF T/TREF 

0 OOOOOO 1 OOOOOO 

0 OOOOOO 1 OOOOOO 

0 0-00000 1 OOOOOO 

0 OOOOOO 1 OOOOOO 

0 OOOOOO ! OOOOOO 

0 O'OOOOO I OOOOOO 

0 OOOOOO 1 OOOOOO 

0 OOOOOO S OOOOOO 

0 OOOOOO 1 OOOOOO 

.0 OOOOOO 1 OOOOOO 

0 OOOOOO I 0C<X>00 

0 OOOOOO 1 OOOOOO 

0 OOOOOO I OOOOOO 

0 OOOOOO 1 OOOOOO 

0 OOOOOO ! OOOOOO 

W/AREF . T/TREF 
0 OOOOOO 984 1 1 3 

000371 984291 

000777 984686 

001029 985166 

000767 -985767 

0(»405 986462 

000153 9S7200 

000167 988515 

000119 99C505 

000057 992905 

000039 904881 

000021 996255 

00001 1 996798 

000004 996990 

0 OOOOOO 997021 

W/AREF T/TREF 

0 OOOOOO 984222 

000369 984397 

000781 984785 


964974 I 013217 

965146 I 013217 

964265 I 013886 

963479 I 014453 

962951 1 014916 

962507 I 015277 

962106 I 015534 

96I8I4 I 015689 

961708 I 015740 

P/PREF ENT 

962521 1 015109 

962555 I 015109 

962629 I 015109 

962692 I 015109 

962726 I 015109 

962744 I 015109 

962770 I 015109 

962793 I 015109 

962491 ! 015277 

962240 I 015418 

962060 I 015534 

961919 1 015624 

961308 ! 015689 

961734 I 015727 

961708 I 015740 

P/PREF ENT 

961703 1 015740 

^1708 1 015740 

961708 ! 015740 

961708 I 015740 

961708 I 015740 

961708 I 015740 

961708 I 015740 

961708 1 015740 

S6I708 1 015740 

961708 I 015740 

961708 1 015740 

961/08 1 015740 

961708 1 015740 

961708 I 015740 

961708 I 015740 

P/PPEF ENT 

949555 998285 

950192 ■ 998271 

95161 1 9382X 

953276 998218 

955121 998300 

956725 996614 

957387 999383 

956020 I 000982 

958019 1 003806 

958323 I 007085 

958148 1 009966 

958369 1 011825 

958162 I 012686 

958372 1 012869 

958163 I 013002 

P/PREF ENT 

949699 993379 

950323 998366 

951709 998335 




J» 2 K» 


J* 2 K. 


Jx 2 K« 



4 

-6 310319 

1 670379 

2 213475 

967608 


5 

•5 

310319 

1 670379 

2 386257 

968377 


6 

-6 

310319 

1 670379 

2 475878 

969816 


7 

-6 

310319 

1 670379 

2 522364 

969760 


8 

-6 

310319 

1 670379 

2 546476 

9691 19 


9 

-6 

310319 

1 670379 

2 558932 

967181 


10 

-6 

310319 

1 670379 

2 565459 

965166 


1 1 

-6 

310319 

I 670379 

2 568834 

963034 


12 

-6 

310319 

I 670379 

2 570579 

961986 


13 

-6 

310319 

I .670379 

2 571434 

961254 


14 

-6 

310319 

1 670379 

2 571964 

961283 


15 

-6 

310319 

1 670379 

2 572197 

961040 

3 

L 


X 

Y 

Z 

R/R9EF 


! 

-6 

310319 

3 245102 

0 000000 

964959 


2 

-6 

310319 

3 246102 

1 238146 

965394 


3 

-6 

310319 

3 246102 

1 630363 

966361 


4 

-6 

310319 

3 246102 

2 213475 

967472 


5 

-6 

310319 

3 246102 

2 386257 

968631 


6 

-6 

310319 

3 246102 

2 475878 

969596 


7 

-6 

3I03I9 

3 246102 

2 522364 

969536 


8 

-6 

310319 

3 246102 

2 546476 

963921 


9 

-6 

310319 

3 246102 

2 558982 

967023 


10 

-6 

310319 

3 245102 

2 565469 

965065 


1 1 

-6 

310319 

3 246102 

2 566334 

963027 


12 

-6 

3IC319 

3 246102 

2 570579 

961960 


13 

-6 

310319 

3 246102 

2 571484 

961234 


14 

-6 

310319 

3 246102 

2 571954 

961269 


15 

-6 

310319 

3 246102 

2 S72I97 

961023 

4 

L 


X 

Y 

Z 

fi/RSEF 


1 

-6 

310319 

3 556307 

0 000000 

9645S7 


2 

-6 

310319 

3 555807 

1 236145 

965026 


3 

-6 

3I03I9 

3 555807 

1 880363 

965964 


4 

-6 

310313 

3 555807 

2 213475 

966983 


5 

-6 

310319 

3 555807 

2 336257 

968072 


6 

-6 

310319 

3 555807 

2 4 75378 

968913 


7 

•6 

310319 

3 555307 

2 522364 

968845 


8 

-6 

310319 

3 555807 

2 546476 

968280 


9 

-6 

310319 

3 555807 

2 558982 

966476 


10 

-6 

310319 

3 555807 

2 565463 

964641 


1 1 

-6 

3I03I9 

3 555807 

2 566334 

962709 


12 

-6 

310319 

3 555307 

2 570579 

96I7I3 


13 

-6 

310319 

3 555307 

2 571484 

961010 


14 

-6 

310319 

3 555807 

2 571954 

961055 


15 

-6 

310319 

3 555S07 

2 572197 

960806 

5 

L 


X 

Y 

Z 

R/RREF 


1 

-6 

310319 

3 659714 

0 oooooo 

963742 


2 

-6 

310319 

3 659714 

I 238 146 

964187 


3 

-6 

310319 

3 659714 

1 830363 

965138 


4 

-6 

310319 

3 659714 

2 213475 

966149 


5 

-6 

310319 

3 659714 

2 386257 

967192 


6 

-6 

310319 

3 659714 

2 475378 

967974 


7 

-6 

310319 

3 653714 

2 522364 

967699 


8 

-6 

310319 

3 659714 

2 546476 

96/421 


9 

-6 

310313 

3 659714 

2 558982 

965804 


10 

r6 

310319 

3 659714 

2 565463 

964203 


It 

-6 

310319 

3 659714 

2 568334 

962482 


12 

-6 

310319 

3 659714 

2 570579 

961622 


13 

-6 

310319 

3 659714 

2 571484 

960975 


14 

-6 

310319 

3 659714 

2 571954 

961037 


15 

-6 

310319 

3 659714 

2 572197 

960790 

6 

L 


X 

r 

Z 

R/RREF 


226567 

- 000217 

220924 

- 000131 

214799 

- 000055 

206069 

000013 

191632 

000077 

166864 

000142 

134101 

000196 

096395 

000215 

059466 

000177 

030465 

000103 

012233 

000042 

0 OOOOOO 

0 OOOOOO 

U/XREF 

V/AREF 

234398 

- 00C679 

232314 

- 000653 

227197 

- 000673 

221237 

- 000437 

215635 

- 000275 

209603 

- 000125 

201090 

000002 

187053 

000 1 1 7 

16291 1 

000228 

131017 

000317 

094330 

000 345 

058345 

000281 

029981 

000164 

012112 

000063 

0 OOOOOO 

0 OOOOOO 

U/AREF 

y/AREF 

223731 

- 000766 

221626 

- 000757 

216467 

- 000703 

210488 

- 000563 

204938 

- 000349 

199099 

- 000125 

191018 

000066 

177766 

000223 

154773 

000356 

124497 

000453 

089746 

000473 

055652 

000391 

028690 

000244 

011619 

000110 

0 oooooo 

0 oooooo 

U/AREF 

V/AREF 

205551 

- 000101 

203404 

- 000099 

198160 

- 000078 

192146 

00000! 

186715 

000153 

131244 

000367 

1 73909 

000592 

16 I 953 

000805 

1 40927 

000939 

113340 

001044 

081780 

001040 

050848 

000960 

026316 

000742 

010687 

000428 

0 OOOOOO 

0 OOOOOO 

U/AREF 

V/AREF 


001039 

985259 

000774 

985359 

000409 

986551 

000156 

987283 

000169 

988590 

000120 

990566 

000057 

992950 

000040 

994913 

00002! 

996280 

000011 

996821 

000005 

997013 

0 OOOOOO 

997044 

w/aref 

T/TREF 

0 oooooo 

934583 

000325 

984754 

000734 

985127 

001022 

985579 

000778 

986163 

000417 

966843 

000162 

987554 

000175 

983828 

000124 

990754 

000059 

993083 

00004 1 

994995 

000021 

996335 

000012 

996865 

000005 

997055 

0 OOOOOO 

997086 

W/AREF 

T/TREF 

0 oooooo 

985247 

000154 

985423 

000480 

985300 

000807 

986230 

000668 

986773 

000386 

987411 

000156 

938074 

000180 

989276 

000128 

991092 

000061 

993296 

000042 

995095 

000021 

995365 

0000 II 

996S68 

000004 

997050 

0 oooooo 

997080 

W/AREF 

T/TREF 

0 OOOOOO 

986531 

- 000I8I 

986715 

- 000075 

987107 

0002IS 

987545 

0CO2I1 

938067 

000124 

988654 

000047 

989235 

000147 

990304 

000125 

991908 

000064 

993865 

000046 

995443 

000024 

996573 

000012 

997016 

000004 

997182 

0 OOOOOO 

997208 

W/aref 

T/TREF 


953344 998322 

955177 999406 

956774 993720 

957428 999484 

959C6I I 001072 

958057 I 003877 

958361 I 007133 

958185 I 009996 

958408 « 01 1845 

958199 I 012703 

95841 1 I 012885 

958199 I 0I30I9 

P/Pff€F ENT 

950076 998734 

950676 998725 

951938 998704 

953520 998703 

955278 998795 

956839 999106 

957469 999850 

958095 J 001395 

958032 I 0C4132 

958389 I 007309 

958207 I 0I0I03 

958435 1 0I19II 

958221 I 012756 

SS8438 » 012934 

958222 I 013069 

P/PSEF ENT 

950357 999559 

950960 999556 

952246 . 999550 

953663 999564 

955267 999664 

956716 999963 

957290 I 000663 

957895 1 002114 

957867 1 004703 

958174 r 007703 

957987 I 010337 

953217 I 012047 

958000 » 012853 

958220 I 013019 

958000 I 013154 

P/PPEP ENT 

950761 I 001213 

951378 1 001214 

952695 I G0I2I8 

954115 I 001242 

955650 I 001340 

956991 1 001611 

957479 1 002230 

958041 1 003511 

957989 1 005810 

958288 I 008463 

958095 1 010786 

958326 I 012295 

958107 I 013018 

958329 I 013I6T 

,958108 1 013292 

P/PREF ENT 


-y 


1 

-6 

310319 

3 694574 

0 000000 

961 126 

173426 

000001 

0 OOOOOO 

988621 

S50190 

1 

004426 

2 

-6 

310319 

3 694574 

1 238146 

961564 

. 171264 

000003 

- 000662 

983798 

950792 

I 

004422 

3 

-6 

310319 

3 694574 

1 8S0363 

962500 

166022 

000015 

- 000900 

989175 

952081 

1 

004414 

4 

-6 

310319 

3 694574 

2 213475 

963516 

160136 

000048 

- 000745 

989595 

953490 

1 

004417 

5 

-6 

310319 

3 694574 

2 386257 

964592 

155074 

000109 

- 000701 

990104 

955046 

1 

004484 

6 

-6 

310319 

3 694574 

2 475S73 

965414 

150313 

000203 

- 000605 

990653 

956391 

1 

004699 

7 

-6 

310319 

3 694574 

2 522364 

965406 

144169 

000346 

- 000420 

991138 

956851 

1 

005194 

8 

-6 

310319 

3 694574 

2 5464/6 

9650B5 

134262 

000569 

- 000146 

991986 

957351 

1 

006188 

9 

-6 

310319 

3 694574 

2 558982 

96 3372 

1 1 7085 

000731 

• 000039 

993188 

957306 

I 

007914 

10 

-6 

310319 

3 694574 

2 565469 

962705 

094403 

000862 

- 000014 

994663 

957567 

1 

00990 

1 1 

-6 

310319 

3 694574 

2 568834 

961402 

068309 

000371 

000007 

995835 

957397 

I 

011638 

12 

-6 

310319 

3 694574 

2 570579 

960786 

042691 

000829 

000009 

996683 

957599 

1 

012760 

13 

-6 

310319 

3 694.5.74 

. 2 57! 484 

960233 

022292 

000553 

000007 

997005 

957407 

1 

013298 

14 

-6 

3,10319 

3 694574 

2 571954 

960359 

009131 

000376 

000004 

997128 

957601 

1 

013392 

15 

-6 

31C3I9 

3 694574 

2 572197 

960146 

0 000000 

0 OOOOOO 

0 OOOOOO 

997148 

957407 

I 

013502 

L 


X 

Y 

Z 

R/SReF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-6 

310319 

3 706270 

0 000000 

959046 

130154 

- 000027 

0 OOOOOO 

991368 

950767 

1 

008090 

2 

-6 

310319 

3 706270 

1 238145 

959503 

128123 

- 000026 

- 001 157 

991537 

951383 

1 

008069 

3 

-6 

310319 

3 706270 

1 880363 

960 4 36 

123274 

- 000021 

- 001770 

991892 

952698 

1 

008017 

4 

-6 

310319 

3 706270 

2 213475 

951543 

118040 

- 000009 

- 001803 

992277 

954117 

1 

007965 

5 

-6 

310319 

3 706270 

2 386257 

962633 

1 1 3887 

000014 

- 001783 

992740 

955650 

1 

007976 

6 

-6 

310319 

3 706270 

2 475373 

963503 

1 10353 

000047 

- 001617 

993236 

956986 

1 

008! IB 

7 

-6 

310319 

3 706270 

2 522364 

9C3601 

106039 

000096 

- 001289 

993624 

957457 

1 

008471 

8 

-6 

310319 

3 706270 

2 546476 

963505 

099020 

000192 

- 000759 

994246 

957361 

! 

009142 

9 

-6 

310319 

3 706270 

2 558982 

962696 

0868 1 3 

000320 

- 000392 

994937 

957880 

1 

010244 

10 

-6 

310319 

3 706270 

2 565469 

962035 

070439 

000470 

- 000174 

995956 

958144 

1 

011495 

1 1 

-6 

310319 

3 706270 

2 568834 

961158 

051365 

000536 

- 000063 

996664 

957951 

1 

012584 

12 

-6 

310319 

3 706270 

2 570579 

960844 

032504 

000549 

- 000017 

997216 

.958168 

1 

013277 

13 

-6 

310319 

3’ 706270 

2 571434 

960461 

017283 

000474 

OOOOOO 

997394 

957958 

1 

013619 

14 

-6 

310319 

3 706270 

2 571954 

960592 

007190 

000287 

000004 

997478 

.958170 

1 

013650 

15 

-6 

310319 

3 706270 

2 572197 

960370 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

997483 

957958 

1 

013754 

L 


X 

Y 

Z 

R/RPEF 

0/AREF 

y/AREF 

W/AfXF 

T/TREF 

P/PREF 

ENT 

1 

-6 

310319 

3 710194 

0 000000 

956687 

079246 

- OOOOOO 

. 0 OOOOOO 

3932! 1 

950193 

! 

010959 

2 

-6 

310319 

3 710194 

1 238146 

957152 

077653 

OOOOOO 

- 001 311 

993359 

950795 

1 

010913 

3 

-6 

310319 

3 710194 

1 8S0363 

958156 

073959 

000002 

- 002102 

993662 

952083 

1 

010797 

4 

-6 

310319 

3 710194 

2 213475 

959250 

070237 

000006 

- 002332 

993998 

953492 

1 

010678 

5 

-6 

310319 

3 710194 

2 386257 

960596 

067642 

0000 12 

- 002490 

994430 

955047 

I 

010634 

6 

-6 

310319 

3 710194 

2 476878 

961293 

065744 

000020 

- 002431 

994894 

956389 

1 

010726 

7 

-6 

310319 

3 710194 

2 522364 

961454 

063494 

000033 

- 002! 30 

995209 

956849 

1 

01098! 

8 

-6 

310319 

3 710194 

2 546476 

961513 

059716 

000062 

- 001591 

995665 

957345 

I 

0! 1419 

9 

-5 

310319 

3 710194 

2 553982 

961044 

052935 

000100 

- 001064 

996096 

957292 

1 

012054 

10 

-6 

310319 

3 710194 . 

2 5C5469 

960750 

04 3536 

000168 

- 000589 

996654 

957535 

! 

012745 

1 1 

-6 

310319 

3 710194 

2 5C6034 

960226 

032295 

000239 

- OOC278 

937013 

957358 

1 

013331 

12 

-6 

310319 

3 710194 

2 570579 

960123 

020987 

000261 

- 000111 

997325 

957555 

1 

013692 

13 

-6 

310319 

3 710194 

2 571484 

959860 

0! 1573 

000215 

- 000029 

997398 

957363 

1 

013877 

14 

-6 

3!03i9 

3 710194 

2 571954 

960007 

004968 

000136 

- 000002 

997447 

957556 

1 

013865 

15 

-6 

310319 

3 710194 

2 572197 

959809 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

997452 

957363 

1 

013953 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-6 

310319 

3 711511 

0 000000 

956277 

032124 

- 000001 

0 OOOOOO 

994238 

950767 

1 

012178 

2 

-6 

310319 

3 71 15! 1 

1 238146 

956764 

031301 

- OOOOOO 

- 000325 

994375 

951383 

1 

012112 

3 

-6 

310319 

3 71 !51 1 

1 88Q363 

957816 

029478 

000001 

- 00133! 

994656 

952638 

1 

011952 

4 

-6 

310319 

3 71151 1 

2 213475 

958942 

027831 

000002 

- 001668' 

934968 

9541 16 

1 

011794 

5 

-6 

310319 

3 71I5I! 

2 366257 

96C'085 

026894 

0C0005 

- 001994 

935380 

955650 

1 

011731 

6 

-6 

310319 

3 711511 

2 475878 

960930 

026330 

000007 

- 002123 

9-3S833 

956986 

! 

011810 

7 

-6 

310319 

3 711511 

2 522364 

961176 

025649 

000007 

- 002016 

9-36130 

957456 

1 

012034 

8 

-6 

310319 

3 711511 

2 546476 

961301 

024389 

000008 

- 001614 

996525 

957961 

1 

012382 

9 

-6 

310319 

3 711511 

2 558982 

960946 

021999 

000007 

- 001202 

996809 

957879 


012820 

10 

-6 

310319 

3 711511 

2 565463 

950336 

018557 

000003 

- C00776 

997196 

958142 

1 

013250 

1 1 

-6 

310319 

3 71151 1 

2 568S34 

960453 

014246 

000007 

- 000400 

997391 

957948 

1 

0136-20 

12 

-6 

310319 

3 71 151 I 

2 570573 

960467 

009702 

000008 

- 000146 

997601 

958163 

1 

013327 

13 

■6 

310319 

3 711511 

2 571484 

960239 

005701 

000007 

- 000044 

997618 

957952 


013941 

14 

-6 

310319 

3 711511 

2 571954 

9604 1 8 

002600 

000008 

000004 

997652 

958164 

I 

013900 







J« 


J» 


2 K. 


3 K. 


3 K* 


3 K* 


10 


I 


2 


3 


15 

•6 . 

310319 

3 

.711511 

2 

572197 

960205 

0 COOOOO 

0 000000 

0 000000 

997653 

957951 

1 

013990 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/APEF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-6 

310319 

3 

711952 

0 

ocoooo 

955571 

0 000000 

0 000000 

0 000000 

994371 

950193 


012612 

2 

-6 

310319 

3 

711952 

1 

238146 

956043 

0 000000 

0 000000 

0 OOOOOO 

994504 

950795 


012546 

3 

-6 

310319 

3 

711952 

1 

880363 

957082 

0 000000 

0 000000 

0 OOOOOO 

994777 

.952083 


012386 

4 

-6 

310319 

3 

711952 

2 

2134 75 

958204 

0 000000 

0 OOOCOO 

0 OOOOOO 

995083 

953492 


012223 

5 

-6 

310319 

3 

71 1952 

2 

386257 

959368 

0 000000 

0 000000 

0 OOOOOO 

995495 

955047 


012150 

6 

-6 

310319 

3 

711952 

2 

475878 

960282 

0 000000 

0 000000 

0 OOOOOO 

995946 

956390 


012223 

7 

-6 

310319 

3 

711952 

2 

522364 

960463 

0 000000 

0 000000 

0 OOOOOO 

996238 

956849 


012444 

8 

-6 

310319 

3 

711952 

2 

545476 

960592 

0 000000 

0 000000 

0 OOOOOO 

996622 

.957347 


012779 

9 

-6 

310319 

3 

711952 

2 

558932 

960235 

0 ooocoo 

0 000000 

0 OOOOOO 

996887 

■957295 


013178 

10 

-6 

3I03I9 

3 

71 1952 

2 

56.5469 

960188 

0 OOOOOQ 

0 000000 

0 OOOOOO 

997243 

957540 


013531 

1 1 

-6 

310319 

3 

71 1952 

2 

568S34 

959S45 

0 000000 

0 000000 

0 OOOOOO 

997415 

957363 


013900 

12 

-6 

310319 

3 

711952 

2 

570579 

959857 

0 ooocoo 

0 ooocoo 

0 OOOOOO 

997605 

957559 


014089 

13 

-6 

310319 

3 

71 1952 

2 

57U84 

959652 

0 000000 

0 000000 

0 OOOOOO 

997615 

957363 


G14I86 

14 

-6 

310319 

3 

711952 

2 

571954 

959817 

0 000000 

0 000000 

0 OOOOOO 

997644 

957556 


014146 

15 

-6 

310319 

3 

711952 

2 

572197 

960011 

0 COOOOO 

0 000000 

0 OOOOOO 

997648 

957754 


0I406S 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-5 

196733 

0 

000000 

0 

000000 

961332 

245732 

0 000000 

0 OCOOOO 

981526 

943572 


997132 

2 

-5 

1 95733 

0 

000000 

1 

233146 

962744 

242184 

0 COOOOO 

- 006847 

982137 

945546 


997166 

3 

-5 

196733 

0 

000000 

1 

880363 

964753 

233272 

0 OOOGOO 

- 010556 

983064 

948414 


997276 

4 

-5 

196733 

0 000000 

2 

2134 75 

963956 

222808 

0 000000 

- 009342 

982971 

947541 


997512 

5 

-5 

196733 

0 

000000 

2 

386257 

961277 

213037 

0 000000 

- 005784 

982346 

944307 


997988 

6 

-5 

196733 

0 

000000 

2 

475873 

959307 

203434 

0 000000 

- 003348 

982425 

942448 


998887 

7 

-5 

196733 

0 

000000 

2 

522364 

957391 

192027 

0 000000 

- 001798 

983139 

941249 


000413 

8 

-5 

196733 

0 

OOOGOO 

2 

546476 

955405 

175472 

0 000000 

- 000917 

984562 

940656 


002693 

9 

-5 

196733 

0 

000000 

2 

558982 

953267 

1 524 1 1 

0 000000 

- 000463 

986446 

940346 


005512 

10 

-5 

196733 

0 

000000 

2 

565469 

951049 

120995 

0 000000 

- 000229 

988638 

940244 


008687 

11 

-5 

196733 

0 

000000 

2 

568834 

949123 

084457 

0 000000 

- 000111 

990577 

940180 


01 H84 

12 

-5 

196733 

0 

000000 

2 

570579 

947993 

04961 I 

0 000000 

- 000052 

991767 

940188 


013182 

13 

-5 

196733 

0 000000 

2 

57 1434 

947569 

023915 

0 000000 

- 000022 

992187 

940165 


013792 

14 

-5 

196733 

0 

000000. 

2 

571954 

94751 1 

009209 

0 000000 

- 000008 

992269 

940185 


013901 

15 

-5 

196733 

0 

000000 

2 

572197 

947477 

0 000000 

0 000000 

0 OOOOOO 

992282 

940165 


013930 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/ARFf 

T/TREF 

P/PREF 

ENT 

I 

-5 

196733 

1 

670379 

0 

000000 

961120 

244202 

- 000242 

0 OCoOOO 

981639 

943472 


997334 

2 

-5 

1.96733 

1 

670379 

1 

238146 

962507 

240618 

- 000167 

- 006805 

982240 

945413 


997370 

3 

-5 

196733 

1 

670379 

1 

630363 

964464 

231767 

000037 

- 010470 

983149 

948212 


.997482 

4 

-5 

196733 

1 

670379 

2 

213475 

963645 

221370 

000313 

-. 009250 

983050 

94731 1 


997720 

5 

-5 

196733 

1 

670379 

2 

386257 

960992 

21 1654 

000592 

- 005732 

982435 

9441 1 1 


.998196 

6 

-5 

196733 

1 

670379 

2 

475878 

959042 

202159 

000334 

- 003322 

982516 

942274 


999089 

7 

-5 

196733 

1 

670379 

2 

522364 

957140 

190786 

001034 

- 001784 

933220 

941079 

1 

000600 

8 

-5 

196733 


670379 

2 

546476 

955 1 78 

174363 

001 193 

- 0009 M 

984629 

940496 

1 

002856 

9 

-5 

196733 

I 

670379 

2 

558982 

953063 

151506 

001308 

- 000460 

986486 

940184 

1 

005640 

10 

-5 

196733 

1 

670379 

2 

565469 

950876 

120354 

00I34I 

- 000228 

988653 

940086 

1 

008775 

1 1 

-5 

196733 

I 

670379 

2 

5688 34 

948969 

084107 

001227 

- 000 in 

. 990567 

940018 

1 

01 1540 

12 

-5 

196733 

1 

670379 

2 

570579 

94 7055 

049497 

000930 

- 000052 

991746 

940031 

1 

013220 

13 

-5 

196733 

1 

670379 

2 

671484 

94 7431 

023916 

000543 

- 000022 

992161 

940004 


013825 

14 

-5 

196733 

1 

670379 

2 

571954 

947377 

009227 

000229 

- 000003 

992243 

940028 

1 

013932 

15 

-5 

196733 

1 

670379 

2 

572197 

947339 

0 000000 

0 000000 

0 OOOOOO 

992256 

940003 

1 

013962 

L 


X 


Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-5 

196733 

3 246102 

0 

000000 

960473 

23864! 

- 000404 

0 OOOOOO 

982073 

943260 


998041 

2 

-5 

196733 

3 

246102 

1 

238146 

96 1 820 

235107 

- 000306 

- 006 787 

982659 

945141 


.998080 

3 

-5 

196733 

3 

246102 

1 

880363 

963658 

226391 

- 000014 

- 010373 

983527 

947734 


998199 

4 

-5 

196733 

3 

246102 

2 

2134 75 

962746 

216173 

000428 

- 009086 

983394 

946759 


.998442 

5 

-5 

196733 

3 

246102 

2 

386257 

960121 

206639 

000910 

- 005609 

982784 

943591 


998913 

6 

-5 

196733 

3 

246102 

2 

4 7587-8 

958242 

197351 

001341 

- 003263 

902868 

941826 


999782 

7 

-5 

196733 

3 

246102 

2 

522364 

95,6390 

186273 

001700 

- 001751 

983542 

940649 

I 

001242 

8 

-5 

196733 

3 

246102 

2 

546476 

954507 

1 70293 

001989 

- 0C0398 

984899 

940093 

1 

003413 

9 

-5 

196733 

3 

246102 

2 

558982 

952473 

148100 

002197 

- 000454 

986672 

939779 

1 

006078 

10 

-5 

196733 

3 246102 

2 

565469 

950388 

1178! 1 

002256 

- 000226 

938748 

939694 

1 

009079 

11 

-5 

196733 

3 246102 

2 

566834 

948554 

082535 

002054 

- 000110 

990579 

939617 

1 

011729 



12 -5 196733 3 

13 -5.196733 3 

14- -5 196733 3 

15 -5 196733 3 

Jt 3 K* 4 L X 

1 -5.196733 3 

2 -5 196733 3 

3 -5 196733 3 

4 -5 196733 3 

5 -5 196733 3 

6 -5 196/33 3 

1 -5 196733 3 

8 -5 196733 3 

9 -5 196733 3 

10 -5 196733 3 

11 -5 196733 3 

12 -5 '96733 3 

13 -5 196733 3 

14 -5 196733 3 

15 -5 196733 3 

J* 3 5 U X 

1 -5 196733 3 

2 -5 196733 3 

3 -5 196733 3 

4 -5 196733 3 

5 -5 196733 3 

6 -5 196733 3 

7 -5 196733 3 

8 -5 196733 3 

9 -5 196733 3 

10 -5 196733 3 

11 -5 196733 3 

12 -5 196733 3 

13 -5 196733 3 

14 -5 196733 3 

15 -5 196733 3 

3 K» 6 L X 

1 -5 196733 3 

2 -5 196733 3 

3 -5 196733 3 

4 -5 196733 3 

5 -5 196733 3 

6 -5 196733 3 

7 -5 196733 3 

8 -5 196733 3 

9 -5 196733 3 

10 -5 196733 3 

11 -5 196733 3 

12 -5 196733 3 

13 -5 196733 3 

14 -5 196733 3 

15 -5 195733 3 

J* 3 K* 7 L X 

1 -5 196733 3 

2 -5 196733 3 

3 -5 196733 3 

4 -5 196733 3 

5 -5 196733 3 

6 -5 196733 3 

7 -5 196733 3 

8 -5 186733 3 


246102 

2 570579 

947492 

246102 

2 571434 

947076 

246102 

2 571954 

947034 

246102 

2 572197 

946988 

Y 

Z 

R/RREF 

555807 

0 000000 

959280 

555S07 

1 238146 

960636 

555807 

1 880363 

962477 

555807 

2 213475 

961532 

555807 

2 386257 

958945 

555807 

2 475878 

957201 

555807 

2 522364 

955477 

555807 

2 546476 

953739 

555807 

2 558932 

951881 

555807 

2 565469 

949984 

555807 

2 568834 

943314 

555807 

2 570579 

947352 

555807 

2 571434 

946974 

555807 

2 571954 

94694 1 

555807 

2 572197 

946396 

Y 

Z 

fi/RREF 

659714 

0 000000 

95761 1 

6597 1 4 

1 2381 46 

959001 

659714 

1 380363 

960929 

6597 1 4 

2 213475 

960091 

659714 

2 386257 

957639 

659714 

2 4 75878 

9561^"' 1 

659714 

2 522364 

95^ 

659714 

2 546476 

954.02 

659714 

2 558982 

951519 

659714 

2 555469 

949916 

6597 U 

2 568834 

943507 

659714 

2 570579 

947706 

659714 

2 571484 

947394 

659714 

2 571954 

947374 

6597 1 4 

2 572197 

947334 

Y 

Z 

R/RREF 

694574 

0 oocooo 

955595 

694574 

1 238 146 

956966 

694574 

1 8S0363 

958863 

694574 

2 213475 

958024 

694574 

2 386257 

955624 

694574 

2 475878 

954 1 95 

694574 

2 522364 

952925 

694574 

2 546476 

951733 

694574 

2 558932 

950470 

694574 

2 565469 

949224 

694574 

2 568S34 

948131 

694574 

2 57C579 

947529 

694574 

2 571484 

947282 

694574 

2 571954 

947276 

694574 

2 572197 

947235 

Y 

Z 

R/RREF 

706270 

0 000000 

953199 

706270 

I 238U5 

954618 

706270 

I 880363 

956633 

706270 

2 213475 

955930 

706270 

. 2 386257 

35 3655 

706270 

2 475378 

952345 

706270 

2 522364 

951224 

706270 

2 546476 

950295 


' ■> 


048778 

001538 

- 000052 

991712 

.939639 

1 013341 

023699 

000S83 

- 000022 

992109 

939603 

1 013924 

009185 

000368 

- 000003 

992189 

939637 

1 014024 

0 000000 

0 000000 

0 000000 

992202 

939603 

1 014057 

U/AREF 

V/AREF 

V/AREF 

T/TREF 

P/PREF 

ENT 

226978 

- 000342 

0 000000 

983014 

9429^ 

999497 

223466 

- 000296 

- 007033 

933610 

944892 

999538 

214844 

- ooom 

- 010684 

984486 

947545 

.999663 

204829 

00026! 

- 009277 

984338 

946472 

999305 

195609 

000723 

- 005690 

983717 

943331 

I 00G352 

186757 

001142 

- 00333! 

983801 

941694 

1 001 166 

1 76298 

001505 

- 001799 

984424 

940594 

I 002522 

161206 

CO 1822 

- 000930 

935675 

940077 

1 004527 

140303 

002058 

- 000475 

987290 

939783 

1 006959 

111692 

0021 18 

- 000238 

989180 

930706 

1 009692 

078351 

001865 

- 0001 16 

990845 

939633 

1 012104 

046432 

001273 

- 000054 

991876 

939655 

1 013567 

022652 

000597 

- 000022 

992233 

939619 

1 014094 

00881 I 

000181 

- 000003 

992303 

939653 

1 014180 

0 000000 

0 000000 

0 000000 

992315 

939619 

1 014211 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

205705 

- 000119 

0 000000 

984635 

942898 

1 001842 

203189 

- 000113 

- 007609 

985244 

944850 

1 001881 

194608 

- 000062 

- 011574 

986150 

947621 

1 001997 

184786 

000088 

- 0I0I19 

98602! 

946670 

1 002216 

1 76005 

000306 

- 006292 

985403 

943660 

1 002612 

167876 

000505 

- 003743 

985469 

942200 

1 003327 

158483 

000670 

- 002088 

986018 

941252 

1 004515 

144315 

C0C846 

- 001 1 13 

937107 

940814 

1 006255 

126I7I 

000991 

- 000577 

988484 

940561 

1 008329 

100338 

001002 

- 000286 

990086 

340498 

1 010646 

070246 

000740 

- 000135 

991490 

940435 

1 012680 

041544 

000226 

- 000053 

99235! 

940457 

1 013902 

020249 

- 000235 

- 000023 

992644 

940425 

1 014334 

007831 

- 000290 

- 000007 

992698 

940456 

1 014398 

0 000000 

0 000000 

0 000000 

992707 

940425 

1 Cl 4424 

U/AREF 

v/aref 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 76069 

- 00C09I 

0 000000 

986759 

942942 

1 004851 

172608 

- 000084 

- 008303 

987348 

944859 

1 004874 

164231 

- 000056 

- 012677 

988201 

947549 

1 004946 

154351 

000010 

- 011224 

988004 

946532 

1 005098 

146840 

000104 

- 007107 

987307 

943494 

1 005396 

1 3990 1 

000194 

- 004240 

987272 

942050 

1 005963 

1 32263 

000237 

- 002394 

987678 

941 183 

1 006913 

121 188 

000219 

- 001320 

988543 

S40829 

1 008299 

105453 

000163 

- 000699 

989635 

940619 

1 009950 

0S3587 

000056 

- 000341 

990896 

940583 

1 011767 

058188 

- 000180 

- 000145 

991978 

940526 

1 013339 

034175 

- 000497 

- 000056 

992640 

940555 

I 014273 

016560 

- 000680 

- 000020 

992862 

940520 

1 014605 

006425 

- 000487 

- 000007 

992904 

940555 

1 014651 

0 OOOGOO 

0 000000 

0 000000 

992911 

940520 

I 014676 

U/AREF 

V/AREF 

U/AREF 

T/iREF 

P/PREF 

ENT 

132165 

- 000032 

0 OOCOOO 

989215 

942919 

1 008364 

128954 

- 000023 

- 008523 

9S9790 

944871 

1 008350 

121286 

- 000022 

- 013005 

990600 

947640 

1 008324 

1 1 2997 

- 000010 

- 01 1490 

990333 

946689 

1 008348 

106393 

000005 

- 007187 

989543 

943683 

1 008506 

I0I2I5 

000021 

- 004099 

989387 

.942238 

1 008901 

095957 

000035 

- 002083 

989603 

941334 

1 009597 

088304 

000031 

- 000994 

9901S7 

S40979 

1 010538 



9 

-5 

196733 

3.706270 

2 558982 

949380 

076949 

- 000053 

- 000455 

990963 

.940801 

1 011770 

10 

-5 

196733 

3 706270 

2 565469 

948532 

060818 

- 000247 

- 000189 

.991823 

.940780 

I 0I30U 

11 

-5 

196733 

3 706270 

2 568834 

947802 

041972 

- 000473 

- 000059 

992546 

940737 

I 014060 

12 

-5 

196733 

3 706270 

2 570579 

347416 

024345 

- 000568 

- 00001 1 

992981 

940766 

1 014670 

13 

-5 

196733 

3 706270 

2 571484 

947249 

01 1682 

- 000578 

- 000004 

993126 

940738 

1 014889 

14 

-5 

196733 

3 706270 

2 571954 

947254 

004527 

- 000361 

- 000007 

993153 

940768 

I 0I49I5 

15 

-5 

196733 

3 706270 

2 572197 

947219 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

993158 

.940738 

I 014935 

8 L 


X 

Y 

Z 

R/RR5F 

U/AREF 

V/AREF 

W/ARFF 

T/TREF 

P/PREF 

ENT 

1 

-5 

196733 

3.710194 

0 000000 

951276 

079470 

- 00001 I 

0 oooooo 

991238 

.942941 

1 011242 

2 

-5 

196733 

3 710194 

1 23814$ 

952699 

076938 

- 000009 

- 007173 

991770 

.944858 

I 011180 

3 

-5 

196733 

3 710194 

1 830363 

954735 

071028 

- 000007 

- 010790 

992474 

. 947549 

1 01 1034 

4 

-5 

196733 

3 710194 

2 213475 

954C85 

064973 

- 000008 

- 009114 

992085 

946533 

1 0I09I3 

5 

-5 

•96733 

3 710194 

2 386257 

95 1883 

060578 

- 000011 

- 005185 

991 190 

.9.43497 

1 010936 

6 

-5 

196733 

3 710194 

2 475878 

950667 

057551 

- 000014 

- 002607 

990943 

942056 

1 011200 

7 

-5 

196733 

3 710194 

2 632364 

949696 

054856 

- 000019 

- 000955 

991047 

941 194 

I 011720 

8 

-5 

196733 

3 710194 

2 546476 

948960 

050906 

- 000031 

- 000018 

991448 

940844 

I 012443 

9 

-5 

196733 

3 710194 

2 558982 

948280 

044586 

- 000053 

. 000389 

991948 

940645 

1 013245 

10 

-5 

196733 

3 710194 

2 565469 

947745 

035154 

- 000115 

000332 

992489 

940627 

I 014026 

1 ' 

-5 

196733 

3.710194 

2 568334 

94 7 305 

023363 

- 000259 

000239 

992906 

940586 

1 014641 

12 

-5 

196733 

3 710194 

2 570579 

947099 

0 1 3632 

- 000357 

000087 

993157 

940618 

1 014986 

13 

-5 

196733 

3 710194 

2 571484 

946994 

006408 

- 000233 

000023 

993236 

940589 

1 015112 

14 

-5 

196733 

3 710194 

2 571954 

94 701 1 

002472 

- 000159 

- 000022 

993251 

940620 

1 015119 

15 

-5 

196733 

3 710194 

2 572197 

946376 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

993254 

940590 

1 015137 

9 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/f^REF 

ENT 

1 

-5 

196733 

3 71 151 1 

0 000000 

950437 

031620 

- 000002 

0 OOOOOO 

992091 

942919 

1 012470 

2 

-5 

196733 

3 711511 

1 238146 

951905 

030271 

- 00000! 

- 003811 

992611 

.944871 

I 012375 

3 

-5 

196733 

3 71151 1 

1 880363 

954049 

027229 

-.000001 

- 005558 

993283 

947640 

I 012149 

4 

-5 

196733 

3 711511 

2 213475 

953508 

024357 

- 000006 

- 004126 

992849 

946689 

1 011936 

5 

-5 

196733 

3 71 15! 1 

2 366257 

951377 

02251 1 

- 000010 

- 001602 

991913 

943683 

1 011889 

6 

-5 

196733 

3 71151 1 

2 475S78 

950195 

021372 

- 00001! 

- 000257 

991628 

942240 

1 012100 

7 

-5 

196733 

3 71151 1 

2 522364 

949236 

02048/ 

- 000013 

000530 

991679 

941338 

1 012562 

8 

-5 

196733 

3 71 151 1 

2 546476 

948564 

01319! 

- 000013 

. 000835 

99201 1 

940986 

1 013188 

9 

-5 

196733 

3 71 151 1 

2 558982 

947994 

016930 

- 000013 

000878 

992421 

940809 

1 013850 

10 

-5 

196733 

3 711511 

2 565469 

94753! 

0 1 3323 

- 000013 

000785 

992828 

940785 

1 014443 

1 1 

-5 

196733 

3 711511 

2 568834 

947258 

003881 

- 000013 

000507 

9931 15 

940737 

1 014874 

12 

-5 

1<_j733 

3 71151 1 

2 570579 

947125 

004SS4 

- 000013 

. 000 1 77 

993287 

. 940767 

1 015107 

13 

-5 

195733 

3 71 151 1 

2 57U84 

947046 

002256 

- 000013 

000046 

993339 

940738 

1 015194 

14 

-5 

196733 

3 71161 1 

2 571954 

947070 

000884 

- 000013 

- 000006 

.993347 

940769 

1 015192 

15 

-5 

196733 

3.71151 1 

2 572197 

947038 

0 oooooo 

0 OOOUOO 

0 OOOOOO 

993348 

940739 

1 015207 

10 L 


X 

Y 

Z 

R/PREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-5 

196733 

3 711952 

0 oooooo 

950 305 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

992251 

94294! 

1 012690 

2 

-5 

196733 

3 711952 

1 238146 

951743 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

992765 

.944858 

1 012602 

3 

-5 

196733 

3 71 1952 

1 880363 

953323 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

993423 

947549 

1 012388 

4 

-5 

196733 

3.711952 

2 213475 

953234 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

992970 

946533 

1 012177 

5 

-5 

196733 

3.711952 

2 336257 

951087 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO. 

932020 

943497 

1 0I212I 

6 

-5 

1 96733 

- 3 711952 

2 475878 

949913 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

991724 

942057 

I 012316 

7 

-5 

196733 

3 711952 

2 522364 

949003 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

991773 

941 196 

1 012757 

8 

-5 

196733 

3 71 1952 

2 546476 

948343 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

392097 

940848 

1 013370 

9 

-5 

196733 

3 71 1952 

2 558982 

.947766 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

992495 

. 940653 

1 014023 

10 

-5 

196733 

3 711952 

2 565469 

947377 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

992888 

940639 

1 014591 

1 1 

-5 

196733 

3 711952 

2 568834 

947077 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

393158 

940597 

1 014996 

12 

-5 

196733 

3 711952 

2 570579 

946950 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

993319 

940623 

1 015215 

13 

-5 

196733 

3.711952 

2 571484 

946872 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

993365 

.940589 

1 015295 

14 

-5 

196733 

3 711952 

2 571954 

946900 

0 oooooo 

0 OOOOOO 

0 oooooo 

993366 

.940618 

1 015285 

15 

-5 

196733 

3 71 1952 

2 572197 

946969 

0 oooooo 

0 oooooo 

0 oooooo 

993357 

.940678 

1 015246 

1 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-4 

222346 

0 000000 

0 OOOOOO 

957930 

260127 

0 oooooo 

0 oooooo 

980047 

938317 

997042 

2 

-4 

222346 

0 . 000000 

1 238146 

961547 

254781 

0 oooooo 

- 021623 

931604 

943859 

.997121 

3 

-4 

222346 

0 000000 

1 880363 

968087 

241512 

0 oooooo 

- 036568 

. 934536 

953116 

.997392 

4 

-4 

222346 

0 000000 

2 213475 

970196 

225728 

0 oooooo 

- 040968 

985999 

956612 

.998005 

5 

-4 

222346 

0 000000 

2 386257 

. 968889 

210521 

0 oooooo 

- 039330 

986514 

955822 

999065 



:> 


6 

-4 

.222346 

0.000000 

2 475878 

.968161 

196235 

0 OOOOOO 

- 03755! 

,987748 

956299 

1 000615 

7 

-4 

.222346 

0 000000 

2 522364 

966720 

18200! 

0 OOOOOO 

- 035073 

.989255 

956333 

1 002739 

8 

-4 

222346 

0 000000 

2 546476 

364917 

I6518I 

0 OOOOOO 

• 031987 

991206 

956432 

1 005468 

9 

-4 

222346 

0 000000 

2 558982 

962658 

143431 

0 OOOOOO 

- 027847 

993442 

956345 

1 008681 

10 

-4 

222346 

0 000000 

2 565469 

, 960343 

1 14543 

0 OOOOOO 

- 022239 

995889 

956395 

1 012139 

1 1 

-4 

222346 

0 000000 

2 568834 

958213 

079930 

0 OOOOOO 

- 015575 

993002 

956298 

I 015188 

12 

-4 

222346 

0 000000 

2 570579 

. 956990 

045840 

0 oooooo 

- 003941 

999342 

956360 

1 017071 

13 

-4 

. 222346 

0 000000 

2 571484 

. 956452 

020832 

0 oooooo 

- 004065 

999821 

95628 1 

1 017787 

14 

-4 

222346 

0 000000 

2 571954 

9564 1 4 

007433 

0 oooooo 

- 001452 

999936 

956353 

1 017921 

15 

-4 

.222346 

0.000000 

2 572197 

.956321 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

999955 

956278 

1 017979 

2 !. 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4 

222346 

1 670379 

0 000000 

957520 

258517 

000219 

0 OOOOOO 

980179 

93854 1 

997347 

2 

•4 

222346 

1 670379 

1 238146 

96 1 089 

253214 

000370 

- 021494 

981716 

943517 

997426 

3 

•4 

222346 

1 670379 

! 880363 

967523 

240049 

000778 

- 036315 

984607 

952630 

997696 

4 

-4 

222345 

1 .670379 

2 213475 

969579 

224377 

001326 

- 040666 

986045 

956049 

9983F3 

5 

-4 

222346 

1 670379 

2 336257 

968299 

209263 

001376 

- 039069 

936563 

955288 

999358 

6 

-4 

222346 

! 670379 

2 475878 

967590 

! 95069 

002346 

- 037318 

987789 

955775 

1 000893 

7 

-4 

222346 

1 670379 

2 522364 

96S16! 

180940 

002711 

- 034362 

989276 

955800 

I 002993 

8 

-4 

222346 

1 .670379 

2 54S476 

364 3S8 

164261 

002963 

- 031806 

991204 

955906 

1 005686 

9 

-4 

222346 

1 .670379 

2 558982 

962158 

142707 

003100 

- 027705 

993405 

955812 

1 008853 

10 

•4 

222346 

1 670379 

2 565469 

959884 

114063 

003033 

- 022195 

995816 

955868 

1 012259 

1 1 

-4 

222346 

I 670379 

2 560834 

957780 

079708 

002660 

- 01553! 

997896 

955766 

1 015264 

12 

-4 

222346 

1 670379 

2 570579 

956580 

045814 

001953 

- 008936 

99922! 

955834 

1 017122 

13 

-4 

222346 

1 670373 

2 571484 

956042 

020884 

.001 126 

- 004075 

999693 

955748 

1 017831 

14 

-4 

222346 

1 670379 

2 571954 

95601 1 

007478 

000473 

- 001460 

999803 

955827 

1 017961 

15 

-4 

222346 

1 670379 

2 572137 

955912 

0 OOOOOO 

0 OOOOOO 

0,000000 

999826 

955746 

1 018022 

3 L 


X 

r 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4 

222346 

3 246102 

0 000000 

,95648! 

252777 

000269 

0 OOOOOO 

980743 

938062 

998355 

2 

-4 

222346 

3 246102 

1 238 146 

959948 

247579 

000481 

- 021298 

982238 

942897 

998430 

3 

-4 

222346 

3 246102 

1 8B0 563 

966 1 06 

234696 

001107 

- 035808 

985013 

951626 

998693 

4 

-4 

222346 

3 246102 

2 213475 

967899 

219385 

00205! 

■ 039873 

986332 

954669 

999289 

5 

•4 

222346 

3 246102 

2 386257 

966564 

204609 

003092 

- 038207 

986794 

953799 

1 000309 

6 

>4 

222346 

3 245102 

2 475873 

965898 

190742 

004018 

- 036501 

987984 

954292 

1 001792 

7 

-4 

222346 

3 246102 

2 522364 

964508 

I 76937 

004743 

- 034096 

939406 

954290 

1 003812 

S 

•4 

222346 

3 246102 

2 546476 

962325 

160783 

005265 

- 031133 

991255 

954405 

1 006390 

9 

-4 

222346 

3 246102 

2 55S9S2 

96069 1 

1 39865 

005540 

- 027153 

993344 

954297 

1 009407 

10 

-4 

222346 

3 246102 

2 565469 

958544 

I '2015 

005444 

- 021798 

995641 

954386 

1 012647 

1 1 

-4 

222346 

3 245102 

2 568834 

956532 

078522 

004794 

- 015301 

997615 

954250 

1 015508 

12 

-4 

222346 

3 246102 

2 570579 

955400 

045363 

003548 

- 008843 

998882 

954333 

1 017279 

13 

>4 

222346 

3 246102 

2 571484 

954373 

020830 

002074 

- 004065 

99933! 

954234 

1 01796! 

14 

-4 

222346 

3 246102 

2 571954 

954853 

007514 

000896 

- 001467 

999443 

954326 

1 018081 

15 

-4 

222346 

3 246102 

2 572197 

.954746 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

999460 

95423! 

1 018147 

4 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4 

222346 

3 555807 

0 oooooo 

955 ! 00 

240627 

000167 

0 OOOOOO 

982053 

937959 

1 000266 

2 

•4 

222346 

3 555807 

1 238146 

958578 

235527 

000293 

- 021473 

933546 

942805 

1 000331 

3 

-4 

222346 

3 555807 

1 880363 

964658 

222963 

00077! 

- 035798 

986270 

951413 

1 000568 

4 

•4 

222346 

3 555807 

2 213475 

960197 

208195 

00 1 703 

- 039275 

987448 

954069 

1 001 124 

5 

-4 

222346 

3.655307 

2 386257 

964624 

194105 

002933 

- 037003 

987743 

952800 

1 002076 

6 

•4 

222346 

3 555807 

2 475878 

963915 

180975 

004147 

- 035002 

983808 

.953126- 

1 003451 

7 

-4 

222346 

3 555807 

2 522364 

962586 

168031 

005177 

- 032536 

990099 

953055 

1 005317 

8 

•4 

222346 

3 565307 

2 546476 

961035 

152788 

005943 

- 029662 

991791 

953146 

1 007684 

9 

-4 

222346 

3 555807 

2 559982 

959082 

13308! 

006378 

- 025872 

993685 

953026 

1 010430 

10 

-4 

222346 

3 555807 

2 565469 

957145 

106720 

006321 

- 020786 

995763 

953094 

1 013368 

1 1 

•4 

222346 

3 555307 

2 563334 

955317 

074924 

005572 

- 014603 

997550 

952977 

1 015957 

12 

-4 

222346 

3 555807 

2 570579 

354305 

04338$ 

004119 

- 008466 

93B697 

953061 

1 017557 

13 

-4 

222346 

3 555807 

2 571484 

953820 

019999 

002420 

- 003904 

999099 

95296! 

1 018174 

14 

-4 

222346 

3 555807 

2 571954 

.953818 

007247 

001061 

- 001415 

999200 

953055 

1 018278 

15 

-4 

222346 

3 555807 

2 572197 

953705 

d OOOOOO 

0 OOOOOO 

0 OOOOOO 

999217 

952958 

1 018343 

5 L 


X 

Y . 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4 

222346 

3 659714 

0 OOOOOO 

95317! 

2I9R43 

000038 

0 OOOOOO 

984092 

938007 

1,003153 

2 

-4 

222346 

3 659714 

I 238146 

.956723 

.214822 

000070 

- 022120 

985600 

.942946 

1 003197 



3 

-4 

222346 

3 659714 

1 380363 

962982 

202546 

000232 

- 03662! 

988353 

951765 

1 003378 

4 

-4 

222346 

3 659714 

2 2134 75 

964677 

188383 

00C645 

- 039578 

989518 

954566 

I 003855 

5 

-4 

222346 

3 659714 

2 386257 

963165 

175264 

OOI3S3 

- 036327 

989718 

953262 

I 004688 

6 

•4 

222346 

3 659714 

2 475878 

962490 

163407 

002298 

- 033406 

990626 

953467 

1 005892 

7 

>4 

222346 

3 659714 

2 522364 

961257 

I5I946 

003342 

- 030335 

991721 

953298 

1 007520 

8 

-4 

222346 

3 659714 

2 546476 

959383 

138374 

004247 

- 027342 

993178 

953340 

I 009576 

9 

-4 

222346 

3 659714 

2 553982 

958185 

120604 

00483! 

- 023667 

994794 

953196 

I 011937 

!0 

<4 

222346 

3 659714 

2 565469 

956541 

096567 

0C4S94 

- 018901 

996568 

953253 

1 0U43S 

1 1 

-4 

222346 

3 659714 

2 568834 

954986 

067509 

004263 

- 013196 

993063 

953136 

1 016621 

12 

•4 

222346 

3 659714 

2 570679 

954 154 

038791 

002991 

- 007579 

999023 

953222 

1 017954 

U 

•4 

222346 

3 659714 

2 571434 

953739 

017664 

001598 

- 003450 

999350 

9531 19 

1 018465 

U 

>4 

222346 

3 659714 

2 571954 

953756 

006308 

000633 

- 001231 

999434 

953215 

1 018543 

15 

-4 

222346 

3 659714 

2 572197 

953644 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

999447 

9531 16 

1 018603 

6 L 


X 

Y 

Z 

R/RREF 

0/AREF 

y/AREF 

V/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4 

222346 

3 694574 

0 000000 

950666 

188343 

000020 

0 OOOOOO 

985652 

937976 

1 006822 

2 

• 4 

222346 

3 694574 

1 238145 

954183 

133479 

000043 

- 022670 

988115 

942843 

I 006827 

3 

-4 

222346 

3 694574 

1 380363 

960367 

171639 

000 130 

- 037337 

990763 

95I5I6 

I 0069U 

4 

>4 

222346 

3 694574 

2 2 1 3475 

962135 

I5S400 

0-00302 ■ 

- 039917 

991818 

954264 

I 007251 

5 

-4 

222346 

3 694574 

2 386257 

960332 

14663! 

000565 

- 035875 

991922 

953071 

1 007903 

6 

-4 

222?.6 

3 694574 

2 4753 78 

96049! 

136666 

000943 

- 031973 

992695 

953385 

1 008869 

7 

>4 

22234- 

3 694574 

2 522364 

959330 

127598 

001493 

- C28035 

993566 

953207 

1 010184 

S 

• 4 

222346 

3 694574 

2 546476 

958262 

116714 

002180 

- 024437 

994741 

953222 

1 011850 

9 

• 4 

222346 

3 694574 

2 553982 

956863 

101771 

002757 

- 020619 

996028 

953062 

! 013752 

!0 

•4 

222346 

3 694574 

2 565469 

955569 

031026 

002975 

- 0161 12 

997432 

9531 16 

I 015730 

! I 

-4 

222346 

3 694574 

2 568834 

954355 

055950 

002694 

- 0! 1003 

993573 

952993 

! 017409 

12 

.4 

222346 

3 694574 

2 570579 

953747 

031506 

001923 

- 006170 

999293 

953077 

1 01S40S 

!3 

-4 

222346 

3 694574 

2 571434 

9534 1 7 

013912 

COIOIS 

- 002/20 

999537 

952976 

1 018792 

14 

-4 

222346 

3 634574 

2 571954 

953451 

004799 

000402 

- 000935 

999600 

953070 

I 018842 

!5 

-4 

222346 

3 694574 

2 572137 

953345 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

999610 

952973 

1 018898 

7 L 


X 

r 

2 

R/RREF 

U/AREF 

y/AR£F 

W/AR£F 

7/TREF 

P/PREF 

ENT 

! 

-4 

222346 

3 706270 

0 oooooo 

947895 

143300 

00000! 

0 OOOOOO 

989559 

937998 

i 010968 

2 

-4 

222346 

3 706270 

1 233146 

951439 

133854 

0000! 1 

- 021801 

991009 

942935 

1 010918 

3 

-4 

222346 

3 706270 

1 880363 

957875 

128229 

000041 

- 035657 

993601 

951745 

1 010854 

4 

-4 

222346 

3 706270 

2 2 1 3475 

959793 

1J6670 

000087 

- 037490 

994526 

954539 

1 010986 

5 

-4 

222346 

3 706270 

2 3S6257 

95B587 

107045 

000156 

- 032859 

994427 

953245 

1 01 1394 

6 

• 4 

222346 

3 706270 

2 475876 

958286 

0996 IS 

000269 

- 028618 

994986 

95348! 

! 012090 

7 

-4 

222346 

3 706270 

2 522364 

95751 1 

093635 

000447 

- 024433 

995637 

953333 

I 013079 

8 

-4 

222346 

3 706270 

2 5464 76 

956631 

086425 

000695 

- 020538 

996528 

953359 

1 014338 

9 

-4 

222345 

3 706270 

2 55S992 

9555! ! 

075524 

000953 

- 016615 

997466 

953IS9 

I 015747 

!0 

-4 

222346 

3 70C270 

2 565469 

954710 

05947! 

001142 

- 012405 

998462 

953241 

1 017143 

i ! 

-4 

222346 

3 706270 

2 568334 

953378 

039984 

001232 

- 008027 

99920! 

9531 15 

1 018253 

12 

-4 

222346 

3 706270 

2 570579 

953523 

021508 

001171 

- 004213 

999663 

95320! 

! 018876 

)3 


222346 

3 706270 

2 57U84 

953285 

008817 

000769 

- 001725 

999802 

953097 

1 019119 

14 

• 4 

222346 

3 706270 

2 571954 

953342 

002742 

000314 

- 000536 

999346 

953194 

1 019139 

15 

>4 

222346 

3 706270 

2 5721S7 

953235 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

999852 

953094 

! 01919! 

8 L 


X 

Y 

2 

R/RREF 

U/AREF 

V/ARFF 

W/AREF 

T/TREF 

P/PREF 

ENT 

i 

-4 

222346 

3 7I0I94 

0 OOOOOO 

945537 

087187 

OOOOOO 

0 OOOOOO 

992004 

937977 

1 014477 

2 

• 4 

222346 

3 710194 

1 233146 

949103 

083710 

000005 

- 017356 

993405 

942844 

1 014380 

3 

• 4 

222346 

3 710194 

1 8S0353 

955468 

075563 

000016 

- 028088 

995864 

951517 

1 01417$ 

4 

•4 

222346 

3 710194 

2 213475 

957500 

0671 -> 

000023 

- 028708 

996621 

954264 

1 014085 

5 

•4 

222346 

3 71CI94 

2 386257 

956538 

0605/3 

000028 

- 024385 

996376 

953071 

t 014243 

6 

• 4 

222346 

3 710194 

2 475878 

956451 

056068 

000043 

- 020975 

996795 

953385 

I 014707 

7 

>4 

222346 

3 710194 

2 522364 

955814 

053194 

000080 

- 017559 

997275 

953209 

I 015466 

8 

• 4 

222346 

3 7I0I94 

2 546476 

955173 

049778 

000 1 40 

- 0M3S7 

997964 

953228 

1 016441 

9 

• 4 

222346 

3 7ICI94 

2 558932 

954373 

043676 

000185 

- 011211 

998535 

953070 

1 017465 

10 

-4 

222346 

3 7I0I94 

2 565469 

953810 

033704 

DOOMS 

- 007974 

999283 

953126 

1 018366 

1 ’ 

-4 

222346 

3 710194 

2 563634 

953321 

021350 

000 144 

- 004795 

999672 

953009 

1 018971 

12 

>4 

222346 

3 710194 

2 570579 

953184 

0I00I7 

000507 

- 002182 

999903 

953091 

1 019265 

13 

-4 

222346 

3 710194 

2 571484 

953036 

002963 

000758 

- 000623 

999954 

952993 

1 019^- 

14 

>4 

222346 

3 710194 

2 57IS54 

953106 

000407 

0C0320 

- 000104 

999977 

953084 

1 019374 

15 

-4 

222346 

3 710194 

2 572137 

953^308 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

99998! 

952990 

1 019420 




J* 


J* 


J« 


L 


X 

y 

Z 

P/RREF 

1 

•4 

222346 

3 71151! 

0 oooooo 

944493 

2 

• 4 

222346 

3 7!!5! 1 

1 238146 

948123 

3 

•4 

222346 

3 71 151 1 

1 880563 

<yas2B 

4 

>4 

222346 

3 71151! 

2 213475 

956782 

5 

-4 

222346 

3 711511 

2 386257 

955S44 

6 

-4 

222346 

3 711511 

2 475R78 

9557 78 

7 

-4 

222346 

3 71151 1 

2 522364 

355227 

8 

>4 

222346 

3 71 1511 

2 546476 

954662 

9 

•4 

222346 

3 711511 

2 553932 

953951 

10 

-4 

222346 

3 711511 

2 565469 

953527 

1 1 

-4 

222346 

3 711511 

2 568834 

953187 

12 

-4 

222346 

3 71 15! 1 

2 570579 

95J165 

13 

•4 

222345 

3 71 151 1 

2 571484 

953054 

14 

•4 

222346 

3 71151 1 

2 571954 

953140 

15 

• 4 

222346 

3 7115! 1 

2 572197 

953037 

L 


X 

r 

Z 

R/RRFF 

1 

-4 

222346 

3 711952 

0 OOOOOO 

944301 

2 

• 4 

222346 

3 711952 

1 238146 

947359 

3 

'4 

222346 

3 711952 

1 S80363 

954236 

4 

-4 

222346 

3 71 1952 

2 213475 

956368 

5 

• 4 

222346 

3 711952 

2 386257 

955-551 

6 

-4 

222346 

3 711952 

2 475878 

955578 

7 

>4 

222346 

3 71 1962 

2 522364 

955019 

8 

>4 

222346 

3 7! 1952 

2 546476 

954463 

9 

-4 

222346 

3 711952 

2 558962 

953783 

10 

•4 

222346 

3 711952 

2 565469 

953373 

1 1 

-4 

222346 

3 711952 

2 568834 

953041 

12 

-4 

222346 

3 711952 

2 570579 

953003 

13 

-4 

222346 

3 711952 

2 571484 

952908 

14 

-4 

222346 

3 711952 

2 571954 

952995 

15 


222346 

3 7H952 

2 672197 

953016 

L 


X 

1 

Z 

R/RREF 

1 

-3 

340757 

0 00000*0 

0 OOOOOO 

949740 

2 

-3 

340757 

0 oooooo 

1 06 3938 

955769 

3 

-3 

340757 

0 oooooo 

1 615641 

96 ■'379 

4 

-3 

340757 

0 oooooo 

1 901857 

97j* •,$ 

5 

-3 

340757 

0 oooooo 

2 050315 

974787 

6 

-3 

340757 . 

0 oooooo 

2 127319 

976066 

7 

-3 

340757 

0 oooooo 

2 167260 

975163 

8 

-3 

340757 

0 oooooo 

2 187977 

973821 

9 

-3 

340757 

0 oooooo 

2 198723 

971225 

10 

•3 

340757 

0 oooooo 

2 204297 

96071 7 

1 1 

•3 

340757 

0 oooooo 

2 207188 

965373 

12 

-3 

340757 

0 occooo 

2 205688 ■ 

964472 

13 

-3 

340757 

0 oooooo 

2 209465 

963517 

14 

-3 

340 757 

0 oooooo 

2 209869 

963680 

15 

-3 

340757 

0 oooooo. 

2 210078 

963303 

L 


X 

Y 

Z 

R/RREF 

1 

-3 

34C757 

1 670379 

0 OOOOOO 

949117 

2 

-3 

340757 

1 670379 

1 063833 

955082 

3 

•3 

340757 

1 670379 

I 61564! 

966554 

4 

•3 

340757 

1 670.379 

1 901857 

972'176 

5 

-3 

340757 

1 670379 

2 0503 15 

973926 

6 

-3 

340757 

1. 670379 

2 I273I9 

975217 

7 

-3 

340757 

I 670379 

2 167260 

974331 

8 

-3 

340757 

! 670379 

2 137977 

973022 

9 

-3 

340757 

1 670379 

2 198723 

970463 

10 

•3 

340757 

1 670379 

2 204297 

968002 

1 1 

-3 

340757 

1 670379 

2 207188 

965197 

12 

-3 

340757 

1 670379 

2 208688 

963816 



U/APEF 
034445 
032584 
028336 
024228 
021236 
0t327l 
018369 
017453 
015300 
011179 
006082 
001756 
- 000610 
- 000889 
0 000000 

U/AR£r 
0 000000 
0 000000 
0 ooocoo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 

U/ARFF 
292033 
285953 
271118 
25388S 
236346 
220727 
205907 
189883 
169454 
141134 
104171 
0642 1 7 
032170 
012794 
0 OOOOOO 

U/ARFF 

290489 

284451 

269725 

252602 

235644 

219621 

204905 

189012 

168751 

140637 

103839 

064110 


V/AREF 

- oooooo 
000001 
000004 
000001 

- 000002 

- OOOOOO 

- 000001 
- 000001 

- 00=3001 

- 000001 
- 000002 
- 000002 
- 000002 
- 000002 
0 oooooo 

V//.RFF 
0 300000 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 

0 oooooo 

0 OOOOOO 
0 OOOOOO 
0 OOOOOO 

0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 

V/ARFF 

0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 ooocoo 
0 oooooo 
0 ooocoo 
0 oooooo 

V/ARFF 

000323 

001044 

001622 

02392 

003165 

003324 

004325 

004648 

004753 

004524 

003822 

002683 


W/ARFF 
0 OOOCOO 

- 008919 

- 014247 

- 013803 

- 01 1076 

- 00961 1 

- OCSOOl 

- 006344 

- 004662 

- 003189 

- 002081 

- 000938 

- 000013 
000174 

0 OOOOOO 

W/ARFF 

0 OOOOOO 

0 oooooo 
0 oooooo 
0 oooooo 

0 OOOOOO 

0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 
0 oooooo 

u/arff 

0 oooooo 

- 040076 

- 069086 

- 081444 

- 084019 

- 083853 

- 08*3864 

- 076! 1 I 

- 06S629 

- 057521 

- 042535 

- 026298 

- 013184 

- 005246 
0 OOOOOO 

W/ARFF 
0 OOOOOO 

- 039860 

- 068676 

- 080953 

- 033560 

- 083419 

- 080463 

- 075759 

- 068343 

- 057318 

- 042470 

- 026254 


T/TRCF 
993118 
994527 
996980 
997655 
997281 
997599 
998020 
998638 
999202 
999700 
999934 
1 000062 
1 000068 
I 000081 
1 000082 

T/TREF 
993302 
994709 
997150 
997800 
997406 
997708 
9981 12 
998718 
999269 
999748 
999965 
1 000077 
1 000072 
1 000076 
1 000079 

T/TREF 

977984 

960457 

935362 

,983555 
990720 
993322 
995562 
998191 
1 000917 
I 004055 
1 006716 
1 008570 
I 009213 
! 009407 
1 009439 

T/TREF 
978109 
380556 
985404 
988565 
990725 
993309 
995523 
998120 
I 000805 
I 003900 
I 006523 
1 008356 


P/PREF 
937998 
942934 
951745 
954538 
953245 
953483 
953336 
953362 
953190 
953241 
953125 
953224 
9531 18 
953218 
9531 15 

P/PREF 

937976 

942843 

951516 

954265 

953072 

953388 

953215 

953239 

953087 

953139 

953008 

953076 

952977 

953068 

953091 

P/PREF 

928830 

S3709! 

95 j 219 

962128 

965740 

969548 

970836 

972059 

972115 

972645 

972365 

972737 

972393 

972745 

972396 

P/PREF 

928340 

936511 

952447 

961257 

964893 

958692 

969968 

971193 

971243 

971777 

971493 

971869 


ENT 

1 016062 
I 015947 
I 01567! 
1 015443 
I 015459 
I 01581 1 
1 016475 
1 017345 
1 018223 
1 0I89I2 
1 019295 
1 019435 
1 019489 
1 019465 
I 019510 

ENT 

I 016335 
1 016245 
I 016010 
1 015766 
I 015712 
I 016008 
1 016657 
I 017511 
1 018363 
1 019024 
1 019389 
! 019519 
1 019556 
1 019523 
1 0I95I7 

ENT 

998366 
998360 
99852! 
999329 
1 000891 
1 002994 
1 005628 
1 008839 
I 012675 
1 01690! 
1 020794 
1 023270 
1 024328 
I 024456 
! 024643 

ENT 
998756 
998748 
998904 
999704 
1 001251 
1 003330 
I 005932 
1 009099 
1 012879 
1 017044 
! C20886 
I 023332 



13 

-3 340757 

1 670379 

2 209465 

962363 

032150 

• 

001487 

- 0I3I76 

1 008992 

071521 

I 

024382 

14 

-3 34C757 

1 670379 

2 209969 

963032 

012795 

000625 

- 005246 

1 009185 

971877 

I 

024506 

15 

-3 340757 

1 670379 

2 210078 

962651 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 009217 

971524 

I 

024701 

L 

X 

T 

Z 

B/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-3 340757 

3 246102 

0 000000 

947641 

284959 

001 108 

0 OOOCOO 

978719 

927474 

1 

000001 

P 

-3 340757 

3 246102 

1 063333 

953456 

279052 

001426 

- 039459 

991098 

935433 


999982 

3 

-3 340757 

3 246102 

1 615641 

964516 

264671 

002349 

- 067740 

985768 

960789 


000II7 

4 

-3 340757 

3 246102 

I 901857 

96.9348 

247943 

003720 

- 079547 

98S745 

953031 


000887 

5 

-3 340757 

3 246102 

2 050315 

971390 

231330 

005220 

- 082006 

990810 

962463 


002381 

6 

-3 340757 

3 246102 

2 127319 

9727 II 

215630 

006541 

- 081896 

993329 

966222 


004384 

7 

-3 340757 

3 246102 

2 167260 

971666 

201276 

007553 

- 079025 

995454 

967448 


006882 

b 

-3 340757 

3 246102 

2 187977 

970660 

185814 

008224 

- 074476 

997953 

968673 


00991 1 

9 

-3 340757 

3 246102 

2 198723 

958211 

166092 

008471 

- 067266 

1 000508 

968702 


013520 

10 

-3 340757 

3 246102 

2 204297 

965897 

13863! 

009102 

- 056503 

I 003470 

969249 


017495 

1 1 

-3 340757 

3 246102 

2 207188 

963199 

102601 

006994 

- 04 1 945 

1 005969 

968949 


02H70 

12 

-3 340757 

3 246102 

2 208688 

961900 

063464 

004905 

• 025991 

1 007736 

969341 


023516 

13 

-3 340757 

3 246102 

2 209465 

960959 

031906 

002778 

- 013076 

1 008345 

968978 


024536 

14 

-3 340757 

3 246102 

2 209869 

961146 

012721 

001188 

- 005216 

I 008535 

969349 


024649 

15 

-3 340757 

3 246102 

2 210073 

960751 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 008566 

968981 . 


024849 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-3 340757 

3 559626 

0 000000 

946056 

273390 

000764 

0 OOOOOO 

980268 

927388 


002254 

2 

-3 340757 

3 559626 

1 063838 

951862 

267640 

000978 

- 039475 

932625 

935323 


002209 

3 

-3 340757 

3 559626 

1 61564' 

962719 

253732 

001755 

- 067266 

987170 

950363 


002287 

4 

-3 340757 

3 559626 

1 901857 

967650 

237746 

003210 

- 07804S 

989882 

957859 


002988 

5 

-3 340757 

3 559626 

2 050315 

968628 

221940 

005090 

- 079533 

991658 

960548 


004383 

6 

-3 340757 

3 559626 

2 127319 

969317 

207005 

006921 

- 079001 

993986 

96 3985 


006247 

7 

-3 340757 

3 559626 

2 167250 

969021 

193433 

008431 

- 076102 

995941 

965088 

1 

008557 

6 

-3 340757 

3 559526 

2 137977 

95 7954 

1 78830 

009477 

- 071744 

998256 

956266 


01 1345 

9 

-3 340757 

3 55S626 

2 I9S723 

955702 

160105 

00995! 

- 064872 

1 000592 

966273 


014658 

10 

-3 340757 

3 559626 

2 204297 

963617 

133843 

009617 

- 054567 

1 003318 

966814 


018302 

1 1 

-3 340757 

3 559626 

2 207188 

961 127 

0992 1 3 

008254 

- 040568 

1 005600 

966510 


021675 

12 

-3 340 757 

3 559626 

2 205688 

959961 

061472 

005972 

- 025179 

1 007231 

966903 


023830 

13 

-3 340757 

3 559626 

2 209465 

959067 

030958 

003501 

- 012689 

1 007790 

966538 


024780 

14 

-3 340757 

3 559626 

2 209869 

959263 

012359 

001558 

- 005068 

I 007968 

966911 


024874 

15 

-3 340 757 

3 559626 

2 21 0078 

958873 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

1 007997 

966541 


025073 

L 

X 

Y 

Z 

R/RREF 

0/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-3 340757 

3 662229 

0 oooooo 

943929 

253821 

000361 

0 OOOOOO 

982652 

927553 


005597 

2 

-3 340757 

3 662229 

1 063838 

349847 

243224 

000425 

- 040008 

985024 

935623 


005507 

3 

-3 340757 

3 662229 

I 615641 

960943 

234802 

0007 IS 

- 067707 

989588 

950938 


005484 

4 

-3 340 757 

3 662229 

1 S0I857 

966017 

219703 

001408 

- 077477 

992244 

958524 


006062 

5 

-3 340757 

3 662229 

2 050315 

966933 

205163 

002578 

- 077387 

993840 

960976 


007298 

6 

-3 340757 

3 662229 

2 127319 

968022 

191713 

004150 

- 075470 

935923 

964075 


008954 

7 

-3 340757 

3 662229 

2 157260 

967272 

17968! 

005335 

- 071853 

997624 

964974 


010992 

8 

-3 340757 

3 662229 

2 137977 

966383 

166613 

007198 

- 067381 

999675 

366069 


013442 

9 

-3 340757 

3 662229 

2 198723 

964387 

149495 

007993 

- 060796 

1 001702 

966028 


016337 

10 

-3 340757 

3 662229 

2 204297 

962622 

I25II8 

007925 

- 051090 

1 004091 

966560 


019508 

1 1 

-3 340757 

3 662229 

2 207 183 

960429 

092300 

006843 

- 037967 

1 006050 

966240 


022430 

12 

-3 340757 

3 662229 

2 208583 

959467 

057513 

004896 

- 023561 

1 007474 

966638 


024288 

13 

-3 340 757 

3 662229 

2 209465 

958643 

028944 

002836 

- 011864 

1 007950 

966264 


025123 

14 

-3 340757 

3 662229 

2 209369 

958872 

01 1536 

001253 

- 004730 

1 008107 

966645 


025186 

15 

-3 340757 

3 662229 

2 210078 

958472 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 008132 

966266 


025382 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-3 340757 

3 695806 

0 oooooo 

940806 

223007 

000180 

0 OOOOOO 

985727 

927378 

1 

010083 

2 

-3 340757 

3 635806 

1 063838 

946673 

217669 

00022? 

- 040059 

988038 

935349 

1 

009935 

3 

-3 340757 

3 695806 

I 615641 

957703 

205006 

000373 

- 067432 

992461 

950483 

1 

009767 

4 

-3 340757 

3 695806 

1 901357 

962893 

19! 153 

000650 

- 076340 

994984 

958063 

I 

010148 

5 

-3 340757 

3 695S06 

2 050315 

964137 

178376 

001069 

- 074989 

996470 

960733 

1 

011134 

6 

-3 340757 

3 695806 

2 127319 

965508 

I6723I 

001704 

- 071592 

998372 

963936 

1 

012488 

7 

-3 340757 

3 695805 

2 167260 

964928 

157844 

002674 

- 066635 

999782 

964717 

1 

014162 

8 

-3 340757 

3 595S06 

2 157977 

964276 

147363 

003S58 

- 061435 

I 00I5I1 

965733 

1 

016190 

9 

-3 340757 

3 695306 

2 198723 

962593 

132752 

004346 

- 054767 

1 003157 

965632 

1 

018572 







10 

-3 

340757 

3 

695806 

2 

204297 

961227 





11 

-3 

340757 

3 

695806 

2 

207188 

959434 





12 

-3 

340757 

3 

695806 

2 

208683 

958750 





13 

-3 

340757 

3 

695006 

2 

209465 

958022 





14 

-3 

340757 

3 


2 

209069 

968.’01 





15 

•3 

340757 

3 

695006 

2 

210078 

9578 79 

J« 

5 

K» 

7 

L 


X 


Y 


Z 

R/RPEF 





1 

-3 

340757 

3 

706795 

0 

000000 

937346 





2 

-3 

340757 

3 

706795 

1 

063833 

943294 





3 

-3 

340757 

3 

706795 

1 

61564I 

954511 





4 

-3 

340757 

3 

706795 

1 

901857 

959366 





5 

-3 

340757 

3 

706795 

2 

050315 

961204 





6 

-3 

340757 

3 

706795 

2 

I273I9 

962787 





7 

-3 

340757 

3 

706795 

2 

167260 

96257! 





8 

-3 

340757 

3 

706795 

2 

187977 

962233 





9 

-3 

340757 

3 

706795 

2 

198723 

960913 





10 

-3 

340757 ■ 

3 

706795 

2 

204297 

959983 





1 1 

-3 

340757 

3 

706795 

2 

207188 

958975 





12 

-3 

340757 

3 

706796 

2 

200689 

358 J33 





13 

-3 

340757 

3 

706795 

2 

209465 

957742 





14 

-3 

340757 

3 

06795 

2 

209369 

958032 





15 

-3 

340757 

3 

706795 

2 

2 1 0078 

957636 

J= 

5 

K* 

8 

L 


X 


Y 


Z 

R/RBEF 





1 

-3 

340757 

3 

710391 

0 

000000 

933904 





2 

-3 

340757 

3 

710391 

I 

06383S 

939763 





3 

-3 

340757 

3 

71039! 

1 

615641 

950375 





4 

-3 

340757 

3 

71039! 

1 

901857 

95fj403 





5 

-3 

340757 

3 

710391 

2 

050315 

958 1 58 





6 

-3 

340757 

3 

710391 

2 

127319 

960056 





7 

-3 

340757 

3 

71039! 

2 

167260 

960008 





8 

-3 

340757 

3 

71039! 

2 

187977 

959929 





9 

-3 

340757 

3 

71039! 

2 

198723 

958948 





10 

-3 

340757 

3 

7!039! 

2 

204297 

958455 





1 1 

-3 

340757 

3 

71039! 

2 

207188 

957632 





12 

-3 

340757 

3 

710391 

2 

209683 

957645 





13 

-3 

340757 

3 

710391 

2 

209465 

957220 





14 

-3 

340757 

3 

710391 

2 

209869 

957552 





15 

-3 

340757 

3 

710391 

2 

210078 

957162 


5 


9 

L 


X 


Y 


Z 

R/RREF 





1 

-3 

340757 

3 

7! 1567 

0 

oooooo 

932365 





2 

-3 

340757 

3 

71 1567 

1 

063338 

938266 





3 

-3 

340757 

3 

7! 1567 

I 

6I564I 

949479 





4 

-3 

340757 

3 

7! 1567 

! 

90 1 857 

955107 





5 

-3 

34C757 

3 

711567 

2 

050315 

956877 





6 

-3 

340757 

3 

711567 

2 

127319 

958866 





7 

-3 

340757 

3 

711567 

2 

167260 

959007 





8 

-3 

340757 

3 

71 1567 

2 

187977 

959026 





9 

-3 

340757 

3 

71 1567 

2 

193723 

958171 





10 

-3 

340757 

3 

7! 1567 

2 

204297 

957835 





1 1 

-3 

340757 

3 

71 1567 

2 

207188 

957334 





12 

-3 

340757 

3 

7! 1567 

2 

208683 

957581 





13 

-3 

340757 

3 

71 1567 

2 

209465 

957253 





14 

-3 

340757 

3 

71 1567 

2 

209869 

957619 





15 

-3 

340757 

3 

7! 1567 

2 

210078 

957230 


5 


10 

L 


X 


Y 


Z 

R/RREF 





1 

-3 

340757 

3 

7! 1952 

0 

OOOOOO 

931901 





2 

-3 

340757 

3 

71 1952 

1 

063838 

937695 





3 

-3 

340757 

3 

711952 

1 

615641 

948736 





4 

-3 

340757 

3 

71 1952 

! 

901857 

954393 





5 

-3 

340757 

3 

71 1952 

2 

050315 

956398 





6 

-3 

340757 

3 

7! 1952 

2 

127313 

958493 


111236 

005267 

082609 

004945 

051386 

003807 

025940 

002327 

010339 

001068 

0 OOOOOO 

0 OOOOOO 

U/AREF 

V/AREF 

176430 

000058 

171675 

000075 

160600 

000133 

149031 

000215 

. 1 38955 

000335 

, 130805 

000524 

. 124789 

000820 

117914 

001237 

106915 

001753 

089586 

002368 

066572 

002993 

04 1 765 

003136 

021293 

002261 

008493 

001044 

0 OOOOOO 

0 OOOOOO 

U/AREF 

V/AREF 

112722 

000017 

109138 

000025 

. 101008 

000045 

093077 

000060 

086603 

000074 

081873 

000107 

079222 

.000173 

075942 

000274 

06933! 

000336 

057919 

000306 

042791 

000736 

026564 

002049 

013339 

002463 

005322 

001073 

0 OOOOOO 

0 OOOOOO 

U/AREF 

V/AREF 

046683 

000002 

044851 

000005 

040809 

000011 

037243 

000010 

034412 . 

000012 

032366 

000017 

031708 

000016 

,030925 

000018 

023230 

000016 

022868 

000017 

017077 

000016 

01 1618 

000017 

006018 

000015 

002410 

000016 

0 OOOOOO 

0 OOOOOO 

U/AREF 

V/AREF 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

0 oooooo 


-045671 

1 005120 

- 033339 

1 006646 

- 02I05I 

1 007786 

- 010631 

1 008151 

- 004230 

1 008282 

0 OOOOOO 

1 008302 

W/AREF 

T/TREF 

0 OOOOOO 

989541 

- 037424 

991852 

- 062533 

996228 

- 069822 

998563 

- 067473 

99973 

- 063732 

1 00134 

- 058555 

1 002481 

- 052960 

1 003879 

- 046163 

1 005124 

- 037640 

1 006607 

- 027432 

1 007614 

- 017073 

t 008386 

- 008719 

i 008608 

- 003481 

I 006707 

0 OOOOOO 

I 008721 

W/AREF 

T/TREF 

0 OOOOOO 

993011 

- 028755 

995303 

- 047757 

999587 

- 052304 

1 001735 

- 049950 

1 002682 

- 047213 

1 004032 

- 043212 

1 004898 

-033911 

1 006045 

- 033477 

1 006966 

- 026758 

1 OOSOOS 

- 019030 

1 008504 

- 01 1440 

1 008901 

- 005586 

1 008946 

- 002216 

1 009000 

0 OOOOOO 

1 009007 

W/AREF 

T/TREF 

0 OOOOOO 

994822 

- 014147 

997167 

- 023412 

1 001507 

- 024949 

1 003539 

- 023629 

1 004257 

- 022916 

1 005439 

- 021175 

I 006211 

- 018954 

1 007236 

- 016056 

1 007995 

- 013038 

1 008812 

- 010284 

1 009055 

- 006574 

1 009233 

- 00287! 

1 009164 

- 000981 

1 009196 

0 OOOOOO 

1 009197 

W/AREF 

T/TREF 

0 OOOOOO 

995146 

0 OOOOOO 

997497 

0 OOOOOO . 

1 001840 

0 OOOOOO 

1 003845 

0 OOOOOO 

1 004530 

0 oooooo 

I 005675 


966148 I 021145 

965310 1 023460 

966214 I 024911 

965831 1 025593 

966220 1 025616 

965832 I 025809 

P/PRCF ENT 

927542 1 015486 

935608 1 015285 

950911 I 014954 

958487 1 015059 

960950 1 015685 

964079 1 016646 

964960 1 017895 

965965 1 019458 

965837 I 021283 

966326 1 023186 

965974 1 024768 

966370 1 025700 

965987 I 026179 

966373 1 026155 

965988 1 026339 

P/PREF ENT 

927378 1 020548 

.935349 1 020347 

950482 1 019932 

958062 I 019756 

960728 1 019972 

963927 1 020537 

964710 1 021433 

965732 1 022637 

965628 1 023993 

966131 I 025263 

965775 1 026120 

966169 1 026518 

965783 1 026746 

6^170 1 026659 

965783 I 026833 

P/PREF ENT 

927541 1 023082 

935607 1 022910 

950910 1 022492 

958486 1 022147 

96095! 1 022122 

964081 1 022475 

,964963 1 023199 

965366 1 024234 

96583! I 02537! 

966326 1 026325 

966003 1 026808 

966422 1 026884 

966036 1 026950 

966425 1 026830 

966034 1 026997 

P/PREF ENT 

927377 I 023620 

935343 1 023498 

950482 1 023153 

958062 1 022764 

960730 1 022604 

963932 1 022874 



9 


7 

-3 

340757 

3 

711952 

2 167260 

958577 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

1 006410 

964721 

1 023586 

8 

-3 

340757 

3 

711952 

2 167977 

9586 45 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 007412 

965750 

I 024576 

9 

-3 

340757 

3 

711952 

2 198723 

957856 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 008134 

965648 

I 025648 

10 

-3 

340757 

3 

71 1952 

2 204297 

957605 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 008905 

966132 

I 026539 

1 1 

-3 

340757 

3 

7! 1952 

2 207188 

957021 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 009120 

965743 

I 027009 

12 

-3 

340757 

3 

71 1952 

2 203688 

957254 

0 oooooo 

0 oooooo 

0 OOOOOO 

I 009269 

966127 

1 027061 

13 

-3 

340757 

3 

71 1952 

2 209465 

956976 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 009I7I 

965752 

I 027080 

M 

-3 

340757 

3 

711952 

2 203669 

957341 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 009181 

966131 

1 026934 

15 

-3 

340757 

3 

711952 

2 210078 

957286 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 009189 

966082 

1 026966 

L 


X 


Y 

Z 

R/8REF 

U/AREF . 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

412769 

0 

oooooo 

0 OOOOOO 

930S60 

343495 

0 oooooo 

0 OOOOOO 

972338 

905III 

1 000607 

2 

-2 

412769 

0 

000000 

880355 

937846 

338003 

0 oooooo 

- 056414 

974948 

914352 

1 000297 

3 

-2 

412769 

0 

oooooo 

1 335937 

949794 

325248 

0 oooooo 

- 095353 

979551 

930372 

999943 

4 

-2 

412769 

0 

oooooo 

1 573G39 

952487 

31 1299 

0 oooooo 

- 1 10020 

981336 

934710 

1 000631 

5 

-2 

412769 

0 

oooooo 

1 69S691 

95.051 1 

296389 

0 oooooo 

- 1 12225 

982269 

933657 

I 002415 

6 

-2 

412769 

0 

oooooo 

1 760414 

949542 

282410 

0 oooooo 

- II 1400 

984255 

934591 

I 004852 

7 

-2 

412769 

0 

oooooo 

1 793457 

946978 

268780 

0 oooooo 

- 107906 

9S6I 19 

933834 

1 007844 

8 

-2 

412759 

0 

oooooo 

1 810611 

944973 

253642 

0 oooooo 

- 103009 

988844 

934432 

I 011487 

9 

-2 

412763 

0 

oooooo 

1 819503 

941466 

232785 

0 oooooo 

- 095032 

991851 

933794 

1 016072 

10 

-2 

412769 

0 

oooooo 

1 824116 

938288 

200427 

0 oooooo 

- 032109 

995835 

934427 

1 02I58S 

! 1 

-2 

412759 

0 

oooooo 

1 826508 

934165 

153245 

0 oooooo 

- 06287! 

999629 

933818 

I 027234 

12 

-2 

412769 

0 

oooooo 

1 827749 

932099 

098025 . 

0 oooooo 

- 040256 

! 002529 

934456 

i 031127 

13 

-2 

412769 

0 

oooooo 

1 823393 

930443 

051247 

.0 oooooo 

- 021052 

I 003654 

933842 

1 033019 

14 

-2 

4 1 2769 

0 

oooooo 

1 823727 

930722 

0212! 1 

0 oooooo 

- 008716 

1 004029 

934472 

1 033280 

15 

-2 

412769 

0 

oooooo 

1 828900 

930037 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

! 004101 

933851 

I 033659 

L 


X 


Y 

Z 

R/RRCR 

U/AREF 

V/AREF 

V/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

412769 

I 

670379 

0 oooooo 

930035 

342097 

001441 

0 OOOOOO 

972427 

90439! 

I 001054 

2 

-2 

412769 

1 

670379 

880255 

936966 

336636 

001685 

- 056166 

975015 

913556 

1 000742 

3 

-2 

412769 

1 

670379 

I 336987 

948815 

323944 

002332 

- 094909 

979577 

929437 

! 000382 

4 

-2 

412769 

1 

670379 

I 573839 

951503 

310047 

003193 

- I095I6 

981348 

933755 

! 001058 

5 

-2 

412769 

1 

670379 

1 696691 

949589 

295687 

004072 

- 1 11755 

982283 

932765 

1 002818 

6 

-2 

412769 

I 

670379 

1 7604 U 

94SC45 

281285 

004833 

- 110947 

984249 

933703 

1 005226 

7 

-2 

412769 

1 

670379 

1 793467 

946117 

267744 

005409 

- 107487 

986089 

932956 

1 008180 

8 

-2 

412769 

1 

670379 

1 8I06II 

944U7 

252721 

005753 

- 102634 

988779 

933553 

I 011774 

9 

-2 

412769 

I 

670379 

1 819503 

940686 . 

232006 

005765 

- 094713 

991744 

932920 

1 016299 

10 

-2 

412769 

. 1 

670379 

1 824116 

937554 

199819 

005350 

- 081859 

995730 

933550 

1 021747 

1 1 

-2 

412769 

I 

670379 

1 826508 

933473 

152827 

004315 

- 062699 

999434 

932945 

1 027338 

12 

-2 

412769 

I 

670379 

1 827749 

93U29 

097787 

002849 

- 0401 58 

1 002309 

‘ 933579 

! 031197 

13 

-2 

412769 

1 

670379 

1 828393 

929784 

051136 

001439 

- 021006 

1 003426 

932969 

I 033077 

!4 

-2 

412769 

1 

670379 

1 828727 

930062 

021168 

000617 

- 008698 

1 003798 

933595 

1 033336 

15 

-2 

412769 

1 

670379 

1 823900 

92938! 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 003870 

932978 

! 033713 

t 


X 


Y 

Z 

R/RRER 

U/AREF 

V/AREF 

w/aref 

T/TREF 

p/prff 

ENT 

1 

-2 

412769 

3 

246102 

0 OOOOOO 

928116 

337123 

001960 

0 oooooo 

972987 

■ 903045 

1 002458 

2 

-2 

412769 

3 

246102 

830355 

934913 

331764 

002322 

- 055678 

975513 

912020 

1 CX)2I32 

3 

-2 

412769 

3 

246102 

1 336937 

946431 

• 319313 

003348 

- 093865 

979922 

927429 

I 001743 

4 

-2 

412763 

3 

246102 

1 573833 

948903 

305673 

004828 

- 108068 

931563 

931408 

1 002373 

5 

-2 

412769 

3 

246 '02 

1 696691 

947038 

291518 

006417 

- 1I022I 

982445 

930413 

. 1 004064 

6 

-2 

412769 

3 

246102 

1 760414 

946182 

277363 

007820 

- 109434 

984355 

931380 

1 006380 

7 

-2 

412769 

3 

246102 

1 793457 

94 3740 

264 1 24 

008901 

- 106049 

9861 12 

930633 

1 009218 

8 

-2 

412769 

3 

246102 

! 810611 

94 1 889 

249469 

009560 

- I0I327 

98870! 

931247 

! 012664 

9 

-2 

412769 

3 

246102 

1 819503 

938553 

22920! 

009657 

- 093576 

991533 

930606 

1 017006 

10 

-2 

412769 

3 

246102 

1 824116 

935571 

I9755S 

003927 

- 080939 

995379 

931247 

1 02225! 

1 1 

-2 

412769 

3 

245102 

1 825508 

93I61I 

15H96 

007178 

- 062033 

993950 

930632 

1 027661 

12 

-2 

412769 

3 

246102 

1 827749 

929653 

096793 

004729 

- 039751 

! 001746 

931276 

I 031405 

13 

-2 

412769 

3 

246102 

1 828393 

92S029 

050632 

002495 

- 020799 

I C-32B3I 

930656 

1 033244 

14 

-2 

412769 

3 

246102 

I 828727 

928325 

020963 

001030 

- 008614 

I 003196 

931292 

1 033489 

15 

-2 

412769 

3 

246102 

1 B23SOO 

927635 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

1 003266 

930665 

1 033869 

L 


X 


Y 

Z 

R/PREF 

U/AREF 

V/AREF 

W/aref 

T/TREF 

P/PREF 

ENT 

I 

-2 

412769 

3 

564247 

0 oooooo 

926342 

326910 

001380 

0 oooooo 

974635 

9C2845 

1 004925 

2 

-2 

412769 

3 

564247 

8S0355 

933142 

321706 

001632 

- 055590 

977137 

911807 

I 004561 

3 

-2 

412769 

3 

564247 

I 336937 

944522 

309689 

002488 

- 093234 

981428 

926980 

1 004092 



i ■. 


J* 6 


J« 6 


j* 6 


jt 6 


4 

-2 

412769 

3 564247 

1 573839 

946721 

296622 

003948 

-.106513 

982866 

930500 

1 004629 

5 

-2 

412769 

3 564247 

1 696691 • 

944757 

283093 

005675 

- 107938 

983585 

929249 

1 006199 

.6 

-2 

412769 

3 564247 

1 760414 

944013 

269444 

007282 

- 106839 

985387 

930218 

1 C08360 

7 

-2 

412769 

3 564247 

I 793467 

94 1 700 

256S50 

008609 

- 103394 

986998 

929456 

I 01 1001 

8 

-2 

412769 

3 564247 

1 810611 

940038 

242915 

009475 

- 093302 

989421 

930094 

1 014199 

9 

-2 

412769 

3 564247. 

1 619503 

936904 

223431 

009680 

- 091305 

992033 

929440 

1 018235 

>0 

-2 

412769 

3 564247 

1 824116 

934172 

192869 

003894 

- 079048 

995640 

930099 

1 023132 

1 1 

-2 

412769 

3 564247 

1 826508 

930419 

147777 

006976 

- 060642 

998977 

929467 

1 028216 

12 

-2 

412769 

3 564247 

1 827749 

92861 1 

094694 

004390 

- 038S33 

1 001634 

930128 

1 031752 

13 

-2 

412769 

3 564247 

1 828393 

927024 

049555 

002199 

- 020358 

1 002660 

929490 

1 033516 

14 

-2 

412769 

3 564247 

1 828727 

927351 

020515 

000871 

- 003430 

1 003011 

930143 

1 033732 

IS 

-2 

412769 

3 564247 

1 S28900 

926647 

0 000000 

0 000000 

0 000000 

I 003078 

929499 

1 034115 

8 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

412769 

3 665190 

0 000000 

924224 

309871 

000534 

0 000000 

977242 

90319! 

1 003535 

2 

-2 

412769 

3 665190 

880355 

931149 

304871 

000723 

- 055923 

979751 

912295 

1 008110 

3 

-2 

4 1 2769 

3 665190 

1 336987 

942796 

293439 

001078 

- 093311 

984043 

927752 

1 007505 

4 

-2 

412769 

3 665190 

1 573833 

945245 

281279 

001756 

- 105578 

985434 

931476 

1 007882 

5 

-2 

412769 

3 665190 

1 696631 

94349! 

268778 

002677 

- 105722 

986048 

930327 

1 009260 

6 

-2 

412769 

3 665190 

1 760414 

942977 

256361 

003723 

- 103653 

987720 

931397 

1 011192 

7 

-2 

412769 

3 665190 

1 793467 

940907 

244996 

004787 

- 099717 

989151 

930699 

1 013543 

8 

-2 

412769 

3 665190 

I 8I06II 

939510 

232316 

005606 

- 095031 

991351 

931384 

1 016405 

9 

-2 

412769 

3 665190 

1 819503 

935671 

214262 

005913 

- 087767 

993668 

930740 

.1 020015 

10 

-2 

412769 

3 665190 

1 824116 

934232 

185434 

005361 

- 076080 

996934 

931417 

1 024413 

I 1 

-2 

412769 

3 665190 

1 326506 

930840 

1 42668 

003869 

- 05S566 

.999936 

930730 

1 029017 

12 

-2 

412769 

3 665190 

1 927749 

929225 

091917 

001946 

- 037756 

1 002396 

93145! 

I 032264 

13 

-2 

412769 

3 665130 

1 828393 

927693 

048329 

00061 1 

- 019854 

I 003356 

930806 

I 033335 

14 

-2 

412769 

3 665190 

1 828727 

92804 1 

020062 

000108 

- 008243 

! 003692 

931467 

1 034126 

15 

-2 

412769 

3 665190 

1 828900 

927331 

0 000000 

0 000000 

0 000000 

1 003757 

930815 

1 034509 

6 1. 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

V/AREF 

T/TREF . 

P/PfltF 

ENT 

1 

-2 

412769 

3 697218 

0 000000 

920596 

28! 162 

000305 

0 000000 

980761 

902884 

1 013761 

2 

-2 

412769 

3 697219 

880355 

927463 

276324 

000360 

- 055253 

983203 

911885 

1 013269 

3 


412759 

3 697218 

I 3369S7 

939037 

266111 

000544 

- 091699 

987334 

927143 

1 012431 

4 

-2 

412769 

3 697218 

I 573839 

941595 

255480 

000819 

- 102684 

988534 

930798 

1 012618 

5 

-2 

412769 

3 697218 

1 696691 

94Q138 

244835 

001139 

- 101519 

983950 

929750 

1 013673 

6 

•2 

412769 

3 697218 

1 760* 14 

939965 

234459 

001494 

- 098409 

990402 

930943 

1 015236 

7 

-2 

412769 

3 697218 

1 793467 

938240 

225182 

00 1909 

- 093788 

991570 

930331 

I 017180 

S 

-2 

412769 

3 697218 

1 81061! 

937188 

214490 

002308 

- 088S50 

993476 

931074 

1 019593 

9 

-2 

412769 

3 697218 

1 819503 

934737 

198596 

002541 

- 08178! 

995422 

930458 

1 022660 

10 

-2 

412769 

3 697218 

1 824116 

932803 

172848 

002444 

- 070994 

998227 

931 150 

I 026392 

1 1 

-2 

412769 

3 697218 

1 826508 

929824 

134494 

0019! 1 

- 055175 

1 000747 

930519 

1 030301 

12 

-2 

412769 

3 697218 

1 827749 

928483 

0881 19 

00097! 

- 036173 

1 002919 

931194 

I 033133 

13 

-2 

412769 

3 697218 

1 828393 

927025 

046931 

000204 

- 019275 

1 00380! 

930548 

1 034692 

14 

-2 

412769 

3 697213 

1 828727 

927337 

019539 

- 000031 

- 008048 

1 004124 

93121! 

1 034863 

15 

-2 

412769 

3 697218 

1 828900 

926679 

0 000000 

0 000000 

0 000000 

1 004186 

.930553 

1 .035243 

7 L 


X 

r 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

41276S 

3 707381 

0 000000 

916171 

232306 

000090 

0 000000 

985816 

903176 

I 020951 

2 

-2 

412769 

3 707381 

880355 

923089 

228398 

000113 

- 050523 

988288 

912278 

1 020437 

3 

-2 

412769 

3 707381 

1 336)997 

934820 

219920 

000181 

- 083167 

992408 

927722 

1 019528 

4 

-2 

412769 

3 707381 

I 573839 

937631 

211928 

000245 

- 091563 

993400 

931442 

I 0T9322 

5 

-2 

412769 

3 707381 

1 696691 

936454 

204180 

000304 

- 089092 

993439 

930309 

1 019874 

6 

-2 

412769 

3 7073S1 

I 760414 

936593 

196722 

000380 

- 085688 

994483 

931430 

1 020883 

7 

-2 

412769 

3 7073S! 

1 793467 

935245 

190285 

00048! 

- 031249 

9S5255 

930807 

1 022267 

8 

-2 

412769 

3 70738! 

I 81061! 

934575 

182246 

000522 

- 076673 

.996783 

931568 

1 024129 

9 

-2 

412769 

3 707381 

i 819503 

932553 

169252 

000402 

- 070300 

993306 

930973 

1 026583 

10 

-2 

412769 

3 70738! 

1 82411$ 

931145 

148186 

000465 

- 061028 

1 000572 

931678 

1 029536 

1 1 

-2 

412769 

3 707381 

I 826508 

928789 

117569 

001055 

- 048035 

1 002435 

931050 

I 032498 

12 

-2 

412769 

3 7073S1 

1 827749 

927905 

079735 

001518 

- 032554 

1 004118 

931726 

1 034626 

13 

-2 

412763 

3 707381 

1 828393 

926600 

043662 

000997 

- 01789! 

1 004337 

931082 

1 035350 

14 

-2 

4 1 2769 

3 70738! 

1 828727 

926991 

018387 

000355 

- 007555 

1 005129 

931746 

1 036076 

15 

-2 

412769 

3 707381 

I 828900 

926289 

0 000000 

0 000000 

0 000000 

1 005186 

931093 

I 036449 

8 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TF^F 

P/PREF 

ENT 


1 

-2 

412769 

3 710605 

0 oooooo 

910915 

155410 

000O24 

0 oooooo 

991184 

902885 

1 028876 

2 

-2 

412769 

3 710605 

880355 

917659 

152757 

000033 

- 037353 

993709 

91 1886 

I 028459 

3 

-2 

412769 

3 710605 

I 3369S7 

929148 

147345 

0OC054 

- 060740 

997842 

927143 

1 027609 

4 

-2 

4 1 2769 

3 710505 

1 573339 

932095 

142938 

000058 

- 064997 

998610 

930300 

1 027098 

5 

-2 

412769 

3 710505 

1 696691 

931363 

133779 

000054 

- 062171 

998271 

929753 

I 027073 

6 

-2 

412769 

3 710605 

! 760414 

931961 

1 34640 

000058 

- 059833 

9989 U 

930949 

1 027470 

7 

-2 

4 1 2769 

3 710605 

1 793467 

930993 

131315 

000070 

- 056749 

999296 

930338 

1 028290 

8 

-2 

412769 

3 710605 

I 8I06II 

930673 

126229 

O0JO72 

- 053508 

1 000444 

931087 

1 029613 

9 

-2 

412769 

3 710605 

t 819503 

929045 

1 16662 

- OOOOSO 

- 048992 

I 001564 

930498 

1 031487 

10 

-2 

412769 

3 710606 

1 824116 

928166 

101972 

- 000540 

- 042919 

1 003293 

931222 

1 033659 

1 1 

-2 

412769 

3 710605 

t 826508 

926495 

082647 

- 000250 

- 034603 

1 004432 

93060! 

1 035579 

12 

-2 

412769 

3 710605 

1 827743 

926234 

057667 

001833 

- 023967 

1 005444 

931276 

1 036740 

13 

-2 

412769 

3.71 0505 

I 823393 

925235 

032073 

002697 

- 013219 

1 005733 

930636 

I 037514 

14 

-2 

4 1 2769 

.3 71.0605 

1 328727 

925781 

013799 

001089 

- 005723 

I 035957 

931295 

I 037471 

15 

-2 

412769 

3 710605 

1 823900 

925105 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

I 005991 

930648 

1 037810 

9 L 


X 

Y 

Z 

R/Rficr 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

•2 

412769 

3 711628 

0 oooooo 

908286 

066589 

000003 

0 oooooo 

994373 

903175 

I 033381 

2 

-2 

412769 

3 71 1628 

880355 

915004 

065415 

000006 

- 017260 

997019 

912276 

1 033081 

3 

-2 

412769 

3 7! 1623 

I 336987 

926507 

063238 

000009 

- 027679 

I 001311 

927721 

i 032356 

4 

-7 

4 1 2769 

3 71 1628 

1 573339 

929597 

062018 

000002 

- 028204 

! 001984 

931 442 

1 031675 

5 

-2 

4 1 2769 

3 711523 

1 696691 

929016 

060652 

- 000002 

- 026336 

I 001394 

9303 M 

1 031326 

6 

-2 

412769 

3 711623 

! 760414 

929762 

059086 

- 000001 

- 025719 

r 001799 

931435 

I 031412 

7 

-2 

412769 

3 71 1623 

1 793467 

9289' 

05.8025 

- 000004 

- 024502 

1 001982 

930815 

1 031950 

8 

-2 

412759 

3 711623 

1 8105!! 

9288 7t. 

055902 

- 000003 

- 023129 

1 002906 

931575 

1 032945 

9 

-2 

412763 

3 71 162.3 

1 819503 

927439 

05054 1 

- 000005 

- 020759 

I 003740 

930968 

1 034418 

10 

-2 

412769 

3 71 1623 

1 824115 

926897 

041721 

- 000004 

- 018370 

1 005156 

931676 

1 036145 

! i 

-2 

412769 

3 711628 

1 826503 

925635 

03525S 

- 000006 

■ 017423 

I 005895 

931092 

I 037473 

12 

-2 

412769 

3 71 1523 

t 827749 

925910 

029363 

- 000005 

- 014016 

! 006377 

931814 

1 037846 

13 

-2 

412769 

3 71I62S 

1 828393 

925289 

017466 

- 000007 

- 007587 

I 006350 

931 164 

1 038097 

14 

-2 

412769 

3 71 1628 

1 828727 

925837 

007738 

- 000007 

- 003205 

1 006428 

931839 

1 037909 

15 

-2 

412769 

3 7! 1628 

! 828900 

925216 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

1 006439 

931173 

1 038223 

10 L 


X 

r 

2 

R/RREF 

U/AREF 

V/APEF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-2 

412769 

3 71 1952 

0 OOOOOO 

907418 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

995002 

902883 

1 034430 

2 

-2 

412769 

3 71 1952 

850 355 

914013 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

997671 

91 1885 

1 034204 

3 

-2 

412769 

3 711952 

1 336987 

925301 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

1 001991 

927143 

I 053595 

4 

-2 

412769 

3 711952 

I 573339 

928350 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

1 002639 

930801 

3 0329Q4 

5 

-2 

412769 

3 711952 

I 696.69! 

927896 

0 oooooo 

0 oooooo 

0 oooooo 

1 002005 

929756 

I 032452 

6 

-2 

412769 

3 711952 

1 7604 U 

928753 

0 oooooo 

0 oooooo 

0 OOOOOO 

t 002370 

930955 

1 032443 

7 

-2 

412769 

3 711952 

1 793467 

928010 

0 oooooo 

0 oooooo 

0 oooooo 

t 002522 

930351 

1 032935 

8 


412769 

3 711952 

1 SI061I 

927953 

0 oooooo 

0 COGOOO 

0 oooooo 

I 003400 

931 108 

1 033865 

9 

-2 

412769 

3711 952 

1 819503 

926631 

0 OOOOGQ 

0 oooooo 

0 OOOOOO 

1 004144 

930521 

1 035199 

10 

-2 

412769 

3 71 1952 

1 324116 

926181 

0 oooooo 

0 OO'OOOO 

0 oooooo 

! 005442 

931222 

1 036761 

11 

-2 

412769 

3 711952 

1 826503 

924312 

0 oooooo 

0 oooooo 

0 oooooo 

I 006III 

930564 

1 038020 

12 

-2 

412769 

3 71 1952 

1 827749 

925173 

0 oooooo 

0 oooooo 

0 Oi 9000 

1 006543 

931227 

1 038349 

13 

-2 

412769 

3 711952 

1 828393 

924676 

0 oooooo 

0 oooooo 

0 ooocoo 

1 006417 

930610 

1 038442 

14 

-2 

412763 

3 711952 

1 82S727 

925296 

0 oooooo 

0 oooooo 

0 oooooo 

1 006417 

931234 

1 038163 

15 

-2 

412769 

3 711952 

1 828900 

925256 

0 oooooo 

0 oooooo 

0 oooooo 

1 006428 

931204 

1 038193 

I t 


X 

r 

Z 

P/RREF 

U/AREF 

v/aref 

V/AREF 

T/TREF 

P/PREF 

ENT 

1 

- f 

855976 

0 000000 

0 oooooo 

901530 

407805 

0 oooooo 

0 oooooo 

961797 

867089 

1 002516 

2 


855976 

0 00000 ^ 

770265 

908844 

40304 1 

0 oooooo 

-068701 

964182 

876291 

1 001759 

3 


855976 

0 ooooo • 

1 169795 

92050 1 

392031 

0 oooooo 

- 1U675 

967984 

891030 

1 000595 

4 

- J 

855976 

0 ooocoo 

1 377027 

921959 

379760 

0 oooooo 

• 131772 

968803 

893197 

1 000808 

5 

- 1 

855976 

0 00-0000 

i 484517 

920551 

365697 

0 oooooo 

- 136394 

969806 

892756 

1 002457 

6 

- i 

855976 

0 ooocoo 

I 540271 

920497 

351468 

0 oooooo 

- 137482 

972177 

894336 

1 004932 

7 

- 1 

855976 

0 ooocoo 

1 56919! 

918255 

338331 

0 oooooo 

- 135201 

974252 

894612 

! 008059 

8 


855976 

0 oooooo 

1 534191 

916568 

323663 

0 ooocoo 

- I3II30 

977337 

895796 

3 031995 

9 

- ] 

855976 

0 oooooo 

1 59I97I 

912606 

301664 

0 oooooo 

- 123002 

930888 

895165 

1 017434 

10 

• 1 

855976 

0 oooooo 

1 596007 

908523 

263517 

0 oooooo 

- 107883 

9S6306 

896032 

3 024890 

II 

- i 

8559 76 

0 oooooo 

1 598100 

902530 

202775 

0 oooooo 

- 033156 

99201 1 

895319 

I 033551 

12 

- 1 

855976 

0 oooooo 

1 599186 

89-9I55 

128996 

0 oooooo 

- 052953 

996670 

896162 

3 039963 

13 

- 1 

855976 

0 oooooo 

I 599745 

896626 

066828 

0 oooooo 

- 027442 

998589 

895361 

I 043139 

14 


855976 

0 oooooo 

I 600041 

896397 

027548 

0 oooooo 

- 0I13I5 

999205 

896183 

1 043656 



1 


J« 7 


J* 7 


J» 7 


J* 7 


K« 


K» 


K* 


K« 


15 

-1 

,855976 

0.000000 

1 .600193 

895977 

0 000000 

0.000000 

0 000000 

,999326 

.895373 

I .044211 

2 L 


X 

Y 

Z 

R/PREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

! 

- 

855976 

1 ,670379 

0 000000 

900589 

406583 

.001940 

0 

000000 

.961847 

.866228 

I 002987 

2 

- 

.855976 

1 670379 

. 770265 

907868 

401830 

002179 

- 

068477 

,964220 

.875384 

I .002229 

3 

- 

855976 

1 .670379 

1 . 169795 

919474 

390890 

.00281 I 

- 

. 11429! 

968001 

.890052 

1 001060 

4 


.855976 

1 .670379 

I .377027 

920960 

378585 

. 003663 

- 

131344 

968818 

.892243 

1 .001258 

5 

- 

.855976 

1 670379 

1 484517 

9 1 9604 

364557 

004554 

- 

. 135975 

.969818 

891848 

1 . 002882 

6 

- 

355976 

1 670379 

I 540271 

919570 

350391 

005341 

- 

137064 

972165 

893974 

1 005325 

7 

- 

.855976 

I 670379 

1 5C9I91 

9 1 7365 

337330 

.005938 

. 

. 134807 

974215 

89371 1 

1 008412 

8 

- 

855976 

1 670379 

I 58419! 

915707 

322758 

006268 

- 

1 30766 

977264 

. 894888 

! 012300 

9 

- 

855976 

1 670379 

1 59197! 

91 1794 

300870 

006212 

. 

122680 

980775 

894265 

1 017679 

10 

. 

855976 

1 670379 

1 59G007 

907 753 

262057 

005590 

> 

107614 

986143 

895174 

I 025069 

I! 

-■ 

855976 

1 ,670379 

r 593100 

901809 

202283 

004306 

- 

082954 

.991806 

894420 

1 033667 

12 

. 

855976 

1 670379 

1 599186 

898457 

128094 

00269 1 

- 

052829 

996434 

895254 

1 040039 

13 

- 

.855976 

I 670379 

1 599749 

895947 

066681 

001366 

- 

.027381 

.998343 

.894462 

! 043198 

14 

- 

855976 

1 670379 

1 . 60004 1 

896212 

027490 

. 000557 

- 

011292 

998955 

895276 

! .043714 

15 

- 

.855976 

1 670379 

1 600193 

895301 

0 000000 

0 000000 

0 

000000 

,999075 

894473 

1 044264 


3 L 


X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- 

,855976 

3 

.246102 

0.000000 

898433 

402293 

. 002650 

0 . OOOOOO 

.962325 

.864585 

1 004448 

2 


855976 

3 

246102 

.770265 

905624 

397602 

. 002999 

- .068038 

.964657 

.873616 

1 .003676 

3 


.855976 

3 

246102 

1 . 169795 

917035 

386783 

C0397! 

- , 113401 

. 968340 

. 888002 

1 ,002474 

4 


.855976 

3 

246102 

1 .377027 

918443 

374615 

.005354 

- 130147 

.969075 

890040 

I .002620 

5 


.655976 

3 

246102 

I .484517 

917149 

360732 

006844 

- . 1 34675 

. 970025 

. 889658 

1 .004170 

6 


855976 

3 

246102 

! 54027! 

917169 

346771 

008177 

- 135726 

972304 

891767 

I 006520 

7 


855976 

3 

246102 

1 56719! 

9 1 5050 

33 1762 

009203 

- 133507 

974272 

691507 

I 009491 

8 


055976 

3 

246102 

1 5H4I91 

913490 

3 1 7634 

009774 

- 129552 

977213 

892678 

1 013234 

S 


855976 

3 

246102 

I 691971 

909 705 

298 1 64 

.009681 

- . 121593 

. 980604 

.892060 

1 .018435 

10 


.855976 

3 

246102 

1 . 596007 

.90580! 

260588 

.008627 

- 106694 

.985828 

. 892964 

1 .025624 

1 1 


855976 

3 

.246102 

1,5981 00 

899995 

200569 

.006529 

- . 082256 

. 99 1 354 

.892214 

1 . 034029 

12 


855976 

3 

246102 

1,5991 86 

896729 

127614 

,003991 

- . 052388 

. 995890 

893044 

1 040272 

13 


. 855976 

3 

246 1 02 

1 599749 

894253 

066132 

.002000 

-.027156 

. 997762 

892256 

1 .043378 

14 


.855976 

3 

246102 

1 600041 

894523 

027263 

.000812 

-.011201 

.998363 

.893065 

1 .043881 

15 


.855975 

3 

,246102 

! 600193 

893624 

0 000000 

0 OOOOOO 

0.000000 

, 998482 

,692268 

1 ,044427 


4 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

. V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


! 

-1 

.855976 

3 567415 

0.000000 

896636 

393604 

001857 

0 . OOOOOO 

. 963983 

864342 

1 .006985 


2 

-1 

. 855976 

3 567415 

. 770265 

903859 

389034 

. 002097 

- . 067952 

.966298 

. 873397 

1 006169 


3 

-1 

,855976 

3 . 5674 i 5 

1 . 169795 

91525! 

378542 

.002871 

- . 112891 

.969901 

. 887703 

1.004874 


4 

-1 

.855976 

3,567415 

1 .377027 

916592 

.366771 

.004112 

-. 128943 

.970505 

. 83S558 

1 .004910 


5 

-I 

.855976 

3 567415 

1 .484517 

915321 

. 353304 

.005522 

- . 1 32893 

.971338 

. 889087 

1 .006332 


6 

- i 

.855376 

3 567415 

1 .540271 

915422 

339812 

.006830 

- . 1 33602 

,973504 

.891167 

1 ,008530 


7 

-1 

.855976 

3.567415 

1 ,56919! 

913412 

.327532 

.007883 

-.131260 

975331 

.890880 

1 .011312 


8 

-1 

855976 

3 567415 

1 5S4I9I 

912015 

.313860 

.006492 

-.127358 

.978116 

.892057 

t 014821 


9 

-1 

855976 

3 567415 

1 .591971 

908419 

293038 

.008377 

-.11 9583 

.98129! 

891424 

1 .019726 


10 

-1 

855976 

3 567415 

1 596007 

904752 

25C390 

.007210 

- 10501 1 

986279 

892339 

1 026569 


1 1 

-1 

855976 

3 567415 

1 538100 

899154 

. 197555 

.005031 

- 081033 

99157J 

891577 

1 034645 


12 

-I 

855976 

3 557415 

1 599136 

896029 

125821 

.00267! 

-.051655 

. 995970 

892417 

1 .040681 


13 

-I 

. 855976 

3 567415 

1 ,599749 

893597 

.065242 

001142 

- .026792 

.997786 

891618 

1 .043712 


14 

-1 

6o5976 

3 567415 

1 600041 

893893 

026909 

.000415 

- 01 1053 

998374 

,892439 

1 .044188 


15 

-1 

855976 

3 567415 

1 .600.193 

832979 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.938489 

.891630 

1 044736 

5 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


1 

-I 

855976 

3 867169 

0 OOOOOO 

894588 

.378767 

,000813 

0 OOOOOO 

966733 

864827 

1 .01078! 


2 

-1 

855976 

3 667169 

770265 

90 1 929 

37442! 

,000910 

- 063107 

969045 

.874010 

1 009893 


3 

-1 

855376 

3 667169 

1 . 169795 

913577 

364526 

.00126! 

- , 112732 

972625 

888567 

1 . 003434 


4 

-1 

. 855976 

3 667169 

1 .377027 

915198 

. 353574 

001826 

- ,127915 

.973164 

. 890638 

1 .008277 


5 

-1 

855976 

3 667169 

i 4S4517 

914178 

340998 

002467 

- 130856 

.973893 

.890312 

1 009483 


6 

- 1 

.855976 

3 667169 

1 .540271 

914486 

.328438 

003104 

- , 1 30783 

.975919 

892464 

1 .01 1446 


7 

-1 

855976 

3 667169 

I 563191 

912670 

317120 

003702 

- . 128005 

977559 

892188 

1 013952 


8 

-1 

855976 

3 667169 

I 584191 

9! 150! 

304459 

004057 

- 123997 

980125 

893385 

1 017136 


9 

-I 

855976 

3 667169 

1 591971 

908 1 80 

284916 

003909 

-.116452 

983004 

. 892745 

1 021614 


10 

-1 

855976 

3 667163 

1 596007 

904859 

250179 

.002998 

- 102523 

987638 

. 893673 

1 .027934 


1 1 

-! 

855976 

3 667169 

1.598100 

899561 

. 193843 

.001456 

-.079521 

.992597 

.892901 

1 .035525 



12 

-1 .855976 

3.667169 

1 .59.9186 

896589 

. 124222 

.000082 

-.051000 

.996837 

.893753 

1 .041326 

13 

-1 .855976 

3.667169 

1 .599749 

894179 

.064662 

- 000364 

- 026553 

.998618 

.892943 

1 .044310 

14 

-1.855976 

3 667169 

1 600041 

894490 

0267 1 0 

- 000246 

- .010971 

999200 

893775 

1 .044774 

15 

-1 855976 

3 667169 

1 .600193 

893567 

0 000000 

0.000000 

0.000000 

999315 

.892954 

1.045326 

6 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

- 1 . 655976 

3.698138 

0 000000 

. 890505 

.351470 

.000370 

0 000000 

.970707 

.864419 

1.016795 

2 

-1 .355976 

3 698138 

. 770265 

897787 

. 347552 

.000431 

- . 066709 

. 972959 

.873510 

1 .015840 

3 

-1 .855976 

3.6981 38 

1.169795 

909364 

338804 

.000619 

- . 109S38 

.976373 

. 887873 

1 014194 

4 

-1 855976 

3.698138 

1 377027 

9! 1090 

329419 

.000843 

- . 123464 

976678 

889341 

1 013741 

5 

-1 855976 

3 693138 

1 434517 

910334 

318507 

001035 

- 125171 

977147 

889530 

1.014565 

6 

- 1 855976 

3 698138 

1 540271 

910961 

.307551 

.001175 

-.124370 

978910 

891748 

1 0161 15 

7 

- 1 . 855976 

3 698138 

1 569191 

909463 

297733 

001259 

-.121224 

980263 

891513 

1 018189 

8 

- 1 . 855976 

3 698138 

1 584191 

90860! 

236519 

.001216 

-.117178 

982521 

.892720 

1 : 020922 

9 

- 1 655976 

3 698138 

1 591971 

905677 

263042 

000978 

- 110075 

984993 

.892090 

1 024817 

10 

-1 .855976 

3 698138 

1 .596007 

902878 

238229 

000607 

- 097548 

. 989075 

.893014 

1 030333 

1 1 

-1 855976 

3.698! 38 

1 .598100 

898118 ■ 

187734 

000200 

- 076920 

933455 

892249 

1 037097 

12 

-1 855976 

3 698138 

1 599186 

895376 

122826 

- 000184 

- . 050389 

997455 

893097 

1 042537 

13 

-1 855976 

3 698138 

1 599749 

892980 

064663 

- 000282 

- 026542 

999230 

892293 

1 04551 1 

14 

-1 855976 

3 693138 

1 60004! 

893278 

026778 

- 000149 

- .010999 

. 999822 

.8931 19 

1 .045991 

15 

- 1 355376 

3 698138 

1 .600193 

892359 

0 000000 

0 000000 

0 , 000000 

. 399939 

. 892304 

1 . 046544 

7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 .855976 

3 707753 

0.000000 

884807 

298213 

000087 

0 . 000000 

.977403 

.864813 

1.026442 

2 

- 1 . 855976 

3.707753 

. 770265 

. 892084 

295124 

.0001 13 

- . 059383 

,979721 

873934 

1 025511 

3 

- 1 . 855976 

3.707753 

1 . 169795 

903744 

288474 

000183 

- 097876 

983177 

388540 

1 023796 

4 

- 1 . 855976 

3.707753 

1 .377027 

905763 

281735 

. 000225 

-. 106166 

983263 

. 890609 

1 . 022978 

5 

- 1 . 855976 

3.707753 

1 484517 

905398 

273472 

000235 

108375 

.983314 

. 890290 

1 023190 

6 

-1 855976 

3.707753 

1 54027! 

. 905422 

. 264925 

000239 

-.107322 

. 984594 

.892457 

1 . 024059 

7 

-1 855976 

3.707753 

1 .56919! 

. 905342 

,257109 

.000231 

-.104496 

.385484 

.892200 

1 ,025473 

8 

-1 855976 

3.707753 

1 .584191 

904886 

.247502 

000088 

-. 100984 

.987318 

.893410 

1 027589 

9 

- 1 , 855976 

3.707753 

1 591971 

902429 

232362 

- 000330 

- 094902 

.989304 

,892777 

1:030777 

to 

-1 855976 

3 707753 

1 596007 

900338 

.207720 

- 000457 

- 084853 

992635 

893706 

1 035207 

1 1 

-1 855976 

3 707753 

1 598100 

896494 

169131 

000400 

- 068903 

996027 

892932 

1 .040524 

12 

-1 855976 

3 707753 

1 .599186 

894382 

116089 

001343 

- 047382 

939331 

.893784 

1 .044961 

13 

-1 .855976 

3.707753 

1 .599749 

892120 

. 062890 

.001075 

- 025764 

1 . 000958 

. 892975 

1 .047724 

14 

-1.855976 

3.707753 

1 .60004! 

892430 

026183 

000475 

-.010755 

1.001543 

893807 

1.048189 

15 

- 1 . 855976 

3 707753 

1 .600193 

.891508 

0 000000 

0 GOOOOO 

0.000000 

1 001659 

892987 

1 .048745 

8 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 .855976 

3 710738 

0 . 000000 

876966 

, 202883 

. 000020 

0 . 000000 

.985694 

.864421 

1 .038341 

2 

- 1 855976 

3.710738 

.770265 

883974 

.201076 

.000029 

-.042817 

.988164 

873512 

1 .038134 

3 

-I .855976 

3.710738 

1 . 1 69795 

895240 

. 197443 

.000049 

- . 068738 

.991779 

. 887880 

1 .036666 

4 

-1 .855976 

3.710738 

1 377027 

897337 

. 194065 

.000046 

- 073703 

.991650 

.889844 

1 .035562 

5 

- 1 . 855976 

3 710738 

1 .484517 

837427 

189011 

000036 

-.073074 

.991205 

. 883534 

1 . 035057 

6 

- 1 855976 

3.710738 

1 .540271 

893997 

183466 

,000033 

- . 072900 

991941 

.891752 

1 .035101 

7 

- 1 855976 

3.710733 

1 .569191 

.898443 

, 178285 

,000030 

- 071143 

. 992285 

891511 

1 035715 

8 

-1 .855976 

3.710733 

■ 1 .584191 

693474 

.170646 

000005 

-.068590 

.993582 

892707 

1.037054 

9 

- 1 . 855976 

3.7I073S 

1 .591971 

896555 

. 157634 

- 000244 

- 06407! 

.995013 

.892084 

1. 039437 

to 

-1.855976 

3 710738 

1 . 596007 

895199 

. 140437 

- .000933 

- . 058076 

.997570 

.893023 

1 .042739 

1 1 

-1 .855976 

3.710738 

1 598100 

. 892409 

. 119270 

-.000422 

- . 049500 

. 999827 

.832255 

1 .046403 

12 

- 1 855976 

3.710738 

1 .599186 

891312 

085658 

002602 

- 035448 

1 002002 

.89309$ 

1 .049196 

1 3 

- 1 . 855976 

3.710738 

1 599749 

889632 

046890 

003639 

-.019308 

1 . 002925 

. 892295 

1 .050927 

14 

-1.855976 

3.710738 

1 .60004! 

. 830203 

.019800 

001533 

-.008188 - 

1 003274 

- . 893117 

1 ,051051 

15 

- 1 . 855976 

3.710738 

1 .600193 

. 889334 

0.000000 

0.000000 

0.000000 

1 . 003344 

.832308 

1.051535 

9 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-I .855976 

3.711665 

0 000000 

872724 

0861 18 

.000001 

0 000000 

990933 

.864811 

1 . 046389 

2 

- 1 855976 

3 711665 

. 770265 

.879625 

.085467 

000004 

-.018716 

993597 

.873992 

1 .045903 

3 

-I 855976 

3.711665 

1 169795 

890781 

084295 

000007 

- 029503 

.997484 

888539 

1 .044714 

4 

- 1 855976 

3.711665 

1 377027 

893028 

.083380 

000000 

- 030026 

.397291 

.890609 

1 .043460 

5 

-1 .855976 

37! 1665 

1 .484517 

893366 

081215 

000000 

- 029575 

.996558 

.890291 

1 .042535 

6 

-1 855976 

3 71 1665 

1.540271 

895171 

078770 

000004 

- 030137 

,996973 

,892462 

1 .042128 

7 

-I .855976 

3 71 1665 

1 569191 

894902 

076638 

00000! 

- 029617 

.996990 

.892209 

1 042271 

8 

-1.855976 

3.71 1665 

1 .584191 

895328 

072954 

.000003 

- 028493 

. 997867 

.893419 

1 .042989 



9 

-1 

.855976 

37! 1665 

1 .591971 

893874 

.064571 

000001 

-.025604 

.998758 

.892764 

1 .044600 

10 

-1 

.855976 

3.71 1665 

1.596007 

. 892897 

. 052538 

000002 

-.022915 

1 . 000885 

. 893688 

1.047282 

n 

-1 

.855976 

3 71 1665 

1,598100 

890647 

.048489 

- OOOOOO 

-.023942 

1 002604 

. 892966 

1 .050140 

12 

-1 

.855976 

3.711665 

1 599186 

890500 

.044238 

000002 

- 020714 

I 003792 

.893877 

1 .051454 

13 

-1 

855976 

3.7! 1665 

1 599749 

889570 

025001 

- 000001 

- 01082-f 

1 003920 

893057 

1 052028 

M 

-1 

855976 

3.71 1665 

1 . 60004 1 

890295 

.010732 

- OOOOOO 

- . 004408 

1 . 004054 

. 893904 

1 .051825 

15 

-1 

.855976 

3.711665 

1 .600193 

.689438 

0 . OOOOOO 

0 oooooo 

0.000000 

1 . 004079 

. 893065 

1 .052256 

10 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.855976 

3.71 1952 

0,000000 

871424 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.991962 

864420 

1 048102 

2 

-1 

855976 

3,71 1952 

770265 

878196 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.994666 

87351 1 

1 047709 

3 

-I 

.855976 

3.71 1952 

1 . 160795 

£89120 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

. 998605 

. 887880 

1 046669 

4 

-I 

.855976 

3.71 1952 

1 377027 

.891280 

0 OOOOOO 

0 oooooo 

0.000000 

.998390 

.889845 

t 045429 

5 

-1 

,855976 

37! 1952 

1 .484517 

.891676 

0 OOOOOO 

0 oooooo 

0 oooooo 

. 997599 

,889536 

! .044415 

6 

-1 

,855976 

3.711952 

1 .540271 

.893581 

0.000000 

0 oooooo 

0 oooooo 

. 997959 

.891757 

1 ,043900 

7 

-I 

.855976 

3.71 1952 

1.56919! 

893334 

0 oooooo 

0 oooooo 

0 . oooooo 

,997918 

.891524 

1.043950 

8 

-1 

.855976 

3.71 1952 

1 .584191 

.893387 

0 oooooo 

0 oooooo 

0.000000 

. 998706 

.892730 

1 . 044539 

9 

-1 

.855976 

3.71 1952 

1 .59197! 

832635 

0 oooooo 

0 oooooo 

0 oooooo 

.939414 

892 1 

1 045865 

10 

-1 

. 855976 

3 7 i 1 952 

1 . 596007 

891851 

0 oooooo 

0 oooooo 

0 oooooo 

1.001318 

893027 

1.048226 

1 1 

-1 

.855976 

3.7! 1952 

1 .598100 

88959! 

0 oooooo 

0 oooooo 

0 oooooo 

1 . 002956 

.892221 

1 .051007 

12 

-1 

.855976 

3.71 1952 

1.599186 

. 8894 1 7 

0 oooooo 

0 oooooo 

0 oooooo 

1 .004097 

893061 

1 .052286 

13 

-1 

. 855976 

3,711952 

1 ,599749 

888687 

0 oooooo 

0 oooooo 

0 oooooo 

1 . 004050 

, 892286 

1.052582 

14 

-1 

.855976 

3 71 1952 

I .600041 

889443 

0 oooooo 

0 oooooo 

0 oooooo 

1 . 004060 

893054 

1 052234 

15 

-1 

.855976 

3,7! 1952 

1 .600193 

, 889440 

0 oooooo 

0 oooooo 

0.000000 

1 . 004069 

. 893059 

1 .052245 

1 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-1 

.391932 

0.000000 

0 . OOOOOO 

,870840 

472545 

0 oooooo 

0 . oooooo 

. 949398 

.826773 

1 .003397 

2 

-I 

.391982 

0 . 000000 

.678523 

878709 

468146 

0 oooooo 

- .078406 

.951718 

.836284 

1 .002237 

3 

-1 

.391982 

0 000000 

1 .030468 

891788 

.457393 

0 oooooo 

- .131285 

.955518 

.852120 

1 . 000308 

4 

-1 

.391982 

0 000000 

1,213018 

895051 

444200 

0 oooooo 

- . 152661 

956627 

856231 

i . 000008 

5 

-1 

391982 

0 000000 

1 .307706 

895351 

429091 

0 oooooo 

- 160129 

9581 16 

857850 

1 001431 

6 

-I 

.391982 

0 oooooo 

1 .356819 

895638 

414916 

0 oooooo 

- . 162283 

96052! 

860278 

1,003815 

7 

-! 

.391982 

0 . oooooo 

1 . 382294 

.893715 

40226! 

0 oooooo 

- . 160849 

. 962672 

,860354 

1 .006929 

8 

-1 

.391982 

0 . oooooo 

1 . 395508 

891964 

. 388222 

0 oooooo 

-.157290 

, 965854 

.861507 

1 .01 1050 

9 

-I 

.391982 

0 oooooo 

1 .402361 

887634 

365245 

0 oooooo 

- . 148936 

. 970028 

.861030 

I .017397 

10 

-1 

.391932 

0 oooooo 

1 405916 

882094 

321562 

0 oooooo 

-. 131623 

. 977049 

.861850 

1 .027331 

1 1 

-I 

.391982 

0 oooooo 

1 407760 

873899 

.247482 

0 oooooo 

- . 101480 

, 985483 

861213 

1 . 040075 

12 

-1 

391982 

0 oooooo 

1 .408717 

C68538 

155894 

0 oooooo 

- 063985 

992409 

861944 

1 049966 

13 

-1 

. 39 1 982 

0 oooooo 

1 . 4092 1 3 

865278 

080044 

0 oooooo 

- .032865 

995360 

.861263 

1 054673 

14 

-1 

391982 

0 . oooooo 

1 409470 

865216 

032924 

0.000000 

- . 0 1 3522 

. 996249 

.86197! 

1 . 055646 

15 

-1 

.391982 

0 oooooo 

1 . 409604 

,864365 

0 OOOOOO 

0 oooooo 

0 oooooo 

.996428 

,861277 

1 .056250 

2 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.391982 

1 570379 

0.000000 

869887 

471442 

002273 

0 oooooo 

. 949430 

. 825897 

1 .003871 

2 

-1 

391982 

1 670379 

678523 

877726 

467050 

002496 

- 078215 

951742 

835369 

1 002710 

3 

- 1 

391982 

1 670379 

1 .030468 

890763 

.456312 

003083 

- . 1 30962 

955525 

851 146 

1 000777 

4 

-I 

.391982 

1 .670379 

1 .213018 

894042 

.443137 

0038S5 

- 1 5229.4 

. 956628 

. 855265 

1 .000461 

5 

-1 

.391982 

1 .670379 

1 ,307706 

894375 

, 428062 

004753 

- . 1 59758 

,958106 

. 856906 

I .001857 

6 

-1 

.391982 

1 .670379 

1.356819 

.894581 

413933 

.00552! 

-.161910 

,960488 

.859330 

1 004210 

7 

- 1 

.391982 

1 670379 

1 . 382294 

89279! 

401349 

006102 

- . 160491 

.962615 

859414 

1 .007285 

8 

-1 

.391982 

1 .670379 

1 39550S 

.891069 

,387385 

006339 

-.156955 

.965761 

.860560 

I .01 1359 

9 

- 1 

. 39 1 982 

1 670379 

1 .402361 

.886784 

364494 

.006261 ■ 

-.148632 

. 963898 

860090 

1 .017651 

10 

-1 

.391982 

1 670379 

1 405916 

881286 

. 3209 1 1 

005500 

-.131363 

976872 

.860904 

I .027522 

1 1 

-1 

.391982 

1 670379 

1 ,407760 

873142 

.246977 

004078 

- .101273 

985261 

...860273 

1 .040201 

12 

-1 

391982 

1 .670379 

1 .408717 

.867808 

. 155577 

. 002442 

- , 063855 

.992153 

.860998 

1.050047 

13 

-1 

.391982 

I .670379 

1 ,409213 

864568 

.079888 

.001213 

-.032801 

.995090 

.860323 

1 .054734 

14 

-1 

391982 

1 .670379 

1 .409470 

364503 

032862 

000492 

-.013497 

. S95S76 

.861024 

1 .055704 

15 

-1 

.391982 

1 670379 

1 . 409604 

863659 

0 OOOOOO 

0 OOOOOO 

0.000000 

996154 

860337 

1 .056305 


L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1.391982 

3.246102 

0.000000 

.867739 

467664 

.003078 

0.000000 

.949871 

.824239 

1 .005331 

2 

-1.391982 

3.246102 

.678523 

875504 

.463318 

.003402 

-.077849 

.952148 

.333610 

1 .004156 

3 

-1.391982 

3.246102 

1 .030468 

.888374 

. 452687 

.004296 

- . 1 30225 

.955847. 

.849149 

1 .002190 

4 

-1.391982 

3 246102 

1.213018 

891569 

439632 

.005563 

-.151290 

. 956868 

.853113 

1.0018^ 

5 

-1.391982 

3.246102 

1 . 307706 

,891925 

.424692 

.006934 

- 158633 

,958282 

.854716 

1 .003141 



8 K» 


8 K» 


8 K« 


8 K» 


6 

-1 

.391982 

3.246102 

1.356819 

892277 

.410738 

008169 

-.160740 

.960593 

.857114 

1.005401 

7 

-1 

.391982 

3.246102 

1 . 382294 

890466 

. 398356 

.009106 

-.159344 

.962641 

.857199 

1.008364 

8 

-I 

.391982 

3.246102 

1 . 395508 

888832 

. 384642 

.009572 

-.155872 

.965690 

.858336 

1 0I230I 

9 

-1 

.391982 

3.246102 

1 .402361 

884667 

. 362040 

009313 

-. 147647 

.96971 1 

857872 

1 .018428 

10 

-1 

.391982 

3.246102 

1 .405916 

.879298 

.31881 1 

.008040 

-.130512 

.976550 

.858679 

1.028111 

n 

-1 

.391982 

3.246102 

I .407760 

871294 

.245353 

005790 

-.100613 

. 984805 

. 858054 

1.040601 

12 

-1 

.391982 

3.246102 

1 .408717 

. 866048 

, 154550 

003361 

-.063435 

.991600 

.858773 

1.050316 

13 

-I 

391982 

3 246102 

1 ,409213 

862351 

.079368 

001645 

- .032533 

.994498 

.858104 

1 054945 

14 

-1 

.391982 

3 246102 

1 .409470 

862792 

032653 

. 000666 

- .01341 1 

.995373 

.858799 

1.055901 

15 

-1 

.391982 

3.246102 

1 . 409604 

861955 

0 . 000000 

0 . OOOOOO 

0 . OOOOOO 

.995548 

.8581 18 

1 056497 

4 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.391982 

3.570353 

0.000000 

.866101 

460 1 74 

.002082 

0 OOOOOO 

.951527 

.8241 19 

1 007845 

2 

-1 

.39 1982 

3 . 570353 

.678523 

873893 

. 455950 

.002312 

- 077790 

953787 

. B33507 

1.006626 

3 

-1 

39 1 982 

3 570353 

1 .030468 

886747 

.445614 

003024 

- . 129834 

.957407 

848978 

1 004561 

4 

-1 

391982 

3 570353 

1 213018 

889386 

432916 

0041 16 

- 150323 

958299 

.852776 

1 004077 

5 

-1 

,391982 

3 570353 

1 , 307706 

39024 1 

416339 

.005334 

-. 157159 

. 959588 

854265 

I 005263 

6 

-1 

.391982 

3 570353 

1 .356819 

890656 

404770 

006447 

- . 158948 

.961784 

.856619 

1 .007380 

7 

-1 

.391982 

3.570353 

1 . 382294 

888953 

.392813 

.007304 

- 157426 

.963704 

856687 

1.010164 

8 

-I 

,391982 

3,570353 

1 . 395508 

887450 

379605 

007699 

- 153986 

.966601 

, 857820 

1.013883 

9 

-i 

.391982 

3.570353 

1 402361 

883477 

357657 

007339 

- . 145933 

.970429 

857352 

1 0I973I 

10 

-1 

.391982 

3.570353 

1 .405916 

878318 

315327 

. 005952 

-.1291 16 

.977049 

.858160 

1 .029095 

11 

-1 

.391982 

3 570353 

1 .407760 

870503 

242964 

.003754 

- . 099642 

.985102 

857534 

I .041293 

12 

-I 

.391932 

3 570353 

1 .408717 

865368 

153179 

001752 

- . 062875 

991778 

858254 

! . 050834 

13 

- 1 

,391982 

3 570353 

1 .403213 

,862212 

078705 

.000685 

- .032316 

.994632 

.857583 

1 .055399 

14 

-1 

.391982 

3 . 570353 

1 .409470 

862 1 64 

.032385 

.000240 

- 013301 

, 995494 

. 858279 

I 056337 

15 

-1 

.391982 

3.570353 

I . 409604 

86 1 329 

0 OOOOOO 

0 OOOOOO 

0 . OOOOOO 

995667 

.857597 

1 .056931 

5 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.391982 

3 668967 

0.000000 

864192 

447256 

000878 

0 OOOOOO 

.954310 

.824707 

I 011685 

2 

-1 

,391982 

3.668967 

.678523 

,872080 

, 443266 

,000988 

-.077796 

. 956559 

.834196 

1 .010391 

3 

-I 

.391982 

3 . 668967 

1 . 030468 

885145 

.433510 

001342 

-.129498 

.960137 

.849860 

1 .008155 

4 

-I 

.391982 

3.668967 

1 .213018 

888535 

421536 

.001826 

-.149237 

. 960950 

. 853838 

1 . 007467 

5 

-1 

.391982 

3 668967 

1 307706 

8891 16 

407693 

002303 

-.155220 

.962127 

855442 

I ,008438 

6 

-1 

391982 

3 668967 

1 3568 1 9 

889719 

394853 

.002727 

- 156352 

. 964 1 84 

857853 

1,010320 

7 

-I 

.391982 

3 668967 

1 382294 

808205 

383622 

003067 

- , 154461 

.965934 

.857947 

1,012843 

8 

-I 

.391982 

3 668967 

1 . 395508 

836925 

.371256 

,003141 

-.150945 

.968624 

.859097 

! .016250 

9 

-1 

.391982 

3 . 668967 

1.402361 

883221 

350625 

. 0027 1 4 

-.1.43195 

.972160 

, 858633 

! 021669 

10 

-1 

.391982 

3 . 668967 

1 .405916 

8784C5 

,310485 

.001645 

-.127167 

.978418 

859447 

1 .030497 

11 

-1 

.391982 

3 , 668967 

1 .407760 

.870859 

.240759 

.000243 

-.098742 

.986175 

.858819 

1 .042258 

12 

-1 

.391982 

3.668967 

I 403717 

865813 

. 152667 

- . 000627 

-.062664 

,992759 

859543 

1 ,051657 

13 

-1 

.391982 

3.668967 

1 ,409213 

862659 

078S73 

- .000618 

- . 032302 

.995609 

858871 

1 056217 

14 

-1 

391982 

3 668967 

1 .409470 

862512 

032410 

-.000316 

- 01331 1 

996474 

. 859570 

1 .057158 

15 

-1 

.391982 

3 . 668967 

1 . 409604 

,861773 

0 OOOOOO 

0 . OOOOOO 

0 OOOOOO 

. 996648 

858885 

1 .057754 

6 L 


X 

Y 

Z 

R/PREF 

U/AREF 

V/AREF 

W/AREF 

t/tref 

P/PREF 

ENT 

1 

-i 

.391982 

3.698957 

0 . OOOCOO 

859706 

. 420876 

000403 

0 OOOOOO 

958710 

.824208 

1 .018468 

2 

-I 

.391982 

3.698957 

. 678523 

867532 

. 4 1 7360 

.000473 

- 075792 

960912 

.833622 

1. 017114 

3 

-1 

.391982 

3 . 698957 

I .030468 

8S052I 

,408795 

000672 

- . 125626 

.964346 

849127 

1.014698 

4 

-I 

.391982 

3 698957 

1 ,213018 

884020 

338288 

. 000860 

- 143724 

. 964929 

.853016 

1 ,013702 

5 

-I 

.391982 

3 698957 

1 . 307706 

884867 

385829 

. 000966 

- . 1 48599 

965842 

854642 

1 014274 

6 

-1 

.391982 

3 698957 

1 356819 

835786 

374182 

000986 

- 149164 

967634 

857117 

1 015733 

7 

-1 

.391962 

3 698957 

1 . 382294 

884572 

. 363938 

000908 

- . 14701 1 

,969108 

.857246 

1 ,017839 

8 

-I 

.391982 

3 . 698957 

1 . 395508 

883595 

352542 

, 000653 

- 1 43509 

.971501 

858413 

1 020803 

9 

-1 

,391982 

3.698957 

1.402351 

880343 

. 333948 

.000194 

-.136355 

-.974573 

.857958 

1.025542 

10 

-I 

. 39 1 982 

3.693957 

1 405916 

876238 

. 298704 

- . 000255 

-. 12221 1 

. 9S0069 

. 858774 

1.033256 

1 1 

-1 

.391982 

3.698957 

1,407760 

869412 

236339 

-.000483 

- ,096823 

. 987046 

.858150 

1.043872 

12 

-I 

.391982 

3 693957 

1.408717 

864611 

. 153125 

- .00051 1 

- .062814 

993365 

.858374 

1 052884 

13 

-1 

.391982 

3.698957 

1.409213 

861443 

.07-9638 

- . 000358 

-.032691 

.996239 

.853203 

1 .057481 

14 

-1 

.391982 

3.698957 

I .409470 

861380 

032364 

- 000159 

- 013497 

.997122 

858901 

1 .058451 

15 

-I 

.391982 

3.698957 

1 . 409604 

860540 

0 OOOOOO 

0.000000 

0.000000 

.997300 

.858217 

1.059053 

7 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

t/tref 

P/FREF 

ENT 

1 

-1 

.391982 

3.708078 

0.000000 

852514 

362331 

000083 

0 OOOOOO 

967356 

.824685 

1 031112 

2 

-1 

.391982 

3 708078 

, 678523 

860274 

,359778 

0001 15 

- . 0674 1 4 

.969660 

.834173 

1 .029828 



3 -1.391982 3.708078 1,030468 873243 

4 -1.391982 3.708078 1.213018 876993 

5 -1.391982 3.708078 1.307706 878232 

6 -1.391982 3.708078 1.356819 879567 

7 -1.391982 3.708078 1,382294 878776 

8 -1.391982 3.708078 1.395508 878212 

9 -1.391982 3.708078 1 402361 875605 

10 -1.3919S2 3703078 1 405916 872818 

11 -1.391982 3.70S078 1.407760 867833 

12 -1.391982 3.708078 1,408717 864097 

13 -1.391982 3.708078 1.409213 861086 

14 -1.391982 3708078 1.409470 861027 

15 -1.391982 3.708078 1.409604 860190 

J* 8 K» 8 L X Y 2 R/RREF 


1 

-1 

.391982 

3 710852 

0 . 000000 

841516 

2 

-1 

.391982 

3.710852 

.678523 

843916 

3 

-1 

.391982 

3.710852 

1 030468 

861340 

4 

-1 

.391982 

3.71 0852 

1 213018 

865126 

5 

-1 

.391982 

3.710852 

1.307706 

866867 

6 

-1 

.391982 

3.710852 

1 . 3568 1 9 

868834 

7 

-1 

.391982 

3 710852 

1 . 382294 

868663 

8 

- 1 

.391982 

3 710852 

1 . 395508 

863747 

9 

-1 

.391982 

3.710852 

1 .402361 

867136 

10 

-1 

.391982 

3.710852 

1 .405916 

866135 

1 1 

-1 

.391982 

3.710852 

1 .407760 

863582 

12 

-1 

.391982 

3 710852 

1 .408717 

861726 

13 

-1 

.391982 

3.71C852 

I 409213 

859568 

14 

-I 

.391982 

3 710852 

1 .409470 

859769 

15 

-1 

.391982 

3 710852 

! . 409604 

858992 

L 


X 

Y 

2 

R/RREF 

1 

-1 

,391982 

3.71 1696 

0 000000 

PJ5339 

2 

-1 

,391982 

3 71 1696 

678523 

842600 

3 

-I 

.391982 

3 71 1696 

1,030468 

854755 

4 

-1 

,391982 

3 711696 

1 2I30I8 

8536 37 

5 

-1 

,391982 

3.711696 

1 .307706 

860661 

6 

-1 

.391982 

3.711696 

1 , 3568 1 9 

862929 

7 

-1 

,391982 

3 711696 

1 . 382294 

863151 

8 

-1 

.391982 

3.711696 

1 . 395508 

S63661 

9 

-1 

.391982 

3,711696 

1 ,40236! 

863227 

10 

-1 

.391982 

3 711696 

1 .405916 

863236 

11 

-1 

.391982 

3,711696 

1 .407760 

86 1 609 

12 

-1 

.391982 

3 711696 

1 408717 

86093$ 

13 

-1 

39 1932 

3 711696 

1 ,409213 

858830 

14 

- 1 

391982 

3 711696 

1 409470 

860463 

15 

-1 

39 1 982 

3 71 1696 

1 409604 

859732 

L 


X 

Y 

Z 

R/RREF 

1 

-1 

39 1 982 

3.711952 

0 , 000000 

833666 

2 

-1 

.391982 

3,71 1952 

.678523 

840739 

3 

-I 

,391982 

3 71 1952 

1 .030468 

852666 

4 

-1 

.391982 

3 71 1952 

! 213018 

856473 

5 

-1 

.391982 

3.71 1952 

1 .307706 

856576 

6 

-1 

,391982 

3 711952 

1 356819 

860950 

7 

-1 

.391982 

3.711952 

1 . 382294 

861269 

8 

-1 

.391982 

3 711952 

1 . 395508 

862108 

9 

-1 

391982 

3 711952 

I 402361 

861794 

10 

-1 

391982 

3 71 1952 

1 405916 

8621 U 

1 1 

-1 

391982 

3 711952 

1.407760 

860467 

12 

-1 

. 391 982 

3 711952 

1.408717 

. 859896 

13 

-1 

.391982 

3.71 1952 

1.409213 

859069 

14 

-1 

.391982 

3.71 1952 

1.409470 

859733 

15 

-1 

.391982 

3 711952 

1 . 409604 

859732 


.353521 

000196 

-.110939 

.973184 

849826 

1 ,027403 

. 345646 

.000229 

-.125249 

,973556 

.853802 

1 . 026036 

335552 

000215 

-.128554 

974013 

.855410 

1 .025938 

325807 

000185 

-.128883 

.975285 

857829 

1 . 026654 

.316764 

000136 

-.126989 

97C286 

857937 

1 .028077 

. 3C5335 

- 000075 

- 123807 

97S239 

.85910! 

1 . 030399 

288573 

- . 000625 

-.11 7465 

9S0636 

858650 

I 034153 

260661 

-.000801 

- 1 06349 

.984705 

859469 

I 039768 

215277 

.000320 

- .087714 

,989639 

85884! 

I .047375 

.148228 

.001509 

- 060538 

,994755 

. 859565 

1 054608 

079531 

001231 

-.032590 

.997456 

. 858895 

1 ,058949 

032971 

000553 

- 013540 

. 998335 

859534 

I 05991 1 

0 000000 

0 OOOOOO 

0 . OOOOOO 

.998512 

858910 

1 060512 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

246957 

000023 

0 OOOOOO 

979434 

824209 

I .049422 

245859 

000035 

- . 046890 

98 1 936 

833624 

1 .048478 

242939 

000058 

- 076313 

.985321 

849127 

1 046474 

23859! 

000055 

- 084184 

. 986005 

853018 

I 044834 

231732 

000044 

- .086135 

985901 

854645 

I .043884 

224389 

000038 

- 086987 

986517 

857119 

1 043589 

218094 

000032 

- 085799 

. 986852 

. 857242 

1 . 044026 

208005 

- 000001 

- 082957 

988083 

858394 

1 . 045288 

190968 

- 000334 

- .077352 

.989399 

857943 

1 .047458 

171 169 

- 001214 

- 070651 

.991502 

. 858774 

I 050169 

150306 

- 000372 

- 062554 

. 993705 

.858146 

I 053745 

1 1 2624 

003515 

-.046525 

. 996678 

. 858363 

1 057808 

062034 

004392 

-.025530 

.998404 

858197 

I 060704 

026105 

001795 

- 010764 

998978 

.85889! 

1 061215 

0 000000 

0 OOOOOO 

0 . OOOOOO 

999093 

858212 

I 061720 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

102916 

000003 

0 OOOOOO 

987 1 72 

824683 

1 . 060805 

10271 1 

000007 

- 019712 

989997 

834171 

1 060194 

101956 

0000 1 1 

- 031712 

994232 

849825 

1 058646 

10038! 

000006 

- 033766 

994368 

.85380! 

1 , 056874 

097261 

000007 

- ,034668 

. 993900 

,85541 1 

1 .055382 

094315 

.000009 

- .035517 

,99409$ 

. 857834 

1 054480 

091457 

000007 

- 035184 

993971 

. 857948 

1 .054239 

066486 

000008 

- ,033730 

994503 

859113 

1 ,054456 

074734 

000005 

- . 029595 

. 994679 

858635 

1 . 054953 

059517 

000006 

- 026391 

.995610 

859447 

I 055935 

060640 

000003 

-.030123 

996845 

.858891 

1 058043 

060338 

000005 

- 027767 

,998492 

859688 

I 060099 

033055 

000002 

- ,014206 

.998987 

859009 

1 061169 

013999 

000002 

- 005755 

999 1 4 1 

859723 

I .061045 

0 000000 

0 OOOOOO 

0 OOOOOO 

999172 

859019 

1 061439 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

0 000000 

0 OOOOOO 

0 OOOOOO 

, 983655 

824208 

1 .063280 

0 000000 

0 OOOOOO 

0 OOOOOO 

991536 

. 833623 

1 062781 

0 000000 

0 OOOOOO 

0 OOOOOO 

.995849 

.849127 

I .061408 

0 000000 

0 OOOOOO 

0 OOOOOO 

995966 

.853017 

I 059641 

0 000000 

0 OOOOOO 

0 OOOOOO 

. 995422 

854646 

1 .058025 

0 000000 

0 OOOOOO 

0 OOOOOO 

. 995545 

.857124 

1 056982 

0 oooooo 

0 OOOOOO 

0 OOOOOO 

. 995337 

.857254 

1 056610 

0 oooooo 

0 oooooo 

0 OOOOOO 

.995720 

.858419 

1 .056605 

0 oooooo 

0 oooooo 

0 OOOOOO 

995571 

857977 

1 056601 

0 oooooo 

0 oooooo 

0 OOOOOO 

996145 

853790 

1 057052 

0 oooooo 

0 oooooo 

0 OOOOOO 

. 997282 

858128 

1 .059069 

0 oooooo 

0 oooooo 

0 OOOOOO 

.998788 

.858854 

1 .060950 

0 oooooo 

0 oooooo 

0 OOOOOO 

.998993 

.858204 

1 .061576 

0 oooooo 

0 oooooo 

0 OOOOOO 

.999146 

858999 

1 .06141 1 

0 oooooo 

0 oooooo 

0 OOOOOO 

.999159 

859009 

1 .061425 



1 L 


X 

Y 

Z 

R/RREF. 

U/APEF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.113586 

0.000000 

0.000000 

.842619 

.528973 

0 000000 

0 000000 

937090 . 

.789610 

1 . 003527 

2 

-1 

. 1 1 3586 

0.000000 

.623478 

849970 

.526050 

0 000000 

- , 085400 

.939008 

.798129 

1 .002093 

3 

-1 

. 1 1 3586 

0 000000 

.946871 

.862439 

517864 

0 000000 

- 144369 

.942196 

812635 

. 999632 

4 

-1 

, 1 1 3586 

. 0.000000 

1 . 114613 

866196 

.505760 

0 000000 

- . 170345 

.943145 

.816948 

. 998923 

5 

-1 

.113586 

0 . 000000 

I .201618 

867 1 95 

,490591 

0 000000 

-.181680 

944676 

8I92I8 

I 000083 

6 

-1 

1 1 3586 

0 000000 

1 246748 

867530 

■ 476553 

0 000000 

- 185443 • 

946913 

821475 

I 002297 

7 

-1 

. 1 1 3586 

0 000000 

1 270156 

866008 

464339 

0 000000 

-.185211 

949091 

821912 

I 005298 

8 

-1 

. 1 1 3586 

0 000000 

1 . 282298 

664 1 62 

451 144 

0 000000 

- . 182469 

. 952230 

.622881 

1 . 009494 

9 

-1 

. 1 1 3586 

0 000000 

1 . 288595 

859651 

.428339 

0 000000 

-.174501 

.956997 

.822683 

1 .016674 

10 

- 1 

. 1 13586 

0 000000 

1.291862 

85250! 

.381723 

0 000000 

- . 156164 

.965729 

.823285 

1 .029384 

11 

-1 

. 1 1 3586 

0 . 000000 

I .293556 

841723 

.297555 

0 000000 

-.121986 

.977644 

.822905 

I .047401 

12 

-1 

. 1 1 3586 

0.000000 

1 .294435 

.833527 

. 189119 

0 000000 

- .077615 

.987859 

.823407 

1 . 062496 

13 

-I 

113586 

0 oorooo 

I .294891 

829225 

, 097820 

0 000000 

- 040165 

992463 

. 822975 

I ; 069659 

14 

-1 

. 1 1 3586 

0 . 000000 

1 .295127 

, 828550 

040477 

0 000000 

- .016625 

.993839 

.823445 

1.071491 

15 

-I 

. 1 1 3586 

0 . OODOOO 

1 .. 29.5250 

827862 

0 000000 

0 000000 

0.000000 

.994122 

. 822996 

I .072153 

2 L 


X 

Y 

Z 

R/RREF 

U/AREF 

v/aref 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-I 

. 1 1 3586 

1 670379 

0 000000 

84 1 704 

527938 

002460 

0 000000 

937119 

.788777 

1 003994 

2 

-1 

. 1 1 3586 

1 670379 

623478 

849026 

525025 

002670 

- 085227 

939028 

797259 

1 . 002559 

3 

-1 

. 1 1 3586 

1 670379 

.94687! 

861499 

516862 

.003225 

- 144075 

.942198 

.811702 

I . 000092- 

4 

-I 

. 1 1 3586 

1 .670379 

I . 114613 

.86521 1 

.504783 

003987 

- . 170510 

.943136 

816012 

. 999368*. 

5 

-1 

. 1 1 3536 

i .670379 

1 .201618 

. 866239 

489645 

004801 

-.181340 

.944654 

818296 

I .000502 

6 

-I 

. 1 1 3586 

I .670379 

1 .246748 

86659! 

.475651 

005538 

- . 185100 

.946868 

.820548 

1 .002684 

7 

-1 

. 1 1 3586 

I .670379 

I .270156 

.865099 

.463492 

006093 

- . 184880 

949012 

. 820989 

I .005647 

8 

-I 

. 113586 

I 670379 

1 . 282298 

863280 

. 450359 

006359 

-.182155 

.952128 

.821953 

1 .009798 

9 

-I 

, 1 1 3586 

1 670379 

1 .288595 

853308 

427619 

006168 

- . 174210 

. 956860 

821759 

1 016328 

10 

-1 

1 1 3586 

1 670379 

1 291662 

851698 

381075 

005330 

- 155900 

965550. 

822357 

1 029581 

1 1 

-1 

1 1 3586 

1 670379 

1 233556 

840970 

297029 

003849 

- 121770 

977420 

821981 

I 047536 

12 

-1 

. 1 1 358$ 

1 .670379 

1 .294435 

, 832806 

183773 

002241 

-.077473 

987600 

822479 

I . 062584 

13 

-1 

. 1 1 3586 

1 .670379 

1 .294891 

828523 

,097642 

001099 

- .040092 

.992188 

.82205! 

1 .069725 

14 

-1 

. 1 1 3586 

1 .670379 

1 .295127 

827849 

,040404 

000445 

- .016595 

: 993559 

.822517 

1 .071552 

15 

-1 

. 113586 

1 .670379 

1 . 295250 

827166 

0 . 000000 

0,000000 

0 , OOOOOO 

.99384! 

.822071 

1.072211 

3 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/aref 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-1 

.113586 

3.246102 

0.000000 

839667 

524507 

00328! 

0.000000 

.937544 

787225 

I .005423 

2 

-1 

1 1 3586 

3 246 1 02 

623478 

846914 

521646 

003590 

- .084894 

939416 

. 795604 

1 003974 

3 

-1 

, 113586 

3 246102 

.94687! 

859217 

513601 

004433 

- . 143409 

942499 

80981 I 

1 001474 

4 

-1 

. 1 1 3386 

3 246102 

1 . M46I3 

862842 

,501643 

005618 

- . 169607 

.943352 

.813964 

1 . 000694 

5 

-1 

. 1 13586 

3.. 16102 

1 . 201618 

863888 

. 486622 

006897 

- . 1 80331 

.944807 

.816207 

1 .001751 

6 

-1 

. 1 ! 3586 

3.246102 

1 .245748 

364284 

.472763 

008053 

- . 1 84050 

.946953 

818436 

I .003843 

7 

-1 

. 1 1 3586 

3.246102 

I .270156 

862862 

460783 

008921 

- , 183842 

.949020 

.818874 

1 .006697 

8 

-1 

. 1 1 3586 

3.246102 

I 282298 

.86! 126 

447865 

009312 

- 181171 

. 952045 

.819331 

I .010720 

9 

-I 

. 113586 

3.246102 

1 288595 

856761 

, 425375 

008954 

- . 173310 

. 956673 

.819639 

1 .017699 

10 

-I 

. 1 1 3586 

3 246102 

1 .291862 

849 766 

379127 

007572 

- . 1551 10 

.965244 

. 820232 

1 .030191 

1 1 

-I 

. ! 1 3586 

3 245102 

1 . 293556 

839164 

,295479 

005285 

- 121138 

.976996 

.819860 

1 .047982 

12 

-1 

. I 13586 

3.246102 

1 294435 

831091 

. 187749 

002976 

- .077054 

987081 

.820354 

I 062902 

13 

-I 

. 1 1 3586 

3.246102 

1 .294891 

. 826854 

.097105 

.001437 

-.039872 

.991626 

.819929 

I .069981 

14 

-1 

. I I 3586 

3.246102 

1 .295127 

826188 

040182 

000580 

-.016504 

. 992984 

.820392 

1.071792 

15 

-1 

. 1 1 3586 

3.246102 

1 .295250 

.82551 1 

0 000000 

0 000000 

0.000000 

.993263 

.819950 

I .072445 

4 L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-I 

. 1 1 3586 

3.572277 

0,000000 

,838215 

517864 

002100 

0 OOOOOO 

.939201 

. 787252 

I .007898 

2 

-1 

. 1 1 3586 

3.572277 

.623478 

. 845466 

,515136 

,002344 

- . 084828 

.941046 

795622 

1 . 006404 

3 

-1 

. 1 13586 

3.572277 

.946871 

857729 

.507389 

. 003052 

- . 143059 

.•944038 

.809728 

1 .003805 

4 

-1 

.113586 

3.572277 

1 . 114613 

.861307 

.495746 

004066 

- 168779 

.944767 

813735 

I .002909 

5 

-1 

. 1 1 3586 

3.572277 

1.201618 

862365 

481019 

005163 

- . 1 79055 

.946107 

.815890 

1 003839 

6 

-1 

. 1 1 3586 

3 572277 

i .246748 

.862823 

467471 

.006163 

- 182478 

.948145 

.818081 

1 005787 

7 

-I 

.113586 

3 572277 

1.270156 

861502 

455834 

006912 

- 182142 

.950092 

818507 

1 008471 

8 

-1 

1 13586 

3 572277 

1 . 282298 

859897 

443376 

007198 

- . 1 79498 

. 952972 

819457 

t I .012282 

9 

-1 

. 113586 

3.572277 

1 . 288595 

855699 

421548 

006717 

-.171819 

. 957423 

.819266 

1.019003 

10 

-I 

. 1 1 3586 

3 572277 

1 .291862 

.848378 

.376188 

.005240 

-.153938 

.965811 

.819856 

1 .031227 

1 1 

-1 

1 1 3586 

3 572277 

I . 293556 

838423 

293450 

003078 

-.120318 

977412 

819485 

I 048799 

12 

-1 

.113586 

3 572277 

1 .294435 

.830449 

.186492 

001301 

-.076542 

.987390 

.819977 

I .063564 


7 



13 

-1 

. 1 1 358$ 

3.572277 

1 .294891 

826262 

096458 

000466 

-.039607 

.991882 

819554 

1 .070564 


14 

-1 

. 1 1 3586 

3 572277 

1 .295127 

. 825609 

.039916 

.000154 

-.016395 

.993223 

.820015 

1 .072351 


15 

-1 

.113586 

3.572277 

1 .295250 

.824937 

0.000000 

0.000000 

0.000000 

.993500 

.819574 

1 .072999 

5 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 


1 

-1 

. 1 1 3586 

3.670124 

0 000000 

836378 

505993 

000807 

0 OOOOOO 

942073 

. 787929 

1 ,01 1866 


2 

-1 

. 1 1 3586 

3 670124 

623478 

843702 

.503531 

000953 

- 084710 

943899 

796370 

1 .010299 


3 

-1 

. . 1 3586 

3.670124 

.946871 

656 1 35 

496395 

001361 

-.142599 

946836. 

810619 

1 . 007529 


4 

-1 

.113586 

3 670124 

1 .114613 

. 859965 

4854 1 1 

001809 

-.167696 

.947492 

814810 

I .006429 


5 

-1 

. 1 1 3586 

3 670124 

1 .201618 

.861257 

471273 

002167 

-.177257 

.948734 

.817103 

! .007143 


6 

-I 

. 1 1 3586 

3.670124 

1 .246748 

.861389 

.458279 

. 002463 

- 180075 

.950641 

.819348 

1 .008872 


7 

-1 

1 1 3586 

3 670124 

1 .270156 

860744 

.447186 

002680 

- 179366 

952434 

.819802 

I .011313 


6 

-I 

. 1 1 3586 

3 670124 

1 282298 

85933! 

4354<5 

002640 

- • 7' n 

9551 14 

820759 

1 014825 


9 

•1 

1 nMir. 

3 r. 7oi.M 

1 

(.”:.54l 1 

4U9 m 

UlVM 10 

t 4 ' . 

/O 

0.'U5/5 

t 021113 


to 

- 1 

1 1 j5u6 

3 670124 

1 291062 

84B923 

37 1800 

00099.. 

15. . 

967303 

821 165 

1 032797 


1 1 

-1 

1 1 3586 

3 670124 

1 . 293556 

838738 

29 1 385 

- 000370 

> ■ .1 

.97861 1 

820798 

1 . 049928 


12 

-1 

1 I 3586 

3 670124 

1 ,294435 

830904 

185634 

- 001043 

'6 1 93 

988427 

821283 

I 064447 


13 

-1 

. 1 1 3586 

3 670124 

1.29489! 

.826785 

.09608! 

- 000815 

- , 039452 

.992844 

. 820863 

1 .071331 


14 

-1 

. 1 1 3586 

3.670124 

1 .295127 

. 825 1 48 

033769 

- .000391 

-.016335 

.994163 

.821326 

I .073086 


15 

-1 

. 1 1 3586 

3 670124 

1.295250 

825483 

0 . 000000 

0.000000 

0 OOOOOO 

. 994434 

820888 

1 .073725 

6 

1 


V 

/\ 

Y 

Z 

R/RREF 

U/AREF 

y/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 


1 

-1 

. 1 1 3586 

3 699476 

0 . 000000 

.831436 

479446 

. 000362 

0. OOOOOO 

.947023 

. 787389 

1 .019598 


2 

-1 

. 1 1 3586 

3.699476 

.623478 

.838700 

,477585 

000459 

- , 082236 

.948310 

. 795767 

1 .017973 


3 

-I 

. 1 1 3586 

3.699476 

.946871 

.851053 

.471873 

000709 

- ,138038 

.951607 

809868 

1 .015021 


4 

-1 

. 1 1 3586 

3.699476 

1.114613 

.854980 

.462451 

, 000905 

-.161566 

, 952033 

.813969 

I .013607 


5 

-1 

. 1 1 3586 

3 699476 

1 .201618 

856534 

.449551 

000961 

- . 1 70229 

.953024 

.816298 

1 .013925 


6 

-I 

. 1 1 3586 

3.699476 

1 ,246748 

.857460 

437431 

, 000890 

- , 1 72625 

.954693 

.818630 

1 .015253 


7 

-1 

. 1 1 3586 

3.699476 

I .270156 

, 856597 

.426379 

000687 

- 171674 

956257 

.819127 

1 ,017335 


8 

-1 

. 1 1 3586 

3.699476 

1 .282298 

.855449 

. 4 1 5520 

.000312 

- 16382'-: 

. 958693 

.820113 

I .020474 


9 

-1 

. 1 1 3586 

3.699476 

I .288595 

.852017 

.396310 

-.000216 


.962348 

.818937 

1 .026013 


10 

-1 

. 113586 

3.699476 

I .291862 

846547 

.357374 

- .000707 

-.1 

,969272 

. 820535 

1.036061 


11 

-1 

1 1 3586 

3.699476 

I .293556 

.83765! 

.284071 

- .001 101 

-.1 16452 

979132 

.820170 

1 .051032 


12 

-1 

, 1 1 3586 

3.699476 

1.294435 

83057! 

. 183599 

- .001217 

-.075343 

.988072 

. 820664 

I .064236 


13 

-1 

. 1 1 3586 

3.699476 

1 .294891 

, 826708 

095486 

- .000819 

-.039206 

.992179 

.820242 

1 ,070654 


14 

-1 

. 1 1 3586 

3.699476 

1 295 1 27 

.826146 

.039551 

- 000364 

-.016245 

.99341 1 

.820703 

1 .072275 


15 

-1 

.113586 

3.699476 

1 .295250 

.825493 

0 000000 

0 . OOOOOO 

0 . OOOOOO 

.993664 

.820263 

1 072888 

7 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


1 

-1 

. 1 1 3586 

3.708281 

0.000000 

. 822587 

.415027 

000048 

0 . OOOOOO 

. 957848 

.787913 

1 .035676 


2 

-1 

. 1 1 3586 

3.708281 

.623478 

. 829745 

.414486 

. 000093 

- . 072464 

. 959753 

.796351 

I .034145 


3 

-1 

. 1 13586 

3.708281 

946871 

,842018 

.411312 

000200 

- ,121145 

.962663 

.810584 

1 .0312-2 


4 

-1 

. 1 13586 

3.70828! 

1 . 114613 

.846169 

. 405553 

000244 

- . 1 40667 

.962892 

.814769 

1 . 029425 


5 

-1 

. 1 1 3586 

3.708281 

1 .201618 

.848083 

.395144 

000220 

-.147330 

.963426 

.817065 

1 . 029065 


6 

-! 

. 1 1 3586 

3.708281 

1 .246748 

.849402 

. 384686 

.000170 

- . 150090 

. 964587 

.819323 

I .029666 


7 

-I 

. 1 1 3535 

3.708281 

I 270156 

.848866 

. 374652 

.000079 

- . 1 49382 

. 965767 

.819806 

1 .031 185 


8 

-1 

. 1 1 3585 

3.708281 

1 .282298 

.848021 

. 362203 

- , 000255 

- .146448 

. 967896 

820797 

1 .033870 


9 

-1 

. 1 13586 

3 . 70828 1 

1 .238595 

.845439 

.341262 

- . 000986 

-.139077 

970663 

.820637 

1 038091 


10 

-1 

. 1 1 3586 

3.708281 

1 ,291862 

.842580 

. 305704 

- 001240 

- .124914 

. 974669 

.821237 

1 .043790 


11 

-I 

. 1 1 3586 

3 7CS28 1 

1 .293556 

. 838062 

.24832! 

- 000315 

-.101542 

979490 

, 820874 

1 .051210 


12 

-1 

. 1 13586 

3 70828 1 

1 .294435 

■ 833956 

. 1 7004 1 

000447 

- 069503 

984905 

821367 

I 059101 


13 

-1 

. 1 13586 

3 708231 

1 .294891 

830986 

. 09 1 320 . 

0004 1 8 

- .037440 

. 987924 

.820951 

1 .063864 


14 

-1 

. 1 13536 

3.70328! 

1 295127 

830668 

,038017 

000161 

-.015615 

. 938853 

.821408 

1 . 065028 


15 

-1 

. 1 13586 

3.708281 

1 .295250 

,830071 

0.000000 

0.000000 

0 , OOOOOO 

.989038 , 

.820372 

I .065533 

8 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 


1 

-1 

. 1 13586 

3 710922 

0.000000 

808333 

. 280633 

000020 

0 OOOOOO 

.974093 

, 787332 

1 .060631 


2 

-1 

. 1 13586 

3 710922 

.623478 

815026 

281905 

000033 

- 049019 

976373 

.795770 

1 .059613 


3 

-1 

. 113586 

3 710922 

.946871 

826537 

283435 

000060 

- 081562 

.979834 

609870 

1 057420 


4 

-1 

. 1 13586 

3 710922 

1 , 1 14613 

830565 

, 28 1 555 

000060 

- 093532 

.980023 

.813972 

1 . 055569 


5 

-1 

. 1 1 3586 

3.710922 

1 .201618 

832925 

.274940 

O0C050 

- . 098766 

.980043 

.816303 

1 054394 


6 

-1 

. 1 13586 

3 710922 

1 .246748 

. 834879 

.26761 1 

000040 

-.101185 

.. 0543 

.818635 

1 .053943 


7 

-I 

. 1 13586 

3.710922 

1 270156 

.834918 

.259521 

000027 

-.100804 

.981085 

819125 

1 .054506 


8 

-1 

. 1 13586 

3 710922 

1 .282298 

.834720 

.246136 

- 000031 

- 097490 

.982485 

.820093 

1 .056111 


9 

-I 

. 1 13586 

3 710922 

1 .288595 

833986 

.221402 

-.000486 

- .089523 

.983156 

.819938 

1 .057204 



10 -1.113586 

11 -1.11 3586 

12 -1.113586 

13 -1. 113586 

14 -1.113586 

15 -1 113586 

J« 9 K» 9 L X 

1 -1.11 3586 

2 -1.11 3586 

3 -1.11 3586 

4 -1.11 3586 

5 -111 3586 

6 -1.1! 3586 

7 -111 3586 

8 -1.11 3586 

9 -111 3586 

10 -111 3586 

M -1.1! 3586 

12 -1.113586 

13 -1,1! 3586 

14 - 1 1 1 3586 

15 -1.113586 

J* 9 10 L X 

1 -I. 1 13586 

2 -1.11 3586 

3 -1.11 3586 

4 -1.11 3586 

5 -1.11 3586 

6 - 1 1 1 3586 

7 - 1 . 1 1 3586 

8 -1.11 3586 

9 -1,11 3586 

10 -1.113586 

11 -1.11 3586 

12 -1.113586 

13 -1.1! 3586 

14 -III 3586 

15 -1.113586 

J« 10 K» 1 L X 

1 -.881589 

2 -.881589 

3 -.881589 

4 -.881589 

5 - 881589 

6 -.881589 

7 -.881589 

8 -.881589 

9 -.881589 

10 - 881589 

11 -.881589 

12 -.881589 

13 -.881589 

14 -.881589 

15 -.881589 

J» 10 K» 2 L X 

1 -.881589 

2 -.881589 

3 - 881589 

4 - 881589 

5 -.881589 

6 -.881589 


3.710922 

I .291862 

836093 

3.710922 

I , 293556 

839207 

3 710922 

1 .294435 

841525 

3 710922 

I .294891 

840336 

3.710922 

1 295127 

840192 

3.710922 

I 295250 

833606 

Y 

Z 

R/RREF 

3.711715 

0 OOOOOO 

800505 

3.711715 

623478 

806847 

3. 711715 

.946871 

817769 

3.711715 . 

1 , 114618 

821638 

3 711715 

1 201618 

824154 

3.711715 

1 246748 

826369 

3711715 

1 270156 

826845 

3 71 1715 

1 232298 

827528 

3.711715 

1 288595 

828864 

3.711715 

I .291862 

83471 I 

3 71 1715 

1 . 293555 

841013 

3 71 1715 

1 294435 

84440S 

3 71 1715 

1 294891 

843422 

3 711715 

1 295127 

843306 

3.711715 

1 . 295250 

843316 

Y 

Z 

R/RREF 

3.711952 

0 , OOOOOO 

798460 

3.711952 

623478 

804654 

3.711952 

.946871 

815284 

3.711952 

1 . 114613 

819015 

3.711952 

1 201618 

821594 

3 7 1 1 952 

1 246748 

823936 

3.71 1952 

1 270156 

824497 

3.71 1952 

1 282298 

825367 

3.711952 

1 288595 

827207 

3.71 1952 

1 291862 

833443 

3 711952 

1 293556 

839795 

3 7 1 1 952 

1 294435 

843412 

3 71 1952 

1 .294891 

342873 

3.711952 

1 .295127 

843596 

3.7! 1952 

1 295250 

843456 

Y 

Z 

R/RREF 

0 , 000000 

0 . OOOOOO 

818086 

0 . 000000 

577608 

823202 

0 000000 

.877208 

831279 

0 . 000000 

1 032608 

832549 

0.000000 

1.113213 

.833428 

0 000000 

1 . 155022 

833506 

0 000000 

1 . 1 76708 

832211 

0.000000 

1 187956 

830280 

0 000000 

I ,193790 

825588 

0.000000 

1 196817 

816580 

0 000000 

1 198336 

302073 

0 000000 

I . 193201 

739572 

0 oooooo 

1 199623 

783594 

0 oooooo 

1 , 199842 

782133 

0.000000 

1 . 1 99955 

781520 

Y 

Z 

R/RREF 

1.670379 

0.000000 

817228 

1 670379 

.577608 

822323 

1 .670379 

.877208 

830371 

1 670379 

1 .032608 

831655 

I 670379 

1 1 13213 

832560 

I .670379 

1 . 155022 

832655 


. 188616 

-.001603 

-.077850 

.981418 

.820557 

1 .054271 

. 153336 

-.000521 

-.063622 

.977338 

.820189 

I .048327 

. 107938 

,003998 

- . 044602 

.975241 

.820689 

1.044925 

063989 

004708 

- 026330 

.976139 

.820286 

1 046479 

027521 

.001832 

- 01 1338 

.976851 

820743 

1 .047314 

0 OOOOOO 

0 . OOOOOO 

0 OOOOOO 

977018 

.820310 

1 . 047786 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

. 1 1 4293 

000004 

0 . OOOOOO 

.984268 

.78791 1 

1 .075890 

1 1 5526 

000007 

-.019796 

.986989 

. 796349 

1 075464 

1 1 7553 

00001 1 

- 032761 

,991212 

.810582 

I 074273 

. 1 1 7639 

000006 

- 03675! 

.991638 

,814768 

1 .072707 

. 114961 

000006 

-.039171 

.991400 

817066 

1 071138 

. 1 11993 

000007 

- 040536 

991478 

819327 

1 ,070073 

108594 

000005 

- 040698 

991500 

819817 

I 069S51 

101893 

000006 

- 038901 

99 1 878 

820607 

1 069905 

084500 

. 000003 

- .033061 

990054 

820619 

1 .067248 

060069 

.000003 

- . 026896 

. 933845 

.821226 

1 057577 

057196 

. 00000 1 

- 029621 

976148 

.820953 

1 .046152 

. 056684 

- .000001 

- 026532 

972915 

.821538 

1 041008 

033304 

- 000005 

- 014334 

.973554 

.821117 

1 042178 

014469 

- 000004 

- 005960 

.973670 

.821589 

! 042113 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

. 973697 

821134 

! .042384 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

0 OOOOOO 

0.000000 

0 OOOOOO 

.986138 

.787391 

1 .079037 

0 OOOOOO 

0 . oooooo 

0 OOOOOO 

. 988958 

. 795769 

1 078783 

0 OOOOOO 

0,000000 

0 OOOOOO 

.993358 

. 809369 

; 077909 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

. 993842 

813971 

I 076466 

0 oooooo 

0 oooooo 

0 OOOOOO 

993560 

.816303 

1 074809 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.993570 

.818638 

1 073596 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.993495 

..819134 

1 073223 

0 . OOOOOO 

0.000000 

0 OOOOOO 

. 993643 

820120 

1 .072930 

0 oooooo 

0 oooooo 

0 OOOOOO 

.991257 

819975 

t .069401 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

984579 

820591 

t .059010 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.976697 

.820227 

I 047346 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.973162 

.820776 

i 0417&4 

0 oooooo 

0 oooooo 

0 , OOOOOO 

.973251 

,820333 

1 042123 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.973849 

.821535 

1 042408 

0 oooooo 

0 oooooo 

0 OOOOOO 

.973773 

.821335 

I .042396 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

580507 

0 . oooooo 

0 OOOOOO 

.926131 

. 757655 

1 .003582 

681384. 

0 oooooo 

- 089107 

. 926957 

. 763073 

I .001976 

581614 

0 oooooo 

-. 152256 

.928011 

,771436 

.999204 

.576710 

0 oooooo 

- 184778 

.927694 

. 772350 

.998253 

.565281 

0 oooooo 

-.201633 

.929019 

774271 

.999257 

553221 

0 oooooo 

- . 208936 

931047 

.776034 

1.001402 

542380 

0 oooooo 

- .21 1010 

.933201 

. 776620 

1 .004343 

530807 

0 oooooo 

- . 209884 

.936285 

.777378 

1 .008598 

509772 

0 oooooo 

- .20331 t 

.941617 

.777338 

1 .016644 

462431 

0 oooooo 

- 185332 

. 952520 

. 777808 

1 .032938 

368147 

0 oooooo 

-. 147909 

. 969552 

777652 

I .058975 

237365 

0 oooooo 

-.095474 

.985193 

.777980 

I . 082736 

123312 

0 , oooooo 

- 049826 

.992552 

. 777758 

1 .094251 

051483 

0 oooooo 

-.020726 

,994765 

.778038 

1 .097509 

0 OOOOOO 

0.000000 

0 OOOOOO 

.995226 

.777789 

I .098362 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

579523 

,002564 

0 OOOOOO 

.926165 

.756888 

I 004040 

580404 

002758 

- 088945 

.926983 

. 762280 

I .002432 

. 580646 

003273 

- 151981 

.928024 

. 770604 

.999655 

575757 

, 003986 

- 184463 

.927698 

,771525 

998687 

564353 

.004756 

- 201308 

92901 1 

773458 

.999666 

552330 

,005461 

- . 208604 

.931018 

.775217 

I ,001779 



J* 10 K» 


J» 10 K* 


J- 10 K» 


J* 10 K* 


7 

-.881589 

1.670379 

1 . 176708 

831386 

541534 

. 005997 

-.210685 

.933147 

.775806 

8 

-.881589 

1 .670379 

1 . 187956 

.829480 

530013 

.006246 

-.209572 

.936200 

.776560 

9 

-.881589 

1 670379 

1 . 193790 

824324 

.509031 

. 006034 

-.203017 

.941501 

. 776572 

10 

- .881589 

1 .670379 

1 . 196617 

815851 

461749 

.005163 

- 185059 

952367 

. 776989 

1 1 

- .881589 

1 .670379 

1 193386 

801391 

.367573 

003661 

- 147678 

969359 

. 776836 

12 

- 881589 

1 .670379 

1 199201 

789025 

. 2369G8 

. 002084 

- 095314 

.984962 

.777160 

13 

-.881589 

1 .670379 

1 . 199623 

782969 

1 23596 

.001010 

- 049739 

.992303 

. 776942 

14 

- .881589 

1 .670379 

1 199842 

781510 

051391 

. 000407 

- 020689 

.994509 

.777218 

15 

-.881589 

1 .670379 

1 . 199955 

780902 

0 000000 

0.000000 

0.000000 

.994968 

. 776373 

3 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

1 

-.881589 

3 246102 

0 000000 

815336 

576375 

003377 

0 000000 

926593 

755485 

2 

- 881589 

3 246102 

577608 

820379 

577286 

003663 

- 088632 

927385 

7G0807 

3 

- 881509 

3 246102 

87/208 

828319 

577592 

004454 

- 151369 

928358 

. 768976 

4 

- 881589 

3 246102 

1 032608 

829563 

572773 

. 005543 

- 18364! 

927966 

, 769806 

5 

- .881589 

3 246102 

1 113213 

830489 

.561455 

. 006735 

-.200373 

.929220 

. 77 1 707 

6 

- .881589 

3 246102 

I 155022 

830623 

54954 1 

.007823 

- 207615 

931 161 

.773444 

7 

-.881589 

3 246102 

1 17670S 

329422 

.538887 

. 008645 

- . 209695 

933217 

.774031 

8 

- .881589 

3 246102 

1 . 187956 

827591 

527558 

. 009003 

- 208623 

.936182 

, 774776 

9 

-.881589 

3.246102 

1 193790 

823031 

50681 1 

. 008605 

- .202144 

94 1 388 

. 774792 

10 

-.881589 

3 246102 

1 196817 

814152 

459794 

007 1 78 

- 184282 

.352159 

. 775202 

11 

-.881589 

3.246102 

1 . 198386 

793806 

365944 

.004878 

- . 147027 

.969053 

775054 

12 

-.881589 

3 245102 

1 199201 

787537 

235815 

. 002659 

- . 094352 

. 984552 

. 775372 

13 

- .881589 

3 246102 

1 199623 

.781541 

. 1 22959 

.001260 

- .049484 

991833 

.775159 

14 

- .881589 

3 246102 

1 . 1 99842 

780094 

05112! 

. 000505 

-.020580 

.994020 

. 775429 

15 

-.881589 

3.246102 

1 199955 

779496 

0 000000 

0 . 000000 

0 000000 

. 934475 

.775189 


4 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 


1 

- .881589 

3 573991 

0.000000 

813999 

570424 

002123 

0. 000000 

,928253 

.755597 


2 

-.881589 

3 57399! 

.577608 

819058 

.571444 

002373 

-.088539 

.929022 

. 760923 


3 

- 881589 

3 573991 

.877208 

827017 

.571963 

. 003053 

-.151054 

.929929 

. 769067 


4 

-.881589 

3 573991 

1 032608 

828316 

567321 

.003940 

. - 182971 

.929456 

. 769884 


5 

-.881589 

3 573931 

1 113213 

829295 

556178 

004858 

- 199298 

930621 

.771760 


6 

-.881589 

3.57399! 

1 . 155022 

8294/9 

544479 

.005712 

-.206217 

932459 

. 773455 


7 

-.881589 

3.573991 

1 176708 

828378 

.534090 . 

. 006352 

-.208135 

: 934406 

.774041 


8 

-.881589 

3 573991 

1 . 187956 

.826651 

.523165 

.006573 

-.207057 

. 937229 

.774771 


9 

-.881589 

3.57399! 

1 . 193790 

822254 

.503018 

.006035 

- . 200724 

. 942283 

, .774796 


10 

-.881589 

3.57339! 

1 . 196817 

813502 

456700 

.004491 

- , 1 83087 

95291 1 

.775195 


1 1 

-.881583 

3 573991 

1 . 1 98386 

799306 

. 363405 

.002287 

- . 146024 

.969662 

. 775057 


12 

-.881589 

3 573991 

1 . 199201 

- 787206 

233955 

.00067! 

-.094108 

.984957 

. 775364 


13 

- .881589 

3 573991 

1 1 99623 

781325 

. 121939 

.000109 

- 049074 

.3921 1 1 

.775162 


14 

- 881589 

3 573391 

I 199842 

779900 

050692 

. 000002 

- 020408 

. 994257 

.775421 


15 

- .881583 

3.573391 

1 199955 

779319 

0 000000 

0 000000 

0 000000 

994704 

.775191 

5 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 


1 

-.881589 

3 671141 

0 000000 

812060 

559221 

000877 

0.000000 

.931225 

.756210 


2 

-.881589 

3.671 141 

.577608 

817179 

560558 

,001059 

-.08823! 

.931970 

.761587 


3 

-.881589 

3.67II41 

877208 

825304 

561752 

.001522 

- 150391 

.932815 

. 769856 


4 

-.881583 

3 671 141 

1 032608 

826918 

557701 

.001892 

- 181886 

932293 

. 770930 


5 

-.881589 

3 671141 

1 1 13213 

328205 

546938 

001991 

- 197725 

.933403 

. 773049 


6 

-.881589 

3 67114! 

1 155022 

829581 

535546 

.00196! 

-.204126 

.935140 

. 774840 


7 

-.881589 

3. 671141 

1 176708 

827647 

525456 

.001879 . 

-205646 

. 936958 

..775479 


8 

-.881 589 

3 67114! 

1 . 187956 

826082 

514973 

001624 

- .204347 

. 939638 

,. 776218 


9 

- .881583 

3 67! 141 

1 193790 

82189! 

495513 

000956 

-.198027 

.944478 

. 776258 


10 

- 88 1 589 

3.671141 

1 . 196817 

813452 

.450036 

-.000334 

-.180565 

.954766 

. 776657 


11 

-.881589 

3 67! 141 

! . 1 98386 

793783 

. 357528 

-.001948 

-.143720 

. 970926 

. 776530 


12 

-.881589 

3 671141 

1 . 199201 

788232 

229683 

- .002458 

- 092405 

.985472 

. 776830 


13 

-.881589 

3 671I4I 

I 199623 

782716 

1 19689 

- ,001659 

- 048172 

992230 

. 776634 


14 

-.881589 

3.671141 

I . 199842 

.781371 

049773 

- . 000758 

-.020037 

,994261 

.776886 


15 

- 881589 

3.671141 

1 . 199955 

780814 

0 000000 

0.000000 

0 000000 

,994684 

.776663 

6 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 


I 

-.881589 

3 699926 

0 . 000000 

. 806555 

531867 

.000438 

0 OOOOOO 

.936897 

. 755659 


2 

-.881589 

3 . 699926 

.577608 

81 1632 

534068 

000558 

- .085100 

937599 

.760985 


3 

-.881589 

3 699926 

.877208 

819691 

537269 

.000867 

- . 144805 

.938280 

. 769099 


I .004683 
1.008896 
1 .016896 
I .033142 
1 059124 
1 .082887 
I .094325 
1 .097577 
1 .098426 

ENT 

I 005437 
I 003816 
I 001005 
999982 
I 000887 
I 002912 
1 . 005709 
1 .009796 
! .017659 
1 .033777 
1 .059628 
1 .083254 
1 094606 
1 097833 
1 098673 

ENT 

1.007899 
1.006237 
1 003330 
I .002191 
1 002973 
1 .004864 
1.007498 
1 .011381 
1 .019011 
! .034925 
1 .060560 
1 .083882 
1 095034 
1 098204 
1 099025 

ENT 

1 .012090 
1 .010357 
1 .007279 
1 .005930 
1 .006501 
1 .008191 
1.010618 
1 014265 
I .021565 
1 .036965 
1.061689 
1 .083856 
1 094386 
1 097381 
1 .098161 

ENT 

1 .021029 
1 .019224 
1.0159^ 



4 -.881589 

5 -.881589 

6 - .881589 

7 -.881589 

8 -.881589 

9 -.881589 

10 -.881589 

11 -.881589 

12 - 881589 

■ 13 -.881589 

14 -.881589 

15 - 881589 

J’ 10 K« 7 L X 

1 -.881589 

2 -.881589 

3 -.881589 

4 -.881589 

5 -.881589 

6 -.881589 

7 -.881589 

8 -.831589 

9 -.881589 

10 -.881589 

11 -.881589 

12 -.881589 

13 -.881589 

14 -.881583 

15 -.881589 

J« 10 K« 8 L X 

1 -.881589 

2 -.881583 

3 -,881589 

4 -.881589 

5 -.881589 

6 -:88!585 

7 -.881589 

* 8 -.881589 

9 -.881589 

10 -.881589 

1! -.881589 

12 -.881589 

13 -.881589 

14 -.881589 

15 -.881589 

J» 10 K« 9 L X 

1 -.881589 

2 -.881589 

3 -.881589 

4 -.881589 

5 -.881589 

6 -.881589 

7 -.881589 

8 -.881589 

9 -.881589 

10 -.881589 

11 -.881589 

12 -.881589 

13 -.881589 

14 -.881589 

15 -.881589 

J» 10 K« 10 L X 


3.699926 

1 032608 

821386 

3.699926 

1 . 1 13213 

822938 

3 699926 

1 . 1 55022 

823673 

3 699926 

1 . 176708 

822967 

3 699926 

1 . 187956 

821520 

3 699926 

1 193790 

817595 

3 699926 

1 . 196817 

.810389 

3 699926 

1 198386 

. 799503 

3 699326 

1 199201 

790790 

3 699926 

1 : 09623 

786419 

3.699926 

1 199842 

785402 

3 . 699926 

1 . 199955 

784897 

Y 

Z 

R/RREF 

3 , 703455 

0 . 000000 

795779 

3.708455 

577608 

800723 

3.708455 

877208 

, 803632 

3.708455 

1 , 032608 

810603 

3.708455 

I 1 13213 

812432 

3.708455 

1 . 155022 

813392 

3 708455 

1 . 176708 

812856 

3.708455 

I . 187956 

81 1363 

3.708455 

1 .193790 

807934 

3 708455 

1 . 19G817 

804621 

3 708455 

1 , 1 98386 

. 802597 

3.708455 

1 . 199201 

802591 

3 . 70S455 

1 . 199623 

802522 

3 708455 

1 . 199842 

802856 

3 708455 

1 199955 

802628 

Y 

7 

R/RREF 

3.710982 

0 . 000000 

7781 16 

3.710982 

.577608 

.782414 

3.710982 

.877208 

789182 

3.710982 

1 .032603 

790508 

3.71 0982 

1 1 13213 

792474 

3.71 0982 

1 . 155022 

793991 

3.710982 

1 . 176708 

. 793902 

3.710982 

1 187956 

. 792640 

3.710982 

1 . 193790 

791232 

3.710982 

1 . 196817 

797107 

3.710982 

1 . 198386 

814878 

3.710982 

1 . 199201 

841802 

3.7! 0982 

I . 199623 

843660 

3.710982 

1 . 199842 

843302 

3.710982 

1 . 199955 

847483 

T 

1 

R/RREF 

3.711731 

0 . 000000 

768702 

3.711731 

. 577608 

. 7724 1 3 

3:711731 

877208 

.778014 

3.711731 

1.032608 

778570 

3.71173! 

1.113213 

. 780226 

3.711731 

1 . 155022 

.781726 

3.711731 

1 .176708 

78201 1 

3.7! 1731 

1 . 187956 

781889 

3.71 1731 

1 193790 

784377 

3 71173! 

1 . 196817 

,800631 

3 71 1731 

1 . 198386 

828049 

3 71 1731 

1 . 199201 

852412 

3.711731 

1 . 199623 

,854751 

3.711731 

1 . 199842 

855060 

3.711731 

1 . 199955 

854718 

Y 

Z 

R/RREF 


535247 

.001081 

-.174776 

.937492 

. 770043 

I .014259 

525772 

.001063 

-.190098 

.938366 

.772217 

1 .014438 

514936 

.000755 

-.196526 

.939934 

.774198 

1 .015770 

504835 

.000065 

-. I 98072 

.941650 

. 774947 

1 .017974 

493595 

-.000936 

- 196511 

.944306 

. 775766 

1 .021563 

.472434 

-.002003 

-.189306 

. 948924 

. 775836 

1 .028527 

424830 

-.002974 

-.170701 

.957886 

. 776260 

1 .0419^ 

333094 

-.004116 

- , 134031 

.970770 

.776134 

1 061667 

213001 

- 004473 

- 085741 

981858 

. 776444 

I .078510 

1 1 1235 

-.002906 

- 044781 

.987055 

. 776239 

1 .086625 

046374 

-001283 

- .018670 

. 983664 

. 776499 

1 .088960 

0 000000 

0 000000 

0.000000 

, 989005 

.776267 

1 .089616 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

461 189 

,000087 

0 000000 

. 950239 

.756180 

1 .041156 

465281 

.000139 

-.073515 

951086 

.761556 

1 .039505 

472345 

.000267 

-.124857 

951929 

769808 

I .036318 

475274 

. 000322 

-.150249 

. 950988 

. 770374 

I .034313 

469077 

000287 

- . 163882 

.351451 

. 772989 

1 .033884 

460088 

000205 

- . 170213 

95256! 

.774805 

I 034601 

449892 

- 000005 

- 172338 

.954097 

775543 

I 036542 

435468 

- . 000870 

-, 170746 

. 956925 

. 7764 1 4 

1 040379 

406819 

-.002773 

- . 161740 

.961067 

.776536 

1 .046624 

34S669 

- . 00384 1 

-.139417 

.965631 

. 776968 

1 .053355 

250683 

- 003714 

-.100199 

. 967908 

. 776840 

1 056903 

148258 

-.004702 

- , 059365 

. 968289 

.777141 

1 .057322 

076631 

- .003631 

-.030817 

.368128 

. 776945 

i .057183 

032093 

- 001646 

- 012922 

968043 

.777200 

1 056914 

0 000000 

0 000000 

0 000000 

. 968038 

. 776974 

1 057028 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

308368 

.000039 

0 000000 

971140 

, 755660 

1 .073654 

314377 

.000052 

-,047035 

972613 

. 760986 

I .072915 

326634 

. 000080 

-.079610 

.974553 

. 769099 

1 .071358 

334186 

,000084 

-.095443 

.974116 

.770046 

I .070158 

332473 

,000076 

-. 105829 

,974446 

. 772224 

1.069458 

327162 

000059 

-.111459 

.975078 

. 774203 

1 .069333 

319128 

000017 

-.11 3028 

.976115 

. 774940 

1 .070518 

301694 

-.00015! 

-.110111 

.978689 

. 775749 

1 . 074025 

262300 

- 000908 

-.099471 

.980613 

.775892 

1 .076901 

192599 

- ,002446 

-.075948 

.974033 

. 776408 

1.066516 

059193 

- 001292 

- 023939 

.952593 

776247 

1 ,033880 

- 098093 

.00361! 

. 039288 

922493 

. 776557 

. 988278 

- 074874 

004359 

.030122 

.914742 

. 776305 

. 976798 

- 029240 

.001524 

.011756 

.915544 

.776657 

.977820 

0 000000 

0 . 000000 

0 . 000000 

.916052 

.776339 

.978741 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

122867 

. 000008 

0.000000 

983708 

,756178 

. 1 . 092856 

. 126570 

.000010 

-.017745 

.985942 

.761554 

1 .093230 

.134362 

■■ 000013 

- .029723 

989449 

. 769806 

1 .093953 

139619 

.000010 

-.035141 

9901 13 

. 770873 

1.094374 

139761 

.000013 

-.039862 

.990725 

.772989 

1.094120 

137986 

.000014 

-.042646 

.991152 

. 774809 

1.093751 

. 134480 

.000013 

- . 043683 

.991739 

.775551 

1 , 094239 

125266 

.000013 

- 042028 

.992997 

.776413 

1 . 095696 

098044 

000010 

- .034279 

.989987 

. 776523 

1 090987 

.048613 

000011 

- . 020555 

970450 

.777021 

1 . 060692 

-.001259 

.00001 1 

- 005872 

.938356 

.777005 

1 .011918 

-066130 

.000010 

.023294 

912025 

777422 

972181 

- 036543 

-.000001 

.014105 

.909295 

. 777220 

,968209 

- 012755 

.000004 

005105 

909279 

. 777488 

,968052 

0 000000 

0 000000 

0.000000 

.909360 

.777246 

.968293 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 



J* I 


J= I 


J« I 


I 

- .881589 

3.71 1952 

0.000000 

766452 

0 000000 

0 000000 

0.000000 

.985918 

.755659 

1 . 096596 

2 

- .881589 

3.71 1952 

.577508 

769975 

0 000000 

0 000000 

0.000000 

. 988325 

. 760986 

I . 097259 

3 

- .881589 

3.71 1952 

.877208 

775141 

0 000000 

0 000000 

0.000000 

,992204 

, 769098 

1 . 098623 

4 

- .881589 

3.71 1952 

1 . 032608 

. 775363 

0 000000 

0 . OCOOOO 

0.000000 

.993141 

. 770045 

1 . 099534 

5 

- .881589 

3.71 1952 

1.113213 

.777005 

0 ooocoo 

0.000000 

0 . oooopo 

. 993845 

. 772223 

1 . 099383 

6 

- .881589 

3.71 1952 

1 . 155022 

.778675 

0 000000 

0 000000 

o.ooocroo 

, 994260 

. 774205 

1 . 098898 

7 

- .881589 

3.71 1952 

1 .176708 

.779033 

0 000000 

0 000000 

0.000000 

.994757 

, 774948 

1 . 099246 

8 

- .881589 

3.71 1952 

1 . 1 87956 

.779163 

0 000000 

0 000000 

0 . 000000 

995650 

. 775774 

1 .100159 

9 

-.881589 

3 71 1952 

I . 193790 

782566 

0 000000 

0 000000 

0 000000 

.991508 

. 775920 

1 . 093674 

10 

- .881589 

3 71 1952 

1 . 196817 

799406 

0 000000 

0 000000 

0 000000 

.971195 

, 776379 

1 .062184 

1 1 

- 881589 

3.71 1952 

1. 198386 

826477 

0 000000 

0 000000 

0 cooooo 

.939214 

, 776239 

1,013613 

12 

-.881589 

3.71 1952 

1 . 193201 

843946 

0 000000 

0 OOOGOO 

0 000000 

.915018 

.776801 

. 976962 

13 

- .881589 

3.7)1952 

1 . 199623 

852932 

0 000000 

0 000000 

0-000000 

.910499 

.776639 

970295 

14 

- .881589 

3.711952 

1 . 199842 

854742 

0 000000 

0 oodooo 

0 000000 

.91084! 

. 773534 

. 969859 

15 

-.881589 

3.71 1952 

1 .199955 

854730 

0. 000000 

0 000000 

0 000000 

.910101 

. 777890 

.969076 

1 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 649592 

0 cooooo 

0 000000 

788094 

639710 

0 000000 

0 000000 

.912600 

.719215 

1 . 003805 

2 

- . 649592 

0 . 000000 

533547 

739304 

646632 

0 000000 

- 086778 

.91 1681 

.719593 

1 .002178 

3 

- .649592 

0.000000 

.810293 

788297 

661876 

0 000000 

-.147547 

,908715 

.716337 

999429 

4 

- . 649592 

0 . 000000 

.953839 

731786 

673092 

0 000000 

- . 180852 

904863 

707409 

.998499 

5 

- 649592 

0 . 000000 

1 .023295 

778559 

673193 

0 000000 

-.201143 

.904335 

. 704078 

. 999568 

6 

- . 649592 

0 . 000000 

1 066915 

775958 

668051 

0 000000 

- .210950 

.905165 

702370 

1 .001826 

7 

- 649592 

0 000000 

1 086947 

773610 

661274 

0 000000 

- 215014 

.906744 

70 1466 

I 004792 

8 

- 649592 

0 000000 

I .097337 

770971 

652832 

0 000000 

-.215632 

. 909409 

701 128 

1 .009123 

9 

- .649592 

0 . 000000 

I . 102726 

765807 

634316 

0 000000 

- .21 1290 

915247 

. 700902 

1 018335 

10 

- .649592 

0.000000 

1 . 105522 

754266 

584480 

0 000000 

-.195605 

.929275 

. 700920 

1 .040243 

1 1 

- .649592 

0.000000 

I 106972 

734489 

471393 

0 000000 

- . 158104 

954287 

.700913 

1 079655 

12 

- , 649592 

0 000000 

1 . 107724 

716642 

304565 

0 000000 

-.102233 

. 978222 

.701035 

1.1! 7678 

13 

- .649592 

0 000000 

1 1081 14 

708424 

159293 

0 OCOOOO 

- 053491 

. 989555 

.701025 

1 1 35854 

14 

- .649592 

0 000000 

I . 108316 

706065 

066491 

0 000000 

- ,022333 

992974 

.701 104 

1.141301 

15 

- .649592 

0 000000 

1 . 108421 

70551 1 

0 000000 

0,000000 

0.000000 

993693 

.701062 

1 . 142485 

2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- .649592 

1 .670379 

0 . 000000 

787303 

638773 

,002623 

0 000000 

.912642 

.718526 

I . 004254 

2 

- .649592 

1 .670379 

. 533547 

. 788508 

645686 

,002796 

-.086635 

,911721 

.718899 

1 . 002627 

3 

- . 649592 

1 .670379 

.810293 

.787507 

.660911 

. 003263 

-.147304 

.908753 

.715649 

99987! 

4 

- . 649592 

1 . 670379 

.953839 

781034 

672117 

. 003925 

-.180571 

904901 

.706759 

. 998926 

5 

- . 649592 

1 .670373 

1 .028295 

777846 

672226 

. 004655 

- , 200850 

.904367 

. 703458 

. 999970 

6 

- . 649592 

I 670379 

1 .066315 

775273 

667105 

005337 

-.210651 

.905181 

.701762 

1.002198 

7 

- .649592 

1 .670379 

1 .036947 

772953 

660363 

.005862 

- 214718 

.906733 

. 700866 

1 .005126 

8 

- . 649592 

1 .670379 

1 .097337 

770342 

.651968 

.006105 

-.215346 

. 909374 

. 700529 

1 .009413 

9 

- . 649592 

1 .670379 

1 . 102726 

765210 

633516 

.005876 

- 2II023 

.915181 

. 700306 

1 .018579 

10 

- . 649592 

1 670379 

1 . 1 05522 

753701 

,583767 

004971 

- 195366 

929178 

. 700322 

1 . 040445 

1 1 

- .649592 

I .670379 

1 . 106972 

733963 

47081 1 

003437 

-.157907 

.954157 

.700317 

1 .079817 

12 

- . 649592 

I 670379 

I . 107724 

716152 

304146 

001898 

- 102092 

978056 

. 700437 

1 1 17793 

13 

- .649592 

I .670379 

1 . 1081 14 

707957 

159057 

. 000905 

- 0534 1 1 

. 989365 

, 700428 

1 . 135936 

14 

- . 649592 

1 .670379 

1 . 108316 

705603 

066383 

.000362 

- 022299 

.992776 

. 700506 

1 . 141372 

IS 

- . 649592 

1 670379 

I . 108421 

705053 

0 000000 

0.000000 

0.000000 

.993493 

. 700465 

I 142552 

3 L 

X 

Y 

Z 

R/RPEF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- 649592 

3 246102 

0 000000 

785552 

635887 

003462 

0,000000 

.913079 

.71727! 

1 .005630 

2 

- . 649592 

3.246102 

.533547 

786758 

642776 

003715 

-.086373 

.912151 

.717643 

1 . 003992 

3 

- . 649592 

3 246102 

.810293 

785777 

657945 

.004395 

- .146815 

.909165 

.71440! 

1 .001204 

4 

- . 649592 

3 246102 

.953339 

779367 

669113 

.005346 

-.179914 

.905287 

.705551 

! . 000206 

5 

- .649592 

3.246102 

I 028295 

776236 

669244 

. 006400 

-.200068 

904712 

.702271 

I .00! 182 

6 

- 649592 

3.246102 

1 .066915 

773725 

664181 

.007400 

- . 209800 

. 905474 

.700588 

1 . 003325 

7 

- .649592 

3 246102 

I 086947 

771481 

657540 

008173 

- 213846 

.906967 

.699708 

1 ,006147 

8 

- . 649592 

3 246102 

1 .097337 

768946 

649308 

.008508 

- 214496 

909521 

.699373 

I 010309 

9 

-.649592 

3.246102 

1 . 102726 

763901 

631079 

.008078 

-.210228 

.915246 

.699157 

I .01934^ 

10 

- . 649592 

3.246102 

1 . 105522 

752470 

581586 

.006585 

-.194645 

.929166 

.699170 

1 .041113 

1 1 

- . 649592 

3.246102 

1 . 106972 

732845 

468919 

. 004246 

-.157277 

. 954048 

.699169 

1 . 080353 

12 

- . 649592 

3.246102 

1 . 107724 

715162 

.302730 

.002165 

-.101618 

.977798 

.699285 

1 . 1 181 18 

13 

- . 649592 

3.246102 

1 . 1081 14 

707050 

158253 

.000986 

-.053142 

.989010 

.699280 

1.136111 

14 

- . 649592 

3 246102 

1 . 108316 

704717 

066044 

.000388 

-.022183 

.992388 

.699353 

1 . 141499 



J* I 


J* 1 


J* 1 


J* 1 


15 

-.649592 

3.246102 

1 

108421 

704177 

0 000000 

0.000000 

0.000000 

.993097 

.699316 

I. I 42665 

L 

X 

Y 


Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

-.649592 

3 . 575745 

0 

000000 

784234 

630598 

.002294 

0 000000 

.914700 

.717339 

1 .008093 

2 

- . 649592 

3 . 575745 


533547 

.785513 

637529 

002502 

- . 036274 

.913776 

.717783 

1.006418 

3 

-.649592 

3 . 575745 


810293 

. 784736 

652720 

003019 

-.146643 

.910800 

.714738 

I .003538 

4 

-.649592 

3.575745 


953839 

778620 

663822 

.003577 

-.179628 

.906945 

.706166 

1 .002422 

5 

-.649532 

3.575745 

1 

028295 

775669 

663944 

.004076 

-.199476 

.906342 

.703021 

1 .003278 

6 

-.649592 

3,575745 

1 

066915 

.773232; 

658966 

. 004549 

-.208848 

.907026 

.701342 

1 .005301 

7 

-.649592 

3 575745 

1 

086947 

771095 

652480 

.004901 

-.212656 

. 908440 

.700493 

1 .007983 

8 

- . 649592 

3.575745 

1 

097337 

768535 

644469 

. 004944 

-.213175 

.910894 

.700145 

1 .011993 

9 

-.649592 

3 . 575745 

1 

102726 

753574 

626348 

.004255 

-.208816 

.916562 

.699955 

1 .020937 

10 

- .649592 

3 575745 

1 

105522 

752304 

576539 

.002516 

- . 1 93056 

. 9304 1 1 

.699951 

1 042599 

11 

- .649592 

3 575745 

1 

106972 

732993 

463780 

000202 

- . 1 55584 

954951 

. 699973 

I 081287 

12 

- 649592 

3 575745 

1 

107724 

715745 

298939 

- 000956 

- . 100353 

978098 

700068 

I 1 18096 

13 

- 649592 

3 575745 

1 

108114 

707882 

156244 

- 000807 

- . 052469 

988983 

. 700083 

1 135545 

14 

- 649592 

3 575745 

I 

108316 

705596 

06521 I 

- 000391 

-.021903 

992261 

.700136 

1 . 140784 

15 

-.649592 

3 575745 

I 

108421 

. 705090 

0 000000 

0.000000 

0 . 000000 

.992950 

.700120 

1 . 141903 


5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 649592 

3 672170 

0 000000 

782157 

620227 

001134 

0 . 000000 

.917706 

.717790 

1 .012480 

2 

-.649592 

3.672170 

.533547 

. 78 3504 

627514 

.001314 

-.085640 

.916758 

.718283 

I .010737 

3 

- . 649592 

3 672170 

.810293 

. 782958 

643417 

.001733 

-.145613 

.913727 

,715410 

1 007676 

4 

-.649592 

3 572170 

953839 

777350 

654994 

.001815 

- . 1 78557 

. 909879 

. 707294 

1 .006322 

5 

- 649592 

3 672170 

1 . 028295 

774930 

655214 

.001220 

-.198482 

.909317 

. 704657 

1 .006956 

6 

- .649592 

3.672170 

1 .066915 

. 772818 

650206 

. 000226 

-.207718 

. 909988 

. 703255 

1 008799 

7 

- .649592 

3 672170 

1 .086947 

770353 

643685 

-.000877 

-.21 1203 

91 1379 

. 702539 

I .011371 

8 

-.649592 

3 672170 

1 .097337 

768414 

635359 

-.002000 

-.211182 

.913890 

. 702246 

1 015444 

9 

-.649592 

3 672170 

1 . 102726 

763310 

615482 

-.003491 

- . 205846 

.919779 

. 702076 

1 024715 

10 

-.649592 

3 672170 

1 . 105522 

. 752008 

561262 

-.0056)0 

-.138263 

.933627 

. 702095 

1 . 046368 

1 1 

-.649592 

3.672170 

1 . 106972 

734055 

445226 

- 007756 

-. 149491 

,956497 

.70212! 

1 .08241 1 

12 

-.649592 

3 672170 

1 .107724 

718729 

285973 

- 007094 

-.096037 

.977029 

.702219 

1 . 1 15016 

13 

- .649592 

3 672170 

1 108114 

711625 

150096 

- .004305 

- . 0504 1 2 

986799 

.702231 

1 . 130651 

14 

- 649592 

3 672170 

1 108316 

709522 

062794 

• 00190! 

- 021091 

989802 

702286 

1 135434 

15 

- .649592 

3.672170 

1 108421 

709047 

0 000000 

0 000000 

0 000000 

,990437 

. 702266 

1 136467 

6 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.649592 

3 700376 

0.000000 

.776159 

592478 

.000597 

0.000000 

.924188 

.717317 

1 022775 

2 

-.649592 

3 700376 

.533547 

.777486 

600931 

.000718 

-.081307 

.923191 

.717768 

1 020974 

3 

-.649592 

3 . 700376 

.810293 

776902 

619564 

.001037 

- . 1 37926 

SI 9937 

.714701 

I .017680 

4 

-.649592 

3 700376 

.953839 

771358 

633852 

.001219 

-.169074 

.915722 

.706350 

1 .015923 

5 

- . 649592 

3.700376 

1 .023295 

769245 

635553 

.001034 

-.189048 

.914923 

. 703800 

1 .016152 

6 

- . 649592 

3.700376 

1 .066915 

767632 

630701 

000135 

-.199498 

.915551 

.702806 

I .017704 

7 

-.649592 

3 . 700376 

1 086947 

. 765956 

623394 

-.002037 

- . 204042 

.917086 

. 702447 

1 .020301 

8 

- . 649592 

3 . 700376 

1 .097337 

763300 

612440 

- 005438 

-.204338 

.920105 

.702317 

1 .025084 

9 

- .649592 

3 700376 

1 . 102726 

757650 

585147 

-.009368 

- . 196771 

.926973 

702321 

1 .035809 

10 

- 649592 

3 700376 

1 1 05522 

746925 

.514705 

-.013534 

- . 1 73300 

940324 

,702351 

1 056736 

1 1 

- . 649592 

3 . 700376 

1 . 106972 

734167 

382379 

-.016552 

- 128763 

. 956787 

. 702442 

1 . 082673 

12 

- 649592 

3.700376 

1 . 107724 

725869 

236518 

-.015446 

- 079572 

967785 

. 702485 

1 , I00I09 

13 

- .649592 

3.700376 

1 108114 

721654 

126531 

- 009496 

-.042530 

.973516 

702542 

1 . 109204 

14 

-.649592 

3 700376 

1.106316 

72008! 

053561 

- 004149 

-.017989 

S7565! 

702548 

1 .112607 

15 

- . 649592 

3.700376 

1 . 108421 

719749 

0 000000 

0 000000 

0 , 000000 

.976141 

.702577 

I .113372 

7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.649592 

3:708627 

0.000000 

.763196 

516060 

.000140 

0.000000 

.940462 

.717758 

! .047821 

2 

-.649592 

3. 708627 

.533547 

764360 

526831 

.000187 

-.067026 

-'.939680 

.718254 

1 ,046311 

3 

- 649592 

3 . 708627 

. 8 1 0293 

763691 

55094 1 

000307 

-.112949 

.936724 

715368 

1 .043385 

4 

-.649592 

3 708627 

953839 

. 758442 

570972 

000342 

- 137788 

932492 

707242 

1 .041541 

5 

- 649592 

3 708627 

1 . 028295 

756430 

.576952 

000267 

-.154801 

.931391 

. 704579 

I 041389 

6 

-.649592 

3 708627 

1 .066915 

754796 

574252 

000124 

- .164411 

.931662 

.703215 

1 .04262! 

7 

- .649592 

3.708627 

1 . 086947 

.753021 

565962 

-.000199 

-.170325 

.933266 

. 702768 

1 045400 

8 

-.649592 

3.706627 

1 .097337 

750181 

5508G7 

- 001775 

- 172609 

. 937028 

. 702940 

1 051201 

9 

- 649592 

3 708627 

1 102726 

744521 

.516296 

- 007957 

- 166354 

944347 

. 703086 

I .062627 

10 

- 649592 

3.708627 

1 . 105522 

737389 

433162 

- 015379 

- .141846 

.953757 

. 703289 

I 077356 

1 1 

- 649592 

3 708627 

1 106972 

. 735206 

247067 

- 019592 

- 081436 

.956645 

703331 

1 .081900 


12 

-.649592 

3.708627 

1 . 107724 

744836 

.059182 

- .021454 

-.019457 

. 944435 

.703449 

1 . 062547 

13 

-.649592 

3 . 708627 

1 . 108114 

.751936 

005426 

-.016071 

-.001763 

.935457 

. 703404 

1 . 048459 

14 

-.649592 

3 703627 

1 . 108316 

.754120 

.001627 

- . 006808 

- 000549 

.932877 

.703501 

1 .044355 

15 

-.649592 

3.708627 

1 . 108421 

.754372 

0 000000 

0.000000 

0.000000 

.932479 

.703437 

1 .043770 

8 L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.649592 

3.711040 

0 000000 

741620 

343629 

.000051 

0 oooooo 

. 967232 

.717318 

1 090079 

2 

- .649592 

3.71 1040 

.533547 

741885 

. 355506 

.000061 

- 037842 

.967495 

.717770 

1 .090220 

3 

-.649592 

3.71 1040 

.810293 

739378 

. 382670 

. 000086 

- .061992 

. 966629 

.714704 

1 .090720 

4 

-.649592 

3.71 1040 

.953839 

732730 

406368 

.000087 

- 074264 

.964010 

. 706359 

1 .091701 

5 

-.649592 

3.71 1040 

1 .028295 

730334 

415977 

. 000076 

-.085671 

.96369! 

.703816 

1 ,092771 

6 

-.649592 

3.71 1040 

I .066915 

.729101 

416773 

. 000032 

- . 092899 

. 963958 

. 702823 

1 .093814 

7 

-.649592 

3.711040 

1 . 086947 

727973 

4 1 2222 

- 000109 

- 09625! 

. 964922 

. 702437 

I 095585 

8 

-.649592 

3.711040 

1 097337 

725439 

. 397539 

- 000614 

- 096219 

.968021 

.702240 

1 . 100637 

9 

-.649592 

3 71 1040 

1 . 102726 

720097 

.346903 

- 001936 

- 087897 

. 975668 

. 702576 

1.112617 

10 

-.649592 

3.71 1040 

1 . 105522 

. 720740 

253391 

- 004198 

-.07326! 

.975441 

. 703039 

111 1961 

11 

-.549592 

3 71 1040 

1 . 106972 

751915 

- 083494 

- 003951 

.035181 

. 935536 

. 703489 

1 . 048626 

12 

-.649592 

3.711040 

1 . 107724 

894916 

- 647050 

. 0008 1 1 

.216889 

. 785889 

. 703305 

.821577 

13 

- 649592 

3.71 1040 

1 . 108! 14 

952477 

- 673360 

002750 

226348 

.738173 

. 703093 

. 752690 

14 

-.649592 

3 71 1040 

1 103316 

882075 

- 274193 

000339 

092120 

79663! 

702688 

837635 

15 

-.649592 

3 71 1040 

1 108421 

.863124 

0 000000 

0 OOOOOO 

0 OOOOOO 

.809888 

. 703084 

,857023 

9 L 

X 

Y 

Z 

R/RREF 

. U/AREF 

V/AREF 

y/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.649592 

3.711746 

0 000000 

730243 

. 1 35455 

,000008 

0 . OOOOOO 

.982900 

.717756 

1 . 114608 

2 

- .649592 

3 71 1746 

.533547 

72967! 

.141732 

.000010 

- 012382 

.984350 

.718252 

111 6603 

3 

- .649592 

3.71 1746 

.810293 

. 725340 

156326 

000012 

- .018974 

. 986249 

.715366 

1 . 121424 

4 

-.649592 

3 7II746 

.953839 

7171 14 

. 16916! 

000010 

- 021555 

986231 

. 707240 

1 . 126531 

5 

-.649592 

371 1746 

1 . 023295 

713659 

. 174819 

, 0000 1 4 

- 025915 

987276 

. 704578 

1 . 129905 

6 

-.649592 

3.711746 

1 .066915 

71 1874 

.175755 

.000015 

- .028809 

.987843 

. 703220 

1 , 131687 

7 

-.'649592 

37! 1746 

1 .086947 

.710820 

.172166 

.000015 

-.030825 

. 988698 

. 702787 

1 , 133339 

8 

-.649592 

3.711746 

1 097337 

709433 

. 158683 

000015 

- .030820 

,990935 

. 703002 

I .136791 

9 

-.649592 

3.711746 

1 . 102726 

710763 

' . 1 18599 

,000006 

-.025310 

.989424 

. 703252 

1 . 1 34204 

10 

-.649592 

3.711746 

1 . 105522 

.733444 

.031063 

.000001 

-.005924 

.959362 

.703639 

1 .086015 

11 . 

-.649592 

3.711746 

1 . 106972 

784010 

- 126060 

OOOOOO . 

.037806 

. 897508 

. 703656 

989259 

12 

-.649592 

3.711746 

1 . 107724 

.867701 

- .409840 

- ,000001 

. 134550 

.8! ! 198 

. 703878 

.858577 

13 

-.649592 

3.711746 

1 1081 14 

875490 

- .283764 

-.000004 

.095003 

,803509 

. 703464 

.847404 

H 

-.649592 

3.711746 

1 . 108316 

867733 

-.11 1288 

000002 

.037324 

811122 

. 703838 

.858483 

15 

-.649592 

3.711746 

1 . 108421 

865483 

0 000000 

0 oooooo 

0 . OOOOOO 

.812827 

.703488 

.86!!8! 

10 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.649592 

3.711952 

0.000000 

727803 

0 000000 

0 oooooo 

0 . OOOOOO 

. 985594 

.717318 

1 . 1 1916! 

2 

- .649592 

3.7! 1952 

.533547 

. 725999 

0 000000 

0 oooooo 

0 . OOOOOO 

. 987305 

,717770 

1 . 121599 

3 

-.649592 

3.7! 1952 

.810293 

. 722045 

0 000000 

0 oooooo 

0 OOOOOO 

. 989833 

.714703 

1 . 127551 

4 

-.649592 

3 . 7 1 1 952 

.953839 

.713185 

0 000000 

0 oooooo 

0 OOOOOO 

.990/27 

706358 

1 : 133813 

5 

- 649592 

3 71 1952 

1 . 028295 

709623 

0 000000 

0 oooooo 

0 OOOOOO 

991816 

.703816 

I . 1.37680 

6 

- .649592 

3 7 1 1 952 

1 066915 

708147 

0 oooooo 

0 oooooo 

0 OOOOOO 

,992483 

. 702824 

1 . 1 39394 

7 

-.649592 

3.71 1952 

1 .086947 

707220 

0 oooooo 

0 oooooo 

0 . OOOOOO 

,993252 

.702447 

1 . 1 40874 

8 

- .649592 

3.71 1952 

1 097337 

705964 

0 oooooo 

0 oooooo 

0 OOOOOO 

.994833 

.702316 

1 . 143502 

9 

- .649592 

3.71 1952 

1 102726 

.709104 

0 oooooo 

0 oooooo 

0 OOOOOO 

.990831 

. 702602 

1 . 1 36883 

10 

- .649592 

3.71 1952 

1.1 05522 

.733360 

0 oooooo 

0 oooooo 

0 , OOOOOO 

.958506 

. .702929 

1 .085095 

1 1 

-.649592 

.3.711952 

1 . 106972 

781562 

0 . oooooo 

0 oooooo 

0.000000 

. 899550 

.703054 

.992750 

12 

-.649592 

37! 1952 

1 . 107724 

835587 

0 oooooo 

0 oooooo 

0 oooooo 

.841605 

. 703234 

.904298 

13 

-.649592 

3 71 1952 

1 1081 14 

85781 1 

0 oooooo 

a oooooo 

0 oooooo 

. 820308 

. 704098 

.872741 

14 

-.649592 

3.711952 

1 . 108316 

862333 

0 oooooo 

0 oooooo 

0 oooooo 

.817306 

.705199 

.866990 

15 

-.649592 

3.71 1952 

1 108421 

.864155 

p oooooo 

0.000000 

0.000000 

.815067 

. 704344 

.864085 

I L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.417595 

0.000000 

0.000000 

749420 

710088 

0 oooooo 

0.000000 

.894638 

.670459 

1 .004054 

2 

- .417595 

0 000000 

.502575 

745637 

.72359! 

0 oooooo 

- .074966 

.891566 

.664785 

1 .002634 

3 

-.41 7595 

0 . 000000 

. 763256 

732236 

. 755857 

0 oooooo 

- 121665 

, 883000 

. ,646564 

1.000232 

4 

-.417595 

0 000000 

898469 

7 1 3860 

766589 

0 oooooo 

- . 143676 

873198 

623341 

999234 

5 

-.41 7595 

0 000000 

. 968603 

703281 

801491 

0 oooooo 

-. 158686 

868831 

61 1033 

1 000193 

6 

- .417595 

0 000000 

1 .004981 

696054 

805403 

0 oooooo 

- .165868 

.867181 

603604 

1 002426 

7 

-.41 7595 

0.000000 

1 023850 

691569 

. 803866 

0 oooooo 

-.169125 

.867393 

.599862 

1.005267 

8 

-.417595 

0.000000 

1 .033637 

687670 

. 799002 

0 oooooo 

- .170013 

.869185 

.537713 

1.009625 




> 12 K* 


J« 12 K« 


J» 12 K» 


J* 12 K. 


9 

-.417595 

0.000000 

1 .038714 

681514 

.781704 

0 OOOOOO 

-.167363 

.875745 

,596832 

1.020912 

10 

-.417595 

0.000000 

1 .041347 

666355 

.723188 

0 OOOOOO 

-.155379 

.894791 

. 596248 

I .052542 

1 1 

-.417595 

0.000000 

1 .042713 

.640171 

577249 

0 OOOOOO 

-.124150 

931409 

596261 

1 . 113324 

12 

-.417595 

0.000000 

1 043421 

617718 

. 364079 

0 OOOOOO 

- 078303 

. 965066 

596138 

1 . 170149 

13 

-.417595 

0.000000 

r. 043/88 

608416 

188054 

0 OOOOOO 

- 040447 

. 980076 

,596294 

1 . 195582 

14 

-.417595 

0 000000 

1 .043979 

605569 

078205 

0 OOOOOO 

-.016820 

.984491 

.596178 

1 .203223 

15 

-.417595 

0.000000 

1 . 044078 

.605146 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.985412 

.596318 

1 .204686 

2 L 

X 

Y 

Z 

R/RR5F 

U/ARE*^ 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.417595 

1 .670379 

0 000000 

748722 

709182 

.002651 

0 OOOOOO 

.894698 

. 669880 

1 004496 

2 

-.41 7595 

1 670379 

502575 

744953 

722659 

002798 

- 074859 

.891630 

.664223 

1 003075 

3 

-.41 7595 

1 670379 

. 763256 

731597 

754872 

003209 

-. 121486 

883076 

. 646055 

1 .000666 

4 

-.417595 

1 .670379 

. 898469 

7 1 3290 

785562 

003820 

-. 143472 

873286 

622906 

999655 

5 

-.417595 

1 .670379 

.968603 

702769 

800451 

004520 

- 158476 

868924 

.610653 

1.000591 

6 

-.417595 

1 670379 

1 .004981 

695583 

804370 

005188 

- 165656 

867264 

. 603254 

1 . 002794 

7 

-.417595 

1 .670379 

1 . 023850 

.691 132 

802859 

.005710 

-.168915 

. 867456 

,599527 

I ,005595 

8 

- .417595 

1 .670379 

1 .033637 

687265 

798045 

005945 

-.169816 

869220 

597385 

1 . 009904 

9 

-.417595 

1 .670379 

1 033714 

681 140 

. 78084 1 

005682 

- 167178 

875749 

, 596507 

1.021139 

10 

- .417595 

1 670379 

1 041347 

666013 

7224. 3 

004714 

- 155225 

894764 

595925 

I 052726 

1 1 

- 417595 

1 .670379 

1 .042713 

639862 

576666 

003133 

- .124024 

931353 

595938 

1 M3474 

12 

- .417595 

1 670379 

1 043421 

617447 

363638 

001661 

- 078208 

964965 

.595815 

1 . 170231 

13 

-.417595 

1 670379 

1 .043783 

608169 

187802 

000778 

-.040393 

.979343 

595971 

1 .195614 

14 

- 417595 

1 .670379 

1 043979 

605330 

078096 

000309 

-.016797 

.984346 

. 595855 

1 . 203236 

15 

-.417595 

1 670379 

1 .044078 

604908 

0 OOOOOO 

0 OOOOOO 

0.000000 

.985265 

.595995 

I ,204695 

3 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- .417595 

3 246102 

0 . oooooo 

747177 

706495 

003535 

0 OOOOOO 

895165 

668846 

1 00585! 

2 

-.41 7595 

3 246102 

.502575 

743474 

719893 

.003722 

- 074707 

8921 16 

. 663265 

1 004419 

3 

-.417595 

3 246102 

. 763256 

. 730289 

.751917 

004227 

-.121236 

883602 

. 645285 

1 .001979 

4 

-.417595 

3 246102 

. 89S4S9 

712.65 

7S2444 

004962 

-.143130 

873839 

,622318 

1.000919 

5 

-.417595 

3.246102 

.968603 

701752 

797284 

005832 

-158009 

869461 

.610147 

1 001/90 

6 

-.417595 

3.246102 

1 .00498! 

.694665 

801208 

006706 

- 1651 17 

.867772 

.602810 

1 .0039. 1 

7 

-.41 7595 

3.243102 

1 .023350 

. 690299 

. 799762 

007405 

-.168337 

.867914 

.599120 

1 .006612 

8 

-.41 7595 

3 246102 

1 .033637 

686505 

795056 

007687 

- . 1 69230 

.869617 

. 596996 

1 .010813 

9 

-.41 7595 

3.246102 

1 .038714 

680441 

777985 

.007174 

- . 1 66600 

,876093 

.596130 

1 .021960 

10 

-.417595 

3.246102 

1 .041347 

,66538! 

.719707 

.005565 

-.154652 

.895052 

, 595550 

1 .053465 

1 1 

-.417595 

3.246102 

1 .042713 

,639369 

573951 

,00321! 

-.123449 

,931491 

.595567 

1 . 113981 

12 

-.417595 

3.246102 

I .043421 

617165 

.361526 

.001424 

-.077756 

,964804 

,595443 

1.170251 

13 

-.41 7595 

3.246102 

1 .043788 

, 608006 

, 186628 

000593 

- ,040141 

. 979596 

,595600 

1 195320 

14 

- 417595 

3.2461 02 

1 .043979 

605201 

077598 

000224 

- 016690 

.983941 

595462 

1 .202844 

15 

-.417595 

3.246102 

1 .044078 

604 788 

0 OOOOOO 

0 OOOOOO 

0 . OOOOOO 

.984847 

. 595624 

1 .204280 

4 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

-.417595 

3 577051 

0.000000 

745952 

701764 

. 002482 

0,000000 

896760 

. 668940 

1 .008305 

2 

-.41 7595 

3 577051 

. 502575 

, 742409 

.715127 

002580 

- 074668 

.893751 

.663529 

1 .006837 

3 

- . 4 1 7595 

3 57705! 

. 763256 

729698 

746967 

.002745 

-.121394 

.885361 

.646046 

1 ,004299 

4 

-.417595 

3.577051 

. 898469 

.712176 

777193 

002720 

-.143543 

875760 

623696 

1 .003114 

5 

-.41 7595 

3.577051 

.968603 

702087 

.791866 

002565 

- . 15B268 

871426 

6I18I7 

1 .003863 

6 

-.41 7595 

3.577051 

1 .00498! 

695121 

795760 

002425 

-.164996 

. 869694 

.604543 

1 .005872 

7 

- 417595 

3.577051 

1 . 023850 

, 690852 

.794341 

.002279 

- 167899 

. 869809 

.600909 

1 . 008486 

8 

-.417595 

3.577051 

1 .033637 

687044 

. 789478 

.001900 

-.168496 

871537 

.598785 

I 012726 

9 

-.41 7595 

3 577051 

1 .038714 

680870 

771336 

.000776 

-.165458 

878219 

.597953 

1 .024182 

to 

-.41 7595 

3.57705! 

1 041347 

665734 

710537 

- 0015! 1 

-.152829 

897305 

.597367 

1 .055893 

1 1 

-.417595 

3 577051 

1 .042713 

640376 

. 563275 

- 003883 

- 121206 

.932906 

.597411 

1 . 114971 

12 

- 417595 

3 57705! 

1 043421 

619069 

354082 

- 003849 

- 0761 70 

.964785 

597268 

1 168786 

13 

-.41 7595 

3.57705! 

1 043788 

610314 

182872 

- 002348 

- 039336 

. .978914 

.597445 

1 . 192677 

14 

-.41 7595 

3.577051 

1 .043979 

607593 

076073 

- 001039 

- 016362 

.983071 

.597307 

1 . 199886 

15 

-.417595 

3.57705! 

1 .044078 

607221 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.983939 

.597469 

I .201240 

5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.417595 

3 672928 

0.000000 

743831 

692189 

.001353 

0 OOOOOO 

. 899825 

669318 

t .012904 

2 

-.417595 

3 672928 

.502575 

. 740384 

705910 

001479 

- .073598 

.895793 

.663971 

1.01 1369 

3 

-.417595 

3.672928 

. 763256 

728050 

. 73844 1 

001683 

-. 119892 

.888367 

.646775 

1 008620 

4 

-.417595 

3 672928 

.898469 

-711326 

769044 

OOI2I3 

- 142541 

.878855 

625153 

1 .007140 

5 

-.417595 

3 672928 

.968603 

702021 

. 783655 

-.000362 

-.158137 

874663 

,614031 

I .007629 


12 K« 


J« 12 K» 




J» 12 K. 


J» 12 K« 


6 

• 

.417595 

3 672928 

1 

00498! 

695508 

787293 

- 002773 

-.165359 

873010 

.607185 

1 .009482 

7 

. 

.417595 

3.672928 

1 

023850 

69 1402 

785439 

- 005374 

-.168221 

.873259 

.603773 

1 .012164 

8 

. 

.417595 

3 672928 

1 

033637 

687350 

779074 

- 008349 

-.168021 

.875457 

,601745 

I 017100 

9 


.417595 

3 672928 

1 

038714 

680399 

755427 

- 011927 

- 163241 

883245 

600959 

t .030328 

to 

. 

4 1 7595 

3 672928 

I 

041347 

664916 

682999 

- 016984 

- 147524 

. 902985 

. 600409 

! 063099 

11 


417595 

3 672928 

1 

042713 

642315 

529736 

- 0201 19 

-.114233 

. 934856 

.600472 

1 1 15953 

12 


4 1 7595 

3 672928 

1 

043421 

624325 

334105 

- 015958 

- 07194! 

961568 

.600331 

1 . 160955 

13 

. 

417595 

3 672928 

I 

043788 

616475 

174931 

- 008950 

- 037642 

974104 

.600510 

I . 182059 

14 

- 

4 1 7595 

3.672928 

I 

043979 

613891 

073117 

- 003845 

- 015725 

.977976 

,600370 

I . 188753 

15 

- 

417595 

3 672928 

1 

044078 

613544 

0 OOCOOO 

0 000000 

0 000000 

.978796 

.600534 

I 190019 

L 


X 

Y 


2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 


.417595 

3 700704 

0 

000000 

737359 

664253 

000716 

0 oooobo 

907213 

668942 

I 024796 

2 


417595 

3 700704 


502575 

733905 

679281 

0008 1 2 

- 067543 

904128 

66 3544 

! 023232 

3 


4 1 7505 

3 700704 


76 3256 

721554 

714007 

00 1 056 

- 109032 

095399 

646079 

1 020255 

4 


4 1 7595 

3 700704 


898469 

704873 

748698 

001090 

-.129169 

885363 

624069 

1 .018303 

5 


417595 

3 700704 


968603 

695850 

764872 

000698 

- . 1 45288 

880881 

.612961 

1 .018382 

6 


4 1 7595 

3 700704 

1 

004981 

. 689960 

768406 

- 000773 

-.154990 

879375 

. 606734 

1 .020104 

7 


417595 

3 700704 

1 

023850 

. 685982 

764910 

- 004952 

- 160502 

880079 

603718 

1 . 023284 

8 


417595 

3 700704 

1 

033637 

631480 

753949 

- 012497 

- 161834 

883509 

602094 

I 029981 

9 


4 1 7595 

3 700704 

! 

038714 

673345 

720477 

- 022838 

- 156752 

893131 

601385 

1 046213 

10 


4 1 7595 

3 700704 

I 

041347 

65891 1 

632009 

• 03623! 

- .137446 

,912288 

601 117 

1 077956 

II 


4 1 7595 

3 700704 

1 

042713 

643359 

465220 

- 045279 

- 100946 

934294 

.601086 

I 1 14557 

12 


417595 

3 700704 


043421 

634529 

285676 

- 038177 

- 051637 

947326 

601 106 

1 1 36367 

13 


4 1 7595 

3 700704 

1 

043708 

629357 

IF. 1200 

• 022499 

• 034 764 

955150 

601135 

1 149520 

14 


4 1 7595 

3 700704 

1 

043979 

627070 

06/966 

- 009657 

- 0I4C15 

958666 

601 151 

1 155423 

15 


4 1 7595 

3 700704 

1 

044078 

626537 

0 000000 

0 000000 

0 000000 

.959496 

601 169 

I 156816 

L 


X 

Y 


2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

j 

• 

.417595 

3 , 708750 

0 

000000 

.721972 

581733 

000152. 

0 , 000000 

.927036 

.569294 

I .056060 

2 

. 

417595 

3 . 708750 


502575 

718335 

598931 

000183 

- .050236 

924296 

.663954 

I .055068 

3 

- 

417595 

3 708750 


763256 

705953 

639735 

.000252 

- . 078062 

.916144 

,646755 

1 ,053060 

4 

- 

4 1 7595 

3 . 708750 


898469 

689675 

678933 

.000200 

-.089328 

. 906404 

.625125 

1 051633 

5 . 


.417595 

3,708750 


968603 

680726 

6994 1 7 

,000037 

-.100183 

901903 

,613949 

1 .051891 

6 

. 

4 1 7595 

3 . 708750 

1 

004981 

674310 

704728 

-.000240 

-.107223 

900289 

.607074 

1 .053994 

7 

• 

417595 

3 708750 

1 

023850 

669840 

698160 

- 000597 

-.113856 

.901766 

.604039 

I 058535 

8 


4 1 7595 

3 - 708750 

1 

033637 

665095 

681 156 

- 002005 

-.1 19975 

.906397 

602840 

1 . 067002 

9 

- 

.417595 

3 . 708750 

1 

038714 

, 658858 

651637 

-.010927 

-.121695 

915064 

.602897 

I .081271 

10 


417595 

3 708750 

1 

041347 

651560 

605325 

- 033340 

-.1 19245 

925120 

602771 

1 .098036 

1 1 

- 

4 1 7595 

3,708750 

1 

042713 

641105 

422209 

- 055644 

-.085843 

.940695 

603084 

1 , 123769 

12 

- 

417595 

3 708750 

1 

043421 

645863 

086414 

- 059464 

- 017876 

933506 

,602921 

1,11 1884 

13 

- 

4 I 7595 

3 708750 

1 

043788 

663225 

- 070331 

- . 036669 

015216 

.909491 

.603196 

t .071850 

14 

- 

4 1 7595 

3,708750 

1 

043979 

667436 

- 034524 

- 016911 

.007406 

903419 

602975 

1 ,062002 

15 

- 

4 1 7595 

3 , 708750 

1 

044078 

.668198 

0 000000 

0 . oooooa 

0 000000 

902761 

.603223 

I 060744 

L 


X 

Y 


2 

R/RREF 

U/AREF. 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

- 

417595 

37! 1082 

0 

000000 

695857 

386205 

000048 

0 000000 

.961326 

.668945 

1,111380 

2 

- 

4 1 7595 

3,71 1082 


502575 

691082 

402578 

.000055 

- 020509 

960161 

.663550 

I .113095 

3 

- 

4 1 7595 

37! 1082 


763256 

676208 

441686 

000065 

- 025226 

, 955457 

.646087 

ill 7324 

4 


4 1 7595 

3,711082 


898469 

657608 

479165 

000048 

-.021897 

949028 

.624089 

1 . 122257 

5 

- 

4 1 7595 

3 711082 


96S603 

647440 

499169 

. 000022 

-.025254 

.946798 

612995 

1.126620 

6 

. 

4 1 7595 

3 711032 

1 

004931 

641282 

505173 

- 000073 

- . 028264 

.946203 

.606784 

1 . 130224 

7 

- 

417595 

3, 711082 

I 

023850 

637608 

502627 

- 000499 

- .031344 

.946851 

.603719 

1 . 133600 

8 

- 

417595 

3,711082 

1 

033637 

634862 

494922 

- 001966 

- 032544 

948468 

.602146 

1.137499 

9 

- 

4 1 7595 

3 711082 

I 

038714 

629929 

450696 

- .004141 

- 030109 

.955184 

.601698 

I.U9I34 

10 

- 

4 1 7595 

3.71 1082 

1 

041347 

628151 

390012 

- . 005022 

- 039710 

.959846 

.602928 

I . 156047 

II 

- 

417595 

3.711082 

1 

042713 

634499 

028729 

- . 002672 

,013716 

.952328 

.604251 

1.142389 

12 

- 

417595 

3 711082 

1 

043421 

938578 

-I 146951 

.001 682 

.249055 

605335 

604474 

.605680 

13 

- 

4 1 7595 

3 711082 

1 

043788 

1 621725 

-1 465813 

.002244 

315536 

.372362 

603868 

.306884 

14 

- 

4 1 7595 

3 711082 

1 

043979 

943353 

- 613878 

-.001733 

. 1 32084 

.639071 

,602870 

.654153 

15 

- 

417595 

3.711082 

1 

044078 

864656 

0 000000 

0 000000 

0.000000 

.698328 

.603813 

740154 

L 


X 

Y 


2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 


417595 

3 71 1757 

0 

000000 

682279 

150508 

000006 

0 000000 

.980966 

.669293 

1.143060 

2 

- 

417595 

3.711757 


502575 

S7654I 

.158252 

000007 

-.00394! 

.981393 

.663952 

1.147428 


3 

-.417595 

3.711757 

. 763256 

659495 

176320 

000006 

-.000530 

.980679 

.646753 

1.158356 

4 

-.417595 

3.711757 

.893469 

.638838 

. 194239 

. 000002 

.005105 

.978532 

.625123 

1 . 1 70628 

5 

-.417595 

3.71 1757 

.968603 

627155 

.203511 

000006 

.005339 

: 978941 

.613948 

1 . 179795 

6 

-.417595 

3 711757 

1 .004981 

619995. 

205726 

.000005 

.004939 

.979170 

,607081 

I . 185504 

7 

-■.417595 

3.711757 

1 .023850 

.616441 

197617 

000004 

002443 

.979978 

.604099 

I . 189212 

8 

-.417595 

3.711757 

1 033637 

615278 

162142 

- . 000000 

-.001809 

.980333 

.603177 

1 . 190543 

9 

-.41 7595 

3.711757 

1 038714 

622732 

034757 

- 000003 

-.005906 

969286 

603606 

1 .171471 

10 

-.417595 

3 71 1757 

1 041347 

651408 

- 050766 

- .000002 

.008621 

926961 

. 603830 

1 . 100323 

1 1 

-.417595 

3.711757 

1 042713 

.717912 

- 395391 

-.000024 

075793 

.841239 

603936 

,960485 

12 

-.417595 

3.711757 

1 043421 

1 018513 

-1 070558 

- . 000020 

226017 

.593074 

.604054 

.588738 

13 

-.417595 

3.711757 

1 043788 

.910819 

- 661 142 

- . 000024 

.142549 

.661407 

.602422 

.686587 

14 

- .417595 

3 711757 

1 043979 

849650 

- 255487 

-.000015 

.054858 

.710816 

.603945 

.758635 

15 

-.417595 

3.711757 

1 044078 

837327 

0 000000 

0 000000 

0.000000 

.719486 

. 602445 

. 772439 

10 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 4 ' 7595 

3 71 1952 

0 000000 

679640 

0 000000 

0 000000 

0 . 000000 

. 984264 

.668945 

1 148683 

2 

- .417595 

3 71 1952 

.502575 

673642 

0 000000 

0 000000 

0 000000 

.985017 

.663549 

1 . 153644 

3 

-.417595 

3.71 1952 

763256 

655829 

0 000000 

0 000000 

0 . 000000 

985146 

.646087 

1 . 166231 

4 

- .417595 

3 71 1952 

. 898469 

634291 

0 000000 

0 000000 

0 000000 

.983914 

. 624088 

1 . 180433 

5 

-.41 7595 

3.71 1952 

968603 

622393 

0 000000 

0 000000 

0 000000 

984891 

.612994 

I . 190586 

6 

-.41 7595 

3.711952 

1 004981 

615834 

0 000000 

0 000000 

0 000000 

985290 

.606775 

1 . 196131 

7 

-.41 7595 

3 71 1952 

1 023850 

612537 

0 000000 

0 000000 

0 000000 

. 985644 

.603744 

1 . 199132 

8 

- 4 1 7595 

3 711952 

1 033637 

612076 

0 000000 

0 000000 

0 . 000000 

. 933869 

.602203 

I . 197334 

9 

-.41 7595 

3 711952 

1 038714 

620914 

0 000000 

0 000000 

0,000000 

969542 

.602002 

1 . 173152 

10 

-.41 7595 

3 71 1952 

1 041347 

.650075 

0 000000 

0 . 000.000 

0 000000 

927497 

.602342 

1,101862 

1 1 

-.41 7595 

3 71 1952 

1 042713 

. 699380 

0 000000 

0 000000 

0 000000 

862633 

.603308 

.995270 

12 

-.41 7595 

3.71 1952 

1 043421 

. 785994 

0 000000 

.0 000000 

0 000000 

. 769672 

. 604957 

.847497 

13 

-.41 7595 

3 71 1952 

1 043788 

8221 10 

0 000000 

0 000000 

0 000000 

, 733559 

. 603066 

793346 

14 

-.41 7595 

3 71 1952 

1 043979 

.834048 

0 000000 

0 000000 

0 000000 

.726125 

.605623 

.780791 

15 

-.41 7595 

3.711952 

1 044073 

835680 

0 000000 

.0 000000 

0 000000 

. 722806 

. 604034 

.776614 

1 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 185598 

0 . 000000 

0 000000 

.705175 

. 784415 

0 . 000000 

0 000000 

,873023 

.615634 

1 .003938 

2 

- 185598 

0 000000 

48551 1 

696703 

802637 

0 000000 

- . 055596 

.867351 

.604704 

1 002943 

3 

- . 185598 

0 . 000000 

737342 

672440 

847223 

0 000000 

- 080800 

.854132 

574352 

t .001068 

4 

- . 185598 

0 . 000000 

867964 

.645832 

892210 

0 000000 

- .086370 

.839305 

.542050 

.999705 

5 

- . 185598 

0 . 000000 

935717 

631720 

.91 7948 

0 . 000000 

- .093515 

.832430 

.525863 

1 .000318 

6 

- . 185598 

0 000000 

. 970860 

622! 10 

928595 

0 oocooo 

-.096344 

. 829035 

.515751 

1.002365 

7 

- . 185598 

0 000000 

. 989088 

616869 

.930977 

0 000000 

-.097765 

. 828376 

.510999 

1.004964 

8 

- . 185598 

0 000000 

998543 

612281 

928702 

0 000000 

- 098091 

829577 

. 507935 

1 . 009430 

9 

- . 185598 

0 000000 

I 003447 

605 1 35 

910421 

0 000000 

- 096482 

837742 

.506947 

1 024163 

10 

- . 185598 

0 000000 

1 005991 

5854 71 

836497 

0 000000 

- 088819 

864 1 76 

505950 

1 . 070533 

1 1 

- . 185598 

0 000000 

1 007310 

553058 

645274 

0 000000 

- 068366 

.915174 

.506144 

1 . 159833 

12 

- 1 85598 

0 . 000000 

1 007995 

. 52884 1 

. 389465 

0 000000 

- 041171 

.956333 

,505748 

I .233898 

13 

-.185598 

0 000000 

1 008350 

520282 

197063 

0 000000 

- 020814 

.972800 

.506131 

I .263363 

14 

- . 185598 

0 000000 

1 .008534 

517439 

08 1 333 

0 000000 

- 008583 

.977432 

,505762 

1 .272163 

15 

-.185598 

0 000000 

1 008629 

517323 

0 000000 

0 000000 

0 .000000 

.978384 

.506141 

1 .273516 

2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 1 85598 

1 670379 

0 000000 

704603 

783504 

002644 . 

0 000000 

8731 17 

.615202 

t .004372 

2 

- . 135598 

1 .670379 

48551 1 

.696162 

.801688 

002762 

- . 055540 

. 868055 

.604306 

1 .003375 

3 

-. 185598 

I .670379 

737342 

671976 

.846190 

003112 

-.080711 

.854259 

.574041 

1 .001493 

4 

-.185598 

1 .670379 

867964 

645455 

891105 

003671 

-.086266 

.839456 

.541831 

I ,000118 

5 

-.185598 

1 670379 

935717 

631409 

916812 

004343 

-.093509 

.832592 

.525706 

V. 000710 

6 

-.185598 

1 670379 

. 970860 

.621848 

927456 

. 005006 

-.096238 

.829193 

.515632 

I .002725 

7 

- . 185598 

1 670379 

989088 

616639 

929857 

005531 

■ 097656 

.828517 

.510896 

I .005284 

8 

- . 185598 

1 670379 

998543 

612083 

927625 

. 005759 

- 097984 

. 829694 

.507841 

1 .009703 

9 

-.185598 

I 670379 

1 003447 

604964 

909449 

005460 

-.096384 

.837827 

.506855 

1 .024383 

10 

-. 185598 

1 670379 

1 00599! 

585332 

835648 

.004434 

- 088734 

.864231 

.505862 

1 070702 

1 1 

-.185598 

I .670379 

1 007310 

552955 

64441 1 

.002816 

-.068276 

.915183 

,506055 

1 . 159931 

12 

- 185598 

1 670379 

1 007995 

528805 

388786 

001433 

- .041100 

.956233 

.505661 

1 233801 

13 

- . 1 85598 

I 670379 

I 008350 

520279 

196687 

000660 

- 020775 

972636 

.506042 

1.263152 

14 

- . 1 85598 

t 670379 

1 008534 

517448 

081173 

.000261 

- . 008567 

.977247 

.505674 

1 .271915 

15 

- 185598 

I .670379 

1 008629 

.517332 

0 000000 

0 000000 

0.000000 

973135 

.506052 

1 .273261 



J* 

13 

K» 

3 

L 

X 

Y 

Z 

R/RREF 





1 

-.185598 

3.246102 

0 000000 

703355 





2 

-.185598 

3 246102 

48551 1 

695040 





3 

-185598 

3 246102 

737342 

671 162 





4 

-.185598 

3 246102 

867964 

644908 





5 

-.185598 

3 246102 

.935717 

630982 





6 

-.185598 

3 246102 

970860 

621535 





7 

-, 185598 

3,246102 

. 989088 

616403 





8 

• , 185598 

3,246102 

990543 

611907 





9 

- 189598 

3 246102 

1 003447 

604905 





10 

• 105590 

3 246102 

1 005 991 

5951 78 





1 1 

. . 185598 

3 246102 

1 007310 

552973 





12 

-. 185598 

3 246102 

1 007995 

529227 





13 

-.185598 

3 246102 

1 008350 

520886 





14 

-.185598 

3 246102 

1 008534 

518113 





15 

-. 185598 

3 246102 

1 008629 

518004 

J* 

13 

K« 

4 


X 

Y 

Z 

R/RREF 





T 

-.185598 

3.577800 

0 000000 

702327 





2 

-.185598 

3 577800 

,48551 1 

694268 





3 

-.185598 

3 577800 

73.7342 

671133 





4 

- 1 85593 

3 577800 

867964 

645734 





5 

- . 185598 

3 577800 

935717 

632206 





6 

- . 185598 

3 577800 

970860 

622907 





7 

- . 185598 

3 577800 

. 989088 

617826 





8 

- . 185598 

3 577800 

998543 

6 1 3226 





9 

-.185598 

3 577800 

1 003447 

605764 





10 

-.185598 

3.577800 

1 .005991 

585826 





1 1 

- . 185598 

3 577800 

1 .007310 

554502 





12 

- , 1 85598 

3.577800 

1 007995 

532088 





13 

- 185598 

3 577800 

1 008350 

524266 





14 

-.185598 

3.577800 

I 008534 

521623 





15 

- 1 85598 

3 577800 

1 . 008629 

.521541 

J* 

13 

K» 

5 

L 

X 

Y 

Z 

R/RREF 





1 

-.185598 

3 673359 

0 . 000000 

. 700204 





2 

- . 1 85598 

3.673359 

.48551 1 

692272 





3 

- . 1 85598 

3 673359 

737342 

669665 





4 

- . 1 85593 

3 673359 

. 867964 

645300 





5 

- . 1 85598 

3 673359 

935717 

632719 





6 

- . 185598 

3 673359 

. 970860 

623898 





7 

-.185598 

3 673359 

.989088 

618985 





8 

- . 1 85598 

3.673359 

.998543 

61376! 





9 

- . 185598 

3 673359 

I .003447 

6051 14 





10 

-.185598 

3 673359 

1 .005991 

585268 





1 1 

-.185598 

3 673359 

1 .007310 

558419 





12 

- . 185598 

3.673359 

1 007995 

533130 





13 

- . 185598 

3 , 673359 

1 008350 

530367 





14 

-.185598 

3 673359 

I . 008534 

.527483 





15 

-.185598 

3.673359 

1 , 008629 

527484 

J« 

13 


6 

L 

X 

Y 

Z 

R/RREF 





1 

-.185598 

3 . 700889 

0 000000 

693303 





2 

-.185598 

3 . 700889 

.48551 1 

685373 





3 

-.185598 

3,700889 

.737342 

662747 





4 

-.185598 

3 . 700889 

. 867964 

638353 





5 

-. 1S5598 

3 700889 

9357 1 7 

625862 





6 

-.185598 

3 . 700889 

.970860 

617777 





7 

-.185598 

3 . 700889 

, 989088 

612435 





8 

-.185598 

3.700889 

.998543 

606717 





9 

-.185598 

3.700889 

1 ,003447 

.596912 





10 

- 185598 

3 . 700889 

I .005991 

582727 





11 

-.185598 

3 . 700889 

1 .007310 

569955 





12 

-.185598 

3.700889 

1 .007995 

,554158 


U/APEF 
780904 
798963 
843161 
887796 
913387 
923995 
926422 
924230 
9O'.V60 
0JI505 
639160 
384743 
194549 
080289 
0 000000 

U/AREF 
776562 
794520 
838337 
682478 
907758 
918222 
920526 
917747 
886977 
81 6895 
620633 
371929 
188207 
077739 
0 000000 

U/AREF 
- 767651 
785920 
830323 
874657 
899762 
909303 
911168 
905364 
.875360 
784355 
596743 
36701 1 
188961 
078307 
0 000000 

U/AREF 

.739537 

759008 

806236 

853389 

879966 

.889748 

688363 

875667 

837431 

.759260 

661425 

.499109 


V/AREF 
003550 
003652 
.00394! 
004415 
.005074 
.005804 
00640! 
006597 
005962 
004227 
001921 
000572 
000159 
.000045 
0 000000 

V/AREF 
002582 
.002533 
00224 1 
001525 
000662 
-000162 
- .000901 
-001938 
- . 003978 
-.007546 

- 009981 

- 007755 
-.004316 

- 001847 
0 000000 

V/AREF 
.001521 
.001568 
001473 
000380 
-.002092 
- . 005945 

- 009923 
-015581 

- 023399 
-034607 
- .039668 

- 028458 

- 015023 
-.006302 
0 . 000000 

V/AREF 
,000842 
.000898 
001014 
. 000845 
000316 
-.001227 
-006939 

- 01949! 
-.040459 
-065979 
-084755 
-.067063 


W/AREF 
0 000000 

- 055550 
-.080789 

- 086329 
- .093426 

- 096068 
-.097424 

- 097717 

• 096083 

• 000JJ7 

- 06773$ 

- 040678 
-020550 
- ,008474 
0 000000 

U/AREF 
0 000000 

- 055635 
-08141 1 

- 087600 

- 094668 

- 096915 

- 097695 

- 097790 
- . 095636 
- .087044 
- ,065865 
-.039346 
- .019885 

- 008204 
0.000000 

U/AREF 
0 . 000000 
- . 054 ! 47 
-079473 
- .086697 

- 095366 
-098843 
-.100215 
- .099419 
-.095438 

- 084678 

- 063765 

- 038949 
-.019990 
-.008263 
0.000000 

U/AREF 
0 000000 

- 046440 

- 065447 
-069217 
- .078635 

- 085208 
-.091050 
-092637 
-.090987 
-082797 
-071692 
-.053029 


T/TREF 

873652 

.868631 

.854935 

840205 

833339 

.829925 

829213 

830360 

838490 

664936 

915657 

956007 

.972036 

976539 

977464 

T/TREF 

87525! 

. 870305 
856850 
842425 
835645 
832220 
831527 
.832856 
.8.41533 
. 868536 
917968 
, 955909 
.97089! 
.9751 12 
,975981 

T/TREF 
.878374 
.873403 
.859925 
.845667 
.839113 
.835839 
.835520 
.837803 
.848495 
. 875548 
918243 
951949 
.966805 
.971191 
.972105 

T/TREF 
.886676 
.881649 
.867793 
.852886 
845982 
.843167 
.843609 
84821 1 
.860163 
.880785 
.900056 
.926102 


P/PREF 
.614487 
.603733 
.573800 
.541855 
.525822 
.515827 
,511129 
508103 
607123 
5061 42 
506333 
.505945 
.506320 
.505958 
.506330 

P/PREF 
.614712 
.604225 
.575060 
.543983 
.523300 
518396 
,513739 
.510729 
.509770 
.508812 
509016 
, 508628 
.509005 
.508641 
.509014 

P/PREF 

.615040 

.604632 

.575861 

. 545709 

.530922 

.521478 

.517174 

.514210 

.513436 

.512430 

.512767 

.512273 

.512761 

.512286 

.512770 

P/PREF 

.614735 

.604258 

.575128 

.544442 

.529468 

,520889 

.516656 

.514624 

.513441 

.513257 

.512992 

.513207 


ENT 

1.005701 
1.004688 
1.002771 
1 001351 
I .001878 
I .003812 
1 00628- 
1 .010630 
I 025302 
1 071689 
1 160516 
1 .2331117 
1 261785 
1 270339 
1.271650 

ENT 

I 008130 
1 .007073 
1 .005036 
1 . 003482 
1 003874 
1 005701 
1.008161 
1.012795 
I .028371 
1 .075673 
1 . 162161 
1,230334 
1 .257042 
1 .265062 
1 . 266268 

ENT 

1 .012954 
1 .011821 
1 ,003526 
1.007615 
1 .00771 1 
1 .009433 
1 012243 
1.018456 
1 037325 
I .08477! 
1 . 159246 
1.219716 
1 .245972 
1.254358 
1 ,255537 

ENT 

1 .026587 
1 .025475 
1 .023003 
I .020626 
1 .020339 
I .022306 
1,026401 
I .035879 
1 057344 
1 .093160 
1.127024 
1.172750 



13 

-.185598 

3 . 700839 

1.008350 

539813 

274027 

- 038793 

-.029095 

.950321 

.512995 

1.2161 10 

14 

-.185598 

3 . 700889 

1 . 008534 

.534929 

.111205 

-.016369 

-.011735 

.959428 

.513226 

1.232237 

15 

-. 185598 

3.700889 

1 . 008629 

533628 

0 000000 

0.000000 

0.000000 

.961351 

.513003 

1.235910 

K. 7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-.185598 

3 . 708820 

0 000000 

675635 

651236 

000152 

0 . 000000 

910288 

.615023 

1 . 064863 

2 

- . 185538 

3 . 708820 

48551 1 

667529 

.672167 

.000155 

-.027019 

.905762 

.604622 

1 .064698 

3 

- . 1 85598 

3 . 703S20 

.737342 

644939 

.722731 

.000133 

- 029968 

. 892883 

.575854 

1 0641 1 1 

4 

-.185593 

3 . 708820 

867964 

.620934 

773031 

- . 000054 

-.022524 

. 878829 

.545695 

1 . 063375 

5 

-.185598 

3 708820 

.935717 

608421 

802061 

-.000309 

- 024172 

.872483 

530837 

1 .064327 

6 

-.185598 

3 . 708820 

.970860 

599275 

812519 

-.000732 

- . 025888 

. 869764 

.521227 

1 067458 

7 

-.185598 

3 708820 

, 989088 

593331 

806829 

-.000958 

- 030378 

.871863 

.517304 

1,074309 

6 

-.185598 

3 . 708820 

998543 

.58623! 

782481 

- . 004394 

- 039184 

878968 

.515279 

1 088292 

9 

-.185598 

3 . 708820 

1 .003447 

.580687 

750603 

- 01 1 153 

-.046055 

. 889072 

.516273 

1 . 104994 

10 

- . 1 85598 

3 . 708820 

1 , 00599 1 

573174 

717272 

-.040469 

- . 056298 

.899614 

.515635 

1 . 123936 

1 1 

-.185598 

3 708820 

1 007310 

584369 

766823 

- . 08244 1 

- .070478 

. 884545 

.516901 

1 . 096592 

12 

-.185598 

3 . 708820 

1 .007995 

582243 

687-921 

- 096145 

- 071632 

. 885940 

.515832 

I . 099924 

13 

- . 1 85598 

3 . 708320 

1 .008350 

564245 

120532 

- 0601 14 

- 012555 

.916332 

.517064 

1 .152098 

14 

- . 185598 

3 708320 

1 008534 

567962 

032359 

- 030360 

- .003445 

. 908290 

.515874 

1 . 138929 

15 

-.185598 

3 . 708820 

1 .008629 

569840 

0 000000 

0.000000 

0 . 000000 

.907415 

.517082 

1 . 136331 

K* 8 L 

X 

Y 

7 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-. 185598 

3.711105 

0 000000 

644976 

432314 

.000041 

0.000000 

.953125 

.614742 

1 . 1 35880 

2 

-.185598 

3.71 1105 

.4855! 1 

635604 

449887 

000042 

.000370 

.950693 

.604267 

1 .13964! 

3 

-.185598 

3.71 1 105 

737342 

.610078 

491879 

.00003! 

.019123 

.942737 

.575143 

I , 148779 

4 

-. 185598 

3.711 105 

.867964 

582911 

531770 

- 000006 

. 040985 

.934058 

.544472 

1 . 159133 

5 

- . 185598 

3.711 105 

935717 

568255 

552932 

- 000037 

.047164 

.931826 

.529514 

1 168201 

6 

- . 185538 

3.71 1105 

.970860 

559269 

559422 

- 000193 

.050272 

.931533 

.520978 

1 1 75303 

7 

-.185598 

3.71 1 105 

.989088 

554566 

562098 

-.001139 

046010 

.931659 

.516666 

1 . 1 79439 

8 

- . 185598 

3.711105 

.998543 

549679 

5281 13 

- 003973 

.050797 

.937189 

.515153 

1 . 190649 

9 

-.185598 

3.711105 

1 .003447 

.551621 

538433 

- . 006502 

.032901 

.932313 

.514283 

1 182785 

10 

-.185598 

3.711105 

1 005991 

.541921 

356388 

- 003432 

.045415 

. 952880 

.516385 

1 .217486 

I I 

-.185598 

3.711105 

1 .007310 

555597 

397937 

.005774 

-.004865 

. 930822 

. 517163 

1 .177505 

12 

-.185598 

3711 105 

1 . 007995 

! .072796 

-1 344073 

016787 

. 153712 

485445 

.520784 

.471990 

13 

- . 185598 

3.71 1 105 

1 . 008350 

2 415520 

-1 .717208 

003013 

181685 

.214217 

.517445 

. 150539 

14 

-.185598 

3.7! 1 105 

1 .008534 

.937149 

- . 790526 

- 003770 

.083535 

. 554903 

.520027 

.569500 

15 

-. 185598 

3 71 1 105 

I . OOS629 

797797 

0 000000 

0 . 000000 

0 . 000000 

. 648504 

.517374 

. 709832 

K» 9 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF. 

P/PREF 

ENT 

I 

-.185598 

3.711763 

0.000000 

629163 

. 166998 

000003 

0 000000 

.977522 

615021 

1 . 176580 

2 

-.185598 

3 71 1763 

48551 1 

.618908 

174447 

000Q03 

.005198 

.976915 

.60462! 

1 .183604 

3 

-.185598 

3.711763 

. 737342 

591423 

191904 

-.000000 

.019044 

.973673 

.575852 

1 .201306 

4 

-.185598 

3 71 1763 

. 867964 

.562436 

207432 

- 000003 

.032364 

.970231 

.545693 

1 .221366 

5 

-.185598 

3 711763 

9357 1 7 

546553 

215264 

000005 

.036442 

.971240 

.530834 

1 .236727 

6 

-. 185598 

3.711763 

970860 

536281 

216012 

000005 

.038443 

.971945 

.521236 

1.247052 

7 

- . 185598 

3 7 1 1 763 

.989088 

.531919 

197481 

. 000003 

, .033431 

. 972738 

.517418 

1 .252154 

8 

- . 185593 

3.711763 

.938543 

534360 

109672 

00000! 

015456 

965260 

.515796 

1 .240254 

9 

-.185598 

3 71 1763 

1 003447 

553519 

- 022946 

000014 

- 008327 

. 934295 

.517150 

1 . 183672 

10 

-. 185598 

3 711763 

1 00599! 

.571404 

- 135393 

000013 

- .014674 

.904055 

.516580 

1 .130883 

1 1 

- . 185598 

3 711763 

1 .007310 

630174 

- 535556 

- 000055 

.031817 

.823563 

.518987 

.990632 

12 

-.185598 

3 711763 

1 007995 

1 562831 

-1 573400 

000015 

. 161495 

.331834 

.518601 

.277560 

13 

-.185598 

3 711763 

1 008350 

897698 

- 833452 

- 000010 

089250 

.578414 

.519241 

.603930 

14 

-.185598 

3 711763 

1 .008534 

.764404 

- 318416 

.000008 

. 033552 

.660996 

.518488 

.728422 

15 

-.185598 

3.711763 

1 .008629 

. 769878 

0 000000 

0 000000 

0.000000 

.674477 

.519265 

.748856 

K« 10 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

• T/TREF 

P/PREF 

ENT 

1 

-.185598 

3.711952 

0.000000 

.626295 

0 000000 

0 000000 

0.000000 

981553 

.614742 

1.183592 

2 

-.185598 

3 711952 

.48551 1 

.615790 

0 000000 

0.000000 

0 000000 

.931287 

.604267 

1.191305 

3 

-. 185598 

3 711952 

. 737342 

587512 

0 000000 

0 000000 

0 000000 

. 978944 

.575142 

1.211020 

4 

-.185593 

3 711952 

.867964 

557588 

0 oocooo 

0 000000 

0 000000 

.976475 

.544471 

I .233491 

5 

-.185598 

3 711952 

935717 

541395 

0 000000 

0 000000 

0 000000 

.978050 

.529512 

1 .250130 

6 

- 185598 

3.71 1952 

. 970860 

532198 

0 000000 

0 000000 

0 000000 

.978879 

.520957 

1 .259795 

7 

-.185598 

3.71 1952 

. 989088 

528146 

0 000000 

0 000000 

0 . 000000 

.978343 

.516708 

1 .262960 

8 

-.185598 

3 711952 

. 998543 

532830 

0 000000 

0.000000 

0 000000 

.966762 

.515119 

1 .243610 

9 

-.185598 

3 71 1952 

1 003447 

.550432 

0 000000 

0.000000 

0 000000 

. 935385 

.514866 

1 .187706 



J» 14 


J- 14 


J« 14 


J- 


14 


K* 


K» 


K« 


K* 


1 


2 


3 


4 


10 

-.185598 

3.711952 

1 .005991 

.569917 

0 000000 

0.000000 

0 000000 

.907572 

.517240 

11 

-.185598 

3.711952 

1 007310 

.602324 

0 000000 

0 000000 

0 . 000000 

.858296 

.516972 

12 

- . 185598 

3.711952 

1.007995 

.726221 

0 000000 

0 000000 

0 000000 

.71 1013 

.516353 

13 

-.185598 

3:711952 

1 ,008350 

.754078 

0 000000 

0 000000 

0.000000 

.684417 

.516104 

14 

-.185598 

3.71 1952 

1 . 008534 

767361 

0 000000 

0 000000 

0 000000 

.679517 

.521435 

15 

- . 185598 

3.711952 

1 008629 

,768615 

, 0 000000 

0 ocoooo 

0 000000 

.676997 

.520350 

L 

X 

Y 

Z 

R/RBEF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

1 

0.000000 

0 000000 

0 000000 

.662392 

851866 

0 000000 

0.000000 

851001 

. 563697 

2 

0.000000 

0 . 000000 

.481357 

651044 

872249 

0.000000 

- .037138 

.844692 

.549932 

3 

0 000000 

0 . 000000 

.731034 

620720 

. 922275 

0 000000 

- 041687 

.327562 

.513684 

4 

0.000000 

0 . 000000 

. 860538 

.590859 

972173 

0 000000 

- .030381 

. 809878 

. 478524 

5 

0 . 000000 

0 . 000000 

927712 

575966 

, 999798 

0 000000 

- .028065 

.801987 

.461918 

6 

0 000000 

0 . 000000 

962554 

565407 

1 01 1025 

0 000000 

-.024563 

797723 

.45 '38 

7 

0 000000 

0 . 000000 

980626 

,560081 

1 013392 

0 000000 

- 023036 

.796819 

44t 9 

8 

0 000000 

0 . 000000 

.990000 

554968 

1 010850 

0 000000 

-.021884 

797996 

.442bv 

9 

0 . 000000 

0 , 000000 

.994962 

546288 

986350 

0 000000 

- ,020912 

809127 

.442016 

10 

O.OOO'lOO 

0 000000 

.997384 

.520864 

.882491 

0 000000 

- ,018305 

846238 

. 440775 

1 1 

0 . 000000 

0.000000 

. 998692 

484400 

628 300 

0 000000 

- 012525 

.910745 

.441165 

12 

0 . 000000 

0 , 000000 

.999371 

463683 

352227 

0 000000 

-.006837 

950090 

. 440540 

13 

0.000000 

0 . 000000 

.999723 

457953 

. 1 72656 

0 000000 

- , 003309 

. 963250 

.441 123 

14 

0 000000 

0.000000 

. 999905 

455713 

07041 1 

0 000000 

-.001334 

,966696 

. 440535 

15 

0 000000 

0 000000 

! . 0000,00 

. 455995 

0 000000 

0 000000 

0 000000 

.967385 

.441123 

L 

X 

Y 

2 

R/RREF 

U/AREF 

v/aref 

W/AREF 

T/TREF 

P/PREF 

1 

0.000000 

1 . 670379 

0 . 000000 

66 1 974 

.850877 

. 002598 

0 000000 

.851147 

.563437 

2 

0 000000 

1 .670379 

481 357 

650671 

871205 

. 002693 

- .037130 

.844853 

. 549722 

3 

0 . 000000 

1 .670379 

.731034 

620454 

. 92 1 099 

,002994 

- ,041680 

.827761 

.513587 

4 

0,000000 

1 ,670379 

860538 

.590698 

.970880 

,003514 

- .030375 

.8101 13 

.478532 

5 

0 000000 

1 .670379 

.927712 

,575879 

998458 

004174 

- .028059 

.802238 

.461992 

6 

0,000000 

1 .670379 

. 962554 

565372 

1 009668 

.004840 

- .024554 

.797975 

,451153 

7 

0.000000 

1 .670379 

,980626 

560076 

1 012042 

,005362 

-.023023 

.797058 

446413 

8 

0 000000 

1 . 670379 

. 990000 

554998 

1 . 009564 

. 005559 

- 021870 

. 798207 

. 443003 

9 

0 . 000000 

1 . 670379 

994862 

546357 

985220 

005210 

- 020907 

.809284 

.442158 

10 

0 000000 

1 670379 

997384 

520049 

881290 

004 1 32 

- 018294 

846381 

.440922 

1 1 

0 . 000000 

1 .670379 

. 998692 

434522 

626645 

002475 

- .012497 

.910813 

, 44 1 309 

12 

0 000000 

1 .670379 

99937! 

463917 

. 350986 

.001204 

-.006815 

.949928 . 

.440688 

13 

0 000000 

1.670379 

999723 

458231 

1 72000 

000544 

- . 003297 

.962982 

.441263 

14 

0 000000 

1 .670379 

. 999905 

456007 

070137 

.000213 

- .001328 

.966397 

. 440683 

15 

0 . 000000 

1 .670379 

1 . OOOQOO 

456288 

0 000000 

0 . 000000 

0 000000 

.967080 

.441268 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

1 

0 . 000000 

3 246102 

0 000000 

661 1 15 

848 146 

. 003439 

0.000000 

.851804 

,563140 

2 

0 000000 

3,246102 

.481357 

649996 

868297 

.003516 

- , 037290 

.845574 

549620 

3 

0 . 000000 

3 246102 

. 731034 

620206 

917745 

,003603 

- ,042080 

,828644 

.513930 

4 

0 000000 

3 246102 

. 860538 

590791 

967100 

. 003828 

- 030860 

81 1 121 

.479203 

5 

0 000000 

3.246102 

.927712 

.576101 

994507 

004286 

- 028387 

803251 

. 462753 

6 

0 000000 

3,246102 

, 952554 

565716 

1 005646 

004872 

- 024771 

798989 

452001 

7 

0 000000 

3 246102 

980626 

660486 

1 006031 

005360 

- 023170 

, 798042 

,447292 

8 

0 000000 

3 246102 

990000 

555479 

1 .005602 

005465 

- 021964 

799163 

.443918 

9 

0 000000 

3 246102 

994862 

546782 

980755 

004707 

- 020964 

.810328 

.443073 

10 

0 000000 

3.246102 

.997384 

521 158 

874212 

002726 

- .018224 

847839 

.441858 

11 

0 000000 

3 246102 

. 998692 

485041 

61701 1 

000376 

-.012333 

.911751 

442237 

12 

0.000000 

3 246102 

99937! 

465068 

344438 

- .000421 

- 006697 

.949602 

.441630 

13 

0 000000 

3 246102 

.999723 

459598 

168716 

- 000342 

- 003236 

.962138 

.442196 

14 

0 000000 

3 246102 

999905 

457446 

068800 

- 000161 

- 001304 

965415 

.441625 

15 

0 000000 

3 246102 

1 . 000000 

457726 

0 000000 

0 000000 

0 000000 

966071 

.442196 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

1 

0.000000 

3.577985 

0 , 000000 

660435 

843872 

002579 

0.000000 

.853494 

.563677 

2 

0.000000 

3.577935 

481357 

649659 

.863849 

002376 

- 037521 

.847375 

.550505 

3 

0 . 000000 

3.577985 

731034 

620856 

912746 

.001601 

- 043228 

.830806 

.515811 

4 

0 000000 

3.577985 

860538 

592528 

951414 

000132 

- 033133 

.813748 

.482169 

5 

0 000000 

3 , 577985 

.927712 

578307 

.988472 

- 001506 

- 030802 

. 806020 

.466128 

6 

0 000000 

3.577985 

. 962554 

. 668082 

.999416 

- . Q03032 

- 026813 

801778 

.455476 


1 . 136466 
1 .051248 
.808072 
.766221 
. 755440 
.752148 

ENT 

1 .003423 
1.002892 
1 .001481 
.999600 
I 000020 
1 .002092 
1.004752 
1 .009936 
1 . 030500 
1 . 098507 
1 .217069 
1 292040 
1.316469 
1 . 323773 
1 . 324389 

ENT 

1 .003849 
1 003314 
1 001893 
999998 
1.000393 
1 .002433 
I . 005058 
I .010180 
1 030648 
1 098621 
1.217037 
1 .291560 
1 .315783 
1 . 323022 
1 .323631 

ENT 

1 .005145 
1 .004587 
1 .003121 
1 .001180 
1.001502 
1 003464 
1 006005 
I 01 1040 
1 .031657 
I 100337 
I .217769 
1 .289838 
1 313065 
1 .320013 
1 . 320586 

ENT 

1.007555 
1 .006935 
1 .005317 
1 -003243 
1 .003420 
1.005286 


7 

0.000000 

3.577985 

.980626 

562872 

1 001516 

- 004455 

-.024825 

.800920 

.450815 

1 .007918 

8 

0 000000 

3 577985 

990000 

557545 

997577 

- 006295 

- 023130 

802535 

.447450 

1 013800 

9 

0 000000 

3 577985 

904862 

547760 

966501 

- 009978 

- 021666 

815382 

446634 

1 .037349 

10 

0 000000 

3 577985 

997384 

520991 

847306 

- 015683 

-.018054 

854982 

.445438 

1 . 109750 

11 

0 000000 

3 577985 

. 998692 

486626 

. 586624 

- 017678 

- .01 1847 

.916175 

. 445835 

1 .222082 

12 

0 000000 

3 577985 

999371 

468473 

326248 

- 012197 

- .006373 

.950373 

445224 

1 .287123 

13 

0.000000 

3.577985 

993723 

463561 

160131 

- . 006497 

- ,003078 

961679 

.445797 

1 .307939 

14 

0.000000 

3.577985 

. 999905 

461534 

.065387 

-.002738 

- 001238 

.964651 

. 445220 

I .314283 

15 

0.000000 

3.577985 

1 .OOOOOO 

461847 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.965248 

.445797 

1 .314740 

5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

t 

0.000000 

3.673465 

0 OOOOOO 

658369 

835271 

001660 

0 OOOOOO 

.856707 

.564029 

I 012616 

2 

0 . 000000 

3 673465 

461357 

647759 

855483 

.001587 

- . 035754 

. 850562 

.550959 

I .01 1906 

3 

0 000000 

3.673465 

.731034 

619635 

904781 

001081 

- 041093 

. 833996 

.516773 

1 .009972 

4 

0.000000 

3.673465 

.860533 

592542 

953594 

- . 000783 

- . 032658 

.817204 

. 484227 

1 .007495 

5 

0 . 000000 

3 673465 

.927712 

,579410 

. 980539 

- ,004329 

- , 032685 

. 809799 

.469206 

1 007355 

6 

0 oOoooo 

3.673465 

. 962554 

569662 

99! 144 

- 009377 

- . 030780 

.805801 

. 459034 

1 ,009208 

7 

0.000000 

3.673465 

. 980626 

564450 

.991451 

- .015449 

- . 029790 

. 805709 

. 454783 

1 .012809 

8 

0 . OOOOOO 

3.673465 

990000 

557568 

980180 

- . 025024 

- 027617 

809741 

451485 

1 . 022886 

9 

0 . OOOOOO 

3.673465 

. 994862 

544550 

.929439 

- 041078 

- . 023936 

.828012 

. 450894 

1 .055897 

10 

0 OOOOOO 

3.673465 

.997384 

517293 

790687 

- 059565 

- .018512 

,869234 

. 449649 

1.131467 

1 1 

0 . OOOOOO 

3 673465 

. 993692 

488512 

551166 

- 061774 

- 0! 1806 

.921514 

.450171 

I .227303 

12 

0 OOOOOO 

3.673465 

.999371 

.472136 

.315978 

- 040016 

- . 006349 

.951813 

449442 

1 .284998 

13 

0 . OOOOOO 

3 673465 

.999723 

467544 

157233 

- .020447 

- . 003058 

962756 

.450131 

1 . 304930 

14 

0 OOOOOO 

3 673465 

. 999905 

465389 

064414 

-.008427 

- 001219 

.965722 

.449437 

1 .311370 

15 

0 , OOOOOO 

3 673465 

1 . OOOOOO 

465818 

0 . OOOOOO 

0 . OOOOOO 

0 . OOOOOO 

966322 

.450130 

1 .311703 

6 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 OOOOOO 

3.700934 

0 OOOOOO 

651239 

807239 

, 000969 

0 OOOOOO 

.865718 

, 563789 

1.027733 

2 

0 , OOOOOO 

3 700934 

.481357 

640637 

828422 

. 000934 

- .026837 

.859521 

.550641 

1 .027097 

3 

0 . OOOOOO 

3.700934 

.731034 

612470 

879923 

.000775 

- . 024594 

842532 

.516025 

1 025068 

4 

0.000000 

3.700934 

. 860538 

585185 

. 930807 

. 000204 

- .01 1830 

,825010 

. 482784 

1 .022214 

5 

0 . OOOOOO 

3.700934 

.927712 

.571992 

, 958867 

- ,000571 

-.012638 

.817322 

.467501 

1 .021968 

6 

0.000000 

3.700934 

. 962554 

562669 

,969192 

- 001994 

-.015231 

.813871 

.457940 

1 .024365 

7 

0.000000 

3.700934 

. 980526 

557150 

,965322 

- .0091 13 

- .019454 

,815277 

.454232 

1 ,030188 

8 

0.000000 

3.700934 

. 990000 

. 548384 

.942803 

-.031126 

-.021443 

.823067 

.451357 

1 .046649 

9 

0.000000 

3.700934 

. 994862 

533318 

872042 

-.068434 

-.019882 

.845813 

.451088 

1 .087627 

10 

0. OOOOOO 

3.700934 

997384 

511883 

752669 

- . 103241 

- 018793 

.878834 

. 449860 

1 . 148785 

1 1 

0 . OOOOOO 

3.700934 

, 998692 

493084 

.61230! 

- . 1 18607 

- ,015467 

.913607 

. 450485 

1 212247 

12 

0,000000 

3.700934 

,999371 

476117 

j .440743 

-.089301 

- ,009526 

.944413 

.449651 

1 .270798 

13 

0 . OOOOOO 

3 . 700934 

.999723 

.467196 

« . 228276 

- . 048906 

- . 004624 

.964059 

. 450404 

I .307086 

14 

0,000000 

3.700934 

. 999905 

463408 

092729 

- .020678 

-.001754 

.970277 

. 449634 

1 .319806 

15 

0 . OOOOOO 

3 . 700934 

1 . OOOOOO 

463574 

0 OOOOOO 

0 . OOOOOO 

0.000000 

,971580 

. 450399 

1 .321390 

7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 OOOOOO 

3.708837 

0 . OOOOOO 

632092 

.716257 

. 000026 

0 OOOOOO 

.892333 

.564037 

1 .072049 

2 

0 OOOOOO 

3 708837 

.481357 

621298 

737734 

-.000027 

- .005937 

. 886824 

550982 

1 072798 

3 

0 . OOOOOO 

3 . 708837 

731034 

5931 15 

789220 

-.000225 

014293 

.871366 

.516820 

1 073853 

4 

0 . OOOOOO 

3 708837 

. 860538 

555989 

838563 

- . 000553 

.040138 

. 855644 

. 484285 

I .074410 

5 

0 . OOOOOO 

3.708837 

.927712 

552362 

.864885 

-.001064 

. 048753 

.849423 

.469189 

1 . 077047 

6 

0.000000 

3.708837 

. 962554 

.542154 

.874572 

- .001483 

.053907 

.846268 

.458808 

1 .081082 

7 

0 OOOOOO 

3.708837 

.980626 

536329 

871024 

- .003499 

.052549 

.847722 

. 454658 

1 .087630 

8 

0 OOOOOO 

3.708837 

.990000 

526870 

832492 

-.013332 

.041325 

.859635 

.452916 

1 .110792 

9 

0 OOOOOO 

3 . 708837 

. 994862 

512409 

732386 

- 024908 

.025447 

.887289 

. 454655 

1 . 159361 

10 

0 OOOOOO 

3.708837 

997384 

496983 

620594 

- 033904 

007916 

914381 

454432 

1 .209458 

1 1 

0 . OOOOOO 

3.708837 

. 998692 

492544 

. 596760 

- , 083892 

- 002438 

.924957 

. 455582 

1 . 227844 

12 

0 . OOOOOO 

3.708837 

.999371 

495510 

645517 

- . 1 16417 

-.010320 

.916961 

. 454363 

1 214311 

13 

0.000000 

3 . 708837 

.999723 

: 480332 

262070 

-.079196 

- . 004783 

,948149 

.455426 

I .271335 

14 

0 OOOOOO 

3 708837 . 

.999905 

478697 

091925 

- .036744 

- .001775 

.949160 

.454360 

1 274427 

15 

0.000000 

3.708837 

1 OOOOOO 

479673 

0 OOOOOO 

0.000000 

0.000000 . 

.949453 

.455427 

1 ,273782 

8 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 OOOOOO 

3 711110 

0 OOOOOO 

597336 

477793 

.000008 

0 OOOOOO 

.943872 

.563808 

I . 159913 

2 

0 OOOOOO 

3 711110 

401357 

585247 

492589 

.000001 

018825 

940905 

.550662 

1 , 165762 

3 

0,000000 

3.711110 

.731034 

553885 

. 525645 

-.000038 

058130 

.931701 

.516055 

1 . 180073 


J* u 


J. !4 


J. 15 


J« 15 


4 

0.000000 

3.711110 

.860538 

522919 

.550838 

-.000107 

.095620 

.923337 

.482831 

I . 196704 

5 

0.000000 

3.711110 

.927712 

506661 

.558534 

-.000154 

.109737 

.922853 

.467573 

1 .2! 1283 

6 

0.000000 

3 711110 

.962554 

. 496572 

561420 

-.000397 

.116790 

.922439 

. 458053 

1 .220520 

7 

0.000000 

3.711110 

.980626 

493309 

571450 

-.001844 

.115997 

921496 

.454582 

1 .222492 

8 

0 . 000000 

3 71 1110 

. 990000 

481647 

445758 

-.004932 

. 1 10726 

. 939857 

.-•52680 

1 258838 

9 

0 . 000000 

3.711110 

.994862 

475640 

213568 

-.006107 

092220 

.955019 

. 454245 

1.285584 

10 

0 . 000000 

3.711110 

997384 

.474946 

050047 

-.001221 

.082998 

.955008 

.453577 

1 .286321 

11 

0.000000 

3.711110 

998692 

484867 

- 006457 

.011324 

.056515 

.941276 

. 456394 

1 .257384 

12 

0 000000 

3.71 1110 

99937! 

789966 

-I 1631 16 

.023582 

.040990 

.578392 

.456910 

.635593 

13 

0.000000 

3.711110 

999723 

1 223346 

-1 476152 

.006854 

.029723 

.374243 

.457828 

.345250 

14 

0 000000 

3.711110 

. 999905 

734585 

- 723916 

- 003348 

.013777 

.621 143 

. 456282 

.702707 

15 

0 . 000000 

3.711110 

1 000000 

653235 

0 000000 

0 000000 

0 . OOOOOO 

.700813 

.457796 

.830948 

9 L 

X 

Y 

Z 

R/RREr 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 . 000000 

3 71 1764 

0 000000 

579262 

. 183424 

000001 

0 OOOOOO 

.973713 

.564035 

1 .211381 

2 

0 . 000000 

3.7! 1764 

.481357 

.566644 

188634 

.000001 

012672 

.972355 

.550980 

I .220396 

3 

0.000000 

3.711764 

. 73 1 034 

534343 

199225 

-.000005 

.034393 

.967201 

.516817 

I .242764 

4 

0 000000 

3 711764 

.860538 

50301! 

204870 

-.000009 

. 052538 

. 962766 

.484281 

I .267330 

5 

0 . 000000 

3.711764 

.927712 

486732 

204754 

- . 000002 

.058707 

. 963950 

.469185 

1 .285697 

6 

0 000000 

3.711764 

962554 

475888 

200945 

- . 000008 

.061926 

. 964 1 33 

.458819 

I 297583 

7 

0 . 000000 

3 7 1 1 764 

. 980626 

471998 

168801 

- . 000008 

051655 

.963488 

. 454764 

1 . 300980 

8 

0 000000 

3 711764 

. 990000 

475665 

057139 

- 000014 

014479 

952926 

. 453274 

1 . 282740 

9 

0.000000 

3 71 1764 

.994362 

488365 

- 039433 

- . 000009 

- .020858 

932432 

455367 

1 .241993 

10 

0 . 000000 

3 711764 

.997384 

493322 

- 107678 

- 000013 

- 031830 

9221 18 

.454901 

I .223303 

1 1 

0 .000000 

3.71 1764 

998692 

522725 

- 345777 

- . 000006 

- 019624 

.876687 

458266 

1 . 136410 

12 

0.000000 

3.711764 

.999371 

834768 

-1 1S3459 

.000064 

.017017 

548581 

.457938 

.589677 

13 

0 . 000000 

3.711764 

.999723 

682430 

- 749603 

.000047 

.015664 

671885 

.458515 

. 782838 

U 

0 000000 

3.711764 

999905 

616750 

- 294543 

000053 

005541 

.742344 

457840 

900661 

15 

0 000000 

3 7! 1764 

1 000000 

603197 

0 000000 

0 000000 

0 OOOOOO 

753936 

. 458542 

.919849 

10 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 000000 

3.711952 

0.000000 

576139 

0 000000 

0.000000 

0.000000 

.978598 

. 563808 

1 .220094 

2 

0.000000 

3.71 1952 

.481357 

563339 

0 000000 

0.000000 

0 OOOOOO 

.977497 

.550662 

1 .229723 

3 

0 000000 

3.71 1952 

.731034 

530390 

0 000000 

0 000000 

0.000000 

.972972 

.516055 

1 .253898 

4 

0 000000 

3 71 1952 

860538 

498249 

0 000000 

0 000000 

O' oooooo 

969053 

482829 

1 280469 

5 

0 000000 

3 711952 

927712 

481842 

0 000000 

0 000000 

0 oooooo 

970375 

467567 

1 299505 

6 

0 000000 

3 7 1 1 902 

06.'554 

472027 

0 000000 

0 oooooo 

0 oooooo 

9 70 3115 

4500-19 

1 310260 

7 

0 000000 

3 71 1952 

960626 

469707 

0 OOliOOO 

0 OOOOOO 

0 oooooo 

967735 

454552 

1 309260 

8 

O ' 000000 

3 711902 

930000 

474972 

0 000000 

0 oooooo 

0 oooooo 

953018 

452657 

1 283613 

9 

0 000000 

3 71 1952 

994862 

487430 

0 000000 

0 oooooo 

0 oooooo 

. 932249 

.454407 

1 .242702 

10 

0 000000 

371 1952 

.997384 

492859 

0 000000 

0 oooooo 

0 oooooo 

.923421 

.455! 16 

1 225492 

11 

0 000000 

3 7! 1952 

.990692 

51361 1 

0 000000 

0 oooooo 

0 oooooo 

891676 

457974 

1 164002 

12 

0 000000 

3 71 1952 

999371 

584593 

0 000000 

0 oooooo 

0 oooooo 

773433 

452144 

.958696 

13 

0 000000 

3 71 1952 

999723 

593250 

0 000000 

0 oooooo 

0 oooooo 

. 760543 

. 454995 

934051 

14 

0 . 000000 

3.71 1952 

999905 

.600339 

0 000000 

0 oooooo 

0 oooooo 

757744 

. 454904 

929317 

15 

0 000000 

37! 1952 

1 000000 

604258 

0 000000 

0 oooooo 

0 oooooo 

755840 

456723 

924572 

1 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

0 000000 

0 , 000000 

624677 

9.0964 

0 oooooo 

9 oooooo 

330897 

.513042 

1 002963 

2 

. 139198 

0.000000 

.482562 

612779 

929665 

0 . oooooo 

- .018914 

.824510 

.505243 

1 .002938 

3 

. 139198 

0.000000 

. 732863 

583192 

972655 

0 oooooo 

- 004867 

.807437 

.470891 

. 1 .001806 

4 

139198 

0 000000 

. 862692 

560187 

I 009302 

0 oooooo 

.014771 

792564 

.443984 

.999312 

5 

. 139198 

0 0.00000 

.930033 

553732 

1 026583 

• 0 oooooo 

.015390 

. 789050 

.436923 

.999504 

6 

. 139198 

0.000000 

.964962 

547555 

I 031157 

0 oooooo 

.018039 

.787140 

.431002 

V. 001568 

7 

. 139198 

0.000000 

. 983080 

545540 

1 029397 

0 oooooo 

7017698 

737940 

.429853 

1 .004067 

8 

. 139198 

0.000000 

.992477 

541433 

1 024582 

0 oooooo 

.018053 

. 790092 

. 427782 

I .009857 

9 

. 139198 

0 000000 

.99735! 

530647 

986552 

0 oooooo 

017172 

.806656 

428211 

1 .039203 

10 

139198 

0 000000 

999880 

497576 

833967 

0 oooooo 

015104 

858205 

427023 

1 .134612 

1 1 

139198 

0 000000 

1 00! 191 

46 1 704 

525334 

0 oooooo 

009922 

.926806 

427910 

1 262535 

12 

. I39I98 

0 000000 

1 001871 

446574 

265886 

0 oooooo 

.005142 

.956062 

.426952 

1.319862 

13 

. 139198 

0.000000 

1 . 002224 

443915 

122848 

0 oooooo 

.002402 

963922 

.427899 

) .333897 

14 

. 139198 

0.000000 

1 .002407 

442102 

048640 

0 oooooo 

.000962 

.965728 

.426950 

1 .338584 

15 

139198 

0.000000 

! .002502 

442928 

C 000000 

0 oooooo 

0.000000 

.966069 

.427899 

I . 338059 

2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 



) 

. 139198 

1 .670379 

0 000000 

.624491 

909778 

002548 

0.000000. 

831140 

.519039 

J. 003376 

2 

.139198 

1 .670379 

.482562 

612654 

928401 

.002622 

-.018959 

.824774 

.505301 

1 003342 

3 

.139198 

1 670379 

732863 

583202 

971212 

002876 

- 004984 

807758 

471086 

I .002198 

4 

.139198 

1 670379 

862692 

560300 

1 008223 

003360 

014624 

792932 

444280 

999696 

5 

139198 

1 670379 

930033 

.553889 

1 024962 

004003 

015276 

789429 

437256 

999872 

6 

.139198 

1.670379 

964962 

547751 

1 029518 

.004663 

.017948 

787520 

.431365 

I 001909 

7 

.139193 

1 670379 

.983080 

545767 

1 027827 

.005186 

017619 

. 788283 

.430219 

1 .004337 

8 

.139198 

1 .670379 

.992477 

. 54 1 729 

I 023224 

005423 

. 0 1 7983 

. 790357 

.428159 

1 .009975 

9 

.139198 

1 .670379 

997351 

53! 162 

.985275 

005161 

.017105 

806880 

428584 

I .039245 

10 

. 139198 

1 . 670379 

999880 

497803 

831796 

004084 

.015045 

858578 

.427403 

1 . 134897 

II 

139198 

1 670379 

1 001191 

.462032 

522434 

002325 

009S60 

926958 

. 428284 

1 262384 

12 

. 139193 

1 670379 

1 001871 

447061 

263984 

001078 

005103 

. 955872 

. 427333 

1.319026 

13 

.139198 

1 .670379 

1 002224 

444445 

121902 

000474 

002383 

963614 

428273 

I 332834 

14 

.139198 

1 .670379 

1 002407 

44265! 

048256 

000182 

000954 

.96539! 

.427331 

1 .337453 

15 

.139198 

1 670379 

1 . 002502 

.443472 

0 000000 

0 000000 

0 . 000000 

. 965726 

. 428273 

1.336927 

3 L 

X 

Y 

Z 

R/RREF ■ 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

.139193 

3.246102 

0 000000 

. 624208 

, 905538 

.003444 

0 000000 

.832047 

.519371 

1 .004653 

2 

. 139198 

3 246102 

. 482562 

.612602 

924937 

.003383 

- 019314 

. 325767 

. 505867 

1 .004584 

3 

. 139198 

3.2461 02 

732863 

583664 

967225 

.003230 

- 005847 

. 808974 

.472169 

1 003330 

4 

. 13919S 

3 246102 

. 862692 

561070 

1 003838 

.003177 

.013579 

. 794299 

. 445657 

1 000868 

5 

. 139198 

3 246102 

930033 

. 554660 

I 020466 

003441 

014523 

.790756 

.438601 

I .000995 

6 

. 139198 

3 246102 

964962 

54860! 

I 024988 

003900 

017353 

788831 

432753 

1 002954 

7 

.139198 

3 246102 

983080 

546668 

1 023450 

004353 

017133 

789512 

.431601 

I 005239 

8 

139198 

3 246102 

992477 

542648 

1 018756 

004482 

017588 

791615 

.429568 

1 010896 

9 

.139198 

3.246102 

997351 

.531652 

97856! 

003526 

016764 

808753 

. 429978 

1 041280 

10 

.139198 

■3 246102 

. 9998S0 

.497775 

813903 

000973 

.014730 

.861471 

.428819 

I . 138748 

1 1 

. 139198 

3.246102 

1 .001 IS! 

. 452893 

508364 

- .001470 

009567 

928244 

.429633 

1 263187 

12 

. 139198 

3 246102 

! 00187! 

. 448681 

255833 

- 001551 

004938 

. 955530 

.428751 

1 .316715 

13 

. 139198 

3 246102 

1 002224 

446248 

1 18044 

- 000896 

002306 

962856 

. 429672 

1 . 329630 

14 

. 139198 

3.246102 

1 002407 

444520 

0467 1 7 

- 000384 

000924 

964524 

.428750 

1 . 334002 

15 

. I3S198 

3 246102 

1 002502 

.445330 

0 000000 

0.000000 

0 000000 

964839 

.429672 

1 . 333466 

4 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3.577931 

0 000000 

624044 

901652 

.002456 

0 000000 

. 833994 

.520449 

1 .007110 

2 

.139198 

3 577931 

482562 

612847 

. 919875 

. 002058 

- .019810 

827846 

.507343 

1 .006951 

3 

. 139198 

3.577931 

732863 

585023 

961704 

.000720 

-.007722 

.8! 1493 

.47474! 

I 005577 

4 

. 139198 

3.577931 

. 862692 

,56343! 

997968 

- 00 1 396 

.010329 

797283 

.449214 

! .002943 

5 

. 139198 

3 57793! 

.930033 

.557218 

1 014568 

- 003414 

.011354 

. 793736 

. 442284 

1.002920 

6 

. 139198 

3 577931 

.964962 

.551131 

1 019029 

- 005244 

.014575 

.791753 

.436407 

1.004775 

7 

. 139198 

3 57793! 

.983080 

.543107 

1 016891 

- 007158 

.014812 

. 792640 

. 435244 

! .007427 

8 

. 139198 

3 577931 

. 992477 

.544026 

I 007880 

- .010398 

015785 

.79621 1 

.433160 

I 015734 

9 

. 139198 

3 57793! 

997351 

.530482 

954101 

- 017149 

.015418 

817353 

.433590 

i 053274 

10 

. 139198 

3 577931 

. 999880 

, 495664 

776221 

- . 0257 1 6 

013642 

872387 

4324 1 1 

1 155139 

1 1 

. 139198 

3 577931 

1 00 n 9 1 

464387 . 

472680 

- 02503! 

. 008800 

933079 

433309 

I .268138 

12 

. 139198 

3 577931 

1.00187! 

.451905 

238294 

- 015717 

004578 

.955728 

. 432350 

1 314527 

13 

. 139198 

3 57793! 

1 002224 

.449884 

1 1031 I 

- , 008007 

00215! 

963138 

. 433300 

1.325709 

14 

. 139198 

■ 3 577931 

1 002407 

.448207 

043704 

-.003312 

.000865 

964619 

.432349 

1 329732 

15 

.139198 

3 577931 

I 002502 

.449062 

0 000000 

0 000000 

0 000000 

.964900 

.433299 

1.329107 

5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3 673434 

0 OGOOOO 

622222 

832943 

.001359 

0 000000 

.837330 

.521005 

1 012322 

2 

.139198 

3 673434 

. 482562 

.611205 

911396 

.001142 

- 017863 

.831135 

.507994 

1 .012038 

3 

. 139198 

3.673434 

732863 

.584062 

9537 1 7 

000254 

- . 005440 

.814738 

.475857 

1 .010263 

4 

. 139198 

3.673434 

.862692 

563500 

990530 

-.001889 

010902 

.800693 

.451190 

I .007183 

5 

.139198 

3 673434 

930033 

,557991 

t 007656 

-.005278 

.009799 

. 797242 

. 444854 

1 .006791 

6 

. 139198 

3 673434 

964962 

552168 

I 012088 

-.010160 

. 011017 

.795391 

.439205 

1 .008663 

7 

. 139198 

3.673434 

983030 

.549523 

1 007093 

-.017591 

.010209 

797413 

.438197 

1 .013186 

8 

. 139198 

3 673434 

992477 

.541544 

984763 

- 032419 

.011527 

.805417 

.436169 

1.029360 

9 

. 139198 

3 673434 

997351 

.523410 

901779 

- 057589 

.012415 

.834407 

.436737 

1 .081038 

10 

. 139198 

3 673434 

999880 

490455 

708731 

-.081974 

.011376 

.888081 

.435564 

1.180899 

11 

. 139198 

3.673434 

1 001191 

.464845 

435064 

-.074192 

.007667 

.939076 

436524 

1.275785 

12 

. 139198 

3 673434 

1 001871 

453692 

218518 

- 043179 

. 004076 

.959924 

.435510 

1.316837 

13 

139198 

3.673434 

I .002224 

452! 10 

10158! 

- 020917 

.001953 

.965507 

.436515 

1 .326349 

14 

. 139198 

3 673434 

I .002407 

.450467 

040355 

-.008424 

000799 

.966794 

.435509 

1.330053 



J* 15 K» 


J* 15 K* 


J- 15 K== 


J« 15 K* 



15 

. 133198 

3.673434 

1 002502 

451392 

0 000000 

0.000000 

0 000000 

.967040 

.436514 

I .329299 

6 L 

X 

Y 

Z 

R/RReF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3.700921 

0.000000 

615268 

866391 

. 000422 

0 000000 

846585 

.520877 

1 028123 

2 

.139198 

3.700921 

.482562 

.604215 

885269 

.000280 

-.007479 

840360 

.507758 

1 .027990 

3 

139198 

3.700921 

.732863 

576843 

928252 

- 000186 

013892 

.823610 

.475093 

1 .026357 

4 

.139198 

3.700921 

862692 

. 555635 

965292 

-.001034 

.035610 

809019 

.449520 

I .023394 

5 

. 139198 

3.700921 

930033 

549546 

982704 

- 001728 

. 034699 

805394 

. 442602 

1 .023309 

6 

. 139198 

3.700921 

964952 

.543749 

987655 

- 003129 

.032384 

803785 

. 437057 

1 .025606 

7 

.139198 

3.700921 

.983030 

. 540509 

979748 

-.01 1503 

023103 

.807143 

.436268 

1 .032356 

8 

. 139198 

3.700921 

992477 

530060 

942674 

-.039153 

.027514 

819810 

. 434548 

1 .056776 

9 

. 139198 

3 700921 

997351 

511587 

844726 

- 081982 

024342 

850531 

.435121 

1 112045 

10 

. 139.198 

3 700921 

999880 

485391 

678545 

- 123649 

016313 

894266 

. 434068 

1 194070 

1 1 

. 139198 

3 700921 

1 001191 

.460470 

422710 

- 127383 

.007080 

944493 

.43491 1 

1 . 288008 

12 

.139198 

3.700921 

1 001871 

.447849 

158688 

- 083659 

002538 

.959118 

.434018 

1 . 336363 

13 

. 139198 

3.700921 

1 002224 

447500 

066350 

- 044244 

.001149 

.971831 

434894 

1 . 340520 

14 

.139198 

3 700921 

1 002407 

446406 

026095 

- 018677 

.000509 

972243 

.434015 

1 ,342402 

15 

. 139198 

3.700921 

1 002502 

447280 

0 000000 

0 000000 

0 000000 

972305 

.-434892 

1 .341438 

7 L 

X 

V 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3 708832 

0 000000 

594730 

773130 

- 000460 

0 000000 

876226 

521118 

1 . 078669 

2 

. 139198 

3 708832 

482562 

.583364 

789S32 

- 000537 

015194 

871012 

5081 18 

1 030559 

3 

.139198 

3 . 708832 

732863 

555486 

825840 

- 000816 

.055106 

856898 

.475995 

1 .084077 

4 

. 139198 

3 708832 

862692 

533474 

852879 

- 001243 

088697 

. 845992 

.451315 

1 ,087730 

5 

. 139198 

3.708832 

930033 

526379 

853783 

- 001515 

. 095805 

845148 

.444868 

1 . 092480 

6 

.139198 

3 , 703832 

, 964962 

520354 

868556 

- . 002597 

. 100906 

843790 

. 439069 

1 095758 

7 

.139198 

3.708832 

9S3030 

516428 

856533 

-.009781 

, 0990 1 9 

848314 

.438093 

1 . 104976 

8 

. 139198 

3 708332 

992477 

497112 

745662 

- 0251 17 

085223 

880221 

.437569 

1 164153 

9 

. 139198 

3 . 708832 

997351 

474457 

533068 

- 025653 

056667 

927223 

.439927 

1 249412 

10 

, 139198 

3 708832 

999880 

455894 

190203 

003554 

023773 

964851 

.439870 

1 321036 

1 1 

139198 

3 708032 

1 OOM91 

461690 

• 286987 

002062 

• 000103 

955530 

441159 

1 301679 

12 

139198 

3 708032 

1 001871 

452219 

- 261490 

• 052209 

- 003444 

973341 

440164 

1 336982 

13 

. 139198 

3 708832 

1 002224 

446360 

- 130385 

- .041604 

- 002169 

988324 

.441149 

1 364662 

14 

. 139198 

3 . 708832 

1 002407 

443392 

- 050767 

- 020089 

- .000995 

992718 

440163 

1 374392 

15 

. 139198 

3 708832 

1 002502 

444009 

0 000000 

0 000000 

0 . 000000 

.993567 

.441153 

I . 374804 

8 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3 711 109 

0 000000 

554757 

503537 

- 000054 

0 000000 

938977 

. 520904 

1 . 188540 

2 

. 139198 

3 71 1 109 

482562 

542352 

5094 18 

- 000062 

034953 

936263 

507785 

1 . 195874 

3 

.139198 

3.711109 

732863 

511764 

51580S 

- 0001 10 

085512 

928399 

.475122 

I .213687 

4 

139198 

3.711109 

862692 

486199 

507572 

- 000166 

120410 

924629 

449553 

1 233791 

5 

. 139198 

3 71 1 109 

930033 

476793 

497648 

- 000181 

126824 

928401 

. 442656 

1 248543 

6 

. 139198 

3 711109 

964962 

470365 

493623 

- 000509 

129896 

929566 

437235 

1 256915 

7 

. 139198 

3 711109 

983080 

462578 

388086 

- 001920 

1 19715 

944795 

.437041 

1 286068 

8 

. 139198 

3.711109 

992477 

452126 

- 170062 

- 003441 

. 069750 

94451 1 

.436483 

! .285184 

9 

. 139198 

3.711109 

997351 

503929 

- 561977 

-.001509 

.004870 

869487 

.438160 

1 .143708 

10 

. 139198 

3.711109 

. 999880 

469970 

- 225262 

001734 

.001610 

93310! 

.438530 

1.262119 

1 1 

. 139198 

3 711109 

1 001191 

471768 

- 430462 

003929 

01501 1 

928970 

.438258 

1.254615 

12 

.139198 

3.711109 

1 00 187 1 

.395681 

- 131430 

012799 

.01 1659 

1 .107460 

.438201 

r. 604686 

13 

.139193 

3.711109 

1 002224 

.354488 

199218 

007821 

006975 

i . 236269 

438242 

1 .871857 

14 

.139198 

3 711109 

1 002407 

351 128 

092170 

002732 

001602 

1 247504 

.438033 

1 896077 

15 

. 139198 

3.711109 

I 002502 

352268 

0 000000 

0 000000 

0 000000 

1 .244201 

.438292 

1 .888606 

9 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

V/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 139198 

3.711764 

0 . 000000 

535905 

187634 

.000003 

0 . 000000 

.972401 

.521115 

1 .247987 

2 

. 139198 

3.711764 

482562 

523723 

188194 

.000002 

.017941 

.970197 

.508114 

1 .256665 

3 

.139198 

3.711764 

. 732863 

494180 

185266 

-.000008 

.041541 

.963195 

.475991 

1 .276910 

4 

. 139198 

3.711764 

862692 

.470482 

1 75346 

- 000012 

054681 

.959252 

.45131 1 

1 .296926 

5 

. 139198 

3.711764 

930033 

462242 

167484 

- . 000002 

055148 

962410 

.444866 

1 310425 

6 

.139198 

3 711764 

964962 

455901 

156503 

- 000009 

.054666 

963103 

439080 

1 .318635 

7 

139198 

3 711764 

983080 

455138 

090762 

- 000009 

037704 

962766 

.438191 

1 319058 

8 

. 139198 

3.711764 

992477 

4621 10 

- 052470 

-.000006 

,001695 

947859 

.438015 

1 .290759 

9 

. 139198 

3.711764 

.997351 

473740 

- 164318 

000015 

- 019548 

.929621 

. 440399 

1 .253400 

10 

. 139198 

3 711764 

. 999880 

456242 

-.115609 

- 000014 

- 014428 

963727 

439693 

I 319095 

11 

. 139198 

3 711764 

1 001191 

430042 

- 170251 

-.000049 

-.012500 

I 025797 

.441135 

1 .437663 


1 


J» 15 
Js 16 


J» 16 


J* 16 


12 

. 139198 

3.711764 

1 001871 

. 375205 

1 1 1593 

- . 000243 

-.000804 

I . 173762 

.440401 

1.737293 

13 

.139198 

3:711764 

1 002224 

, 365086 

093260 

- .000220 

001193 

1 208332 

.441 145 

1.808124 

14 

. 139198 

3.711764 

1 002407 

. 363993 

036517 

- 000234 

. 000660 

1 .209860 

. 440380 

1 .812583 

15 . 

. 139198 

3.711764 

1 002502 

365007 

0 OOOOOO 

0 OOOOOO 

0.000000 

1.208306 

.441137 

I .808083 

10 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.139198 

3.711952 

0 000000 

532865 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

977553 

.520904 

1 .257457 

2 

.139198 

3.711952 

482562 

.520611 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

975362 

507784 

1 . 266369 

3 

139198 

3 71 1952 

732363 

490681 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

968290 

.475121 

1 .287318 

4 

. 139198 

3 711952 

862692 

466334 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.964016 

. 449554 

1 . 307993 

5 

.139198 

3.711952 

930033 

457827 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

. 966864 

. 442656 

1.321554 

6 

.139198 

3 71 1952 

.964962 

452152 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.966994 

.437228 

1 . 328342 

7 

.139198 

3 71 1952 

983030 

453369 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

963864 

.436986 

1 . 322620 

8 

.139198 

3.711952 

.992477 

. 459899 

0 OOOOOO 

0 OOOOOO 

0 oooooo 

948215 

.436084 

1 .293724 

9 

.139198 

3.711952 

.997351 

.4681 14 

0 OOOOOO 

0 oooooo 

0 oooooo 

.934907 

.437643 

1 .266566 

10 

>39198 

3.711952 

999880 

455729 

0 OOOOOO 

0 oooooo 

0 oooooo 

965387 

.439955 

1 .321962 

1 1 

.139198 

3 71 1952 

1 .001 191 

429230 

0 OOOOOO 

0 oooooo 

0 oooooo 

1 030403 

. 442280 

I 445210 

12 

. 139193 

3 711952 

1 001871 

378344 

0 OOOOOO 

0 oooooo 

0 oooooo 

1 . 159076 

438530 

1 . 709846 

13 

.139198 

3 71 1952 

1 002224 

367798 

0 OOOOOO 

0 oooooo 

0 oooooo 

1 . 189573 

. 437522 

1.774792 

14 

.139198 

3.71 1952 

1 .002407 

360215 

0 OOOOOO 

0 oooooo 

0.000000 

1 . 184760 

. 426769 

1 . 782402 

15 

.139198 

3.711952 

1 . 002502 

362675 

0 OOOOOO 

0 oooooo 

0 oooooo 

1 . 1 96533 

.433953 

1 . 795220 

1 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.324796 

0 000000 

0 000000 

588134 

958077 

0 oooooo 

0 oooooo 

8M369 

.477194 

1 003293 

2 

. 324796 

0 . 000000 

434456 

578962 

978549 

0 oooooo 

.002137 

806223 

. 466772 

1 .003218 

3 

.324796 

0 000000 

735740 

. 560378 

999979 

0 oooooo 

021828 

.794481 

.445209 

1 .001592 

4 

.324796 

0.000000 

. 855078 

554150 

1 016997 

0 oooooo 

. 028864 

. 7S9084 

.437271 

.999246 

5 

.324796 

0 . 000000 

.933684 

556843 

1 025951 

0 oooooo 

. 022904 

. 790636 

. 440260 

999272 

6 

. 324796 

0 . 000000 

. 963750 

.554031 

1 027056 

0 oooooo 

.023200 

. 790376 

.437932 

1 .000931 

7 

. 324796 

0 000000 

. 986939 

555362 

1 025412 

0 oooooo 

. 020909 

,792185 

.439949 

1 002297 

8 

324796 

0 000000 

.996373 

550891 

1 017800 

0 oooooo 

020668 

. 795299 

.438123 

1 , 009496 

9 

324796 

0 000000 

1 001267 

536626 

959802 

0 oooooo 

01905! 

8 1 9927 

.439994 

1 051735 

10 

.324796 

0 000000 

1 003305 

496688 

761931 

0 oooooo 

015710 

882184 

438170 

1 167147 

1 1 

.324796 

0 000000 

1 005122 

. 465885 

450681 

0 oooooo 

. 009460 

.944464 

.440012 

1 ,281958 

12 

.324796 

0 . 000000 

1 .005805 

453271 

22133' 

0 . oooooo 

.004700 

.966708 

.438180 

1 .326637 

13 

.324796 

0 000000 

1 .006159 

452458 

101153 

0 oooooo 

002146 

972499 

.440015 

1.335543 

14 

.324796 

0 000000 

1 006342 

449989 

039858 

0 oooooo 

.000849 

973760 

.438132 

I . 340204 

- 15 

.324796 

0 000000 

1 .006438 

451760 

0 OOOOOO 

0 oooooo 

0 OOOOOO 

.974002 

440015 

1 . 338434 

2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.324796 

1 670379 

0 oooooo 

588225 

966535 

002496 

0 OOOOOO 

81 1756 

. 477495 

1 003710 

2 

324795 

1 670379 

.484456 

579108 

976949 

.002531 

001 968 

. 806635 

467129 

1 003629 

3 

. 324796 

1 .670379 

.735740 

560613 

998267 

002701 

.021529 

. 794940 

. 445654 

1 . 002004 

4 

.324796 

1 .670379 

. 866078 

.554387 

1 015221 

.0031 1 1 

02861 I 

. 789549 

.437716 

.999664 

5 

.324796 

1 .670373 

933684 

557067 

I 024156 

003719 

.022730 

791087 

. 440689 

.999680 

6 

. 324796 

1 .670379 

.958750 

554347 

1 025304 

.004400 

.023048 

790806 

,438381 

1 ,001284 

7 

324796 

1 670379 

986939 

555666 

1 023828 

005032 

020766 

. 732543 

. 440389 

I . 002530 

8 

.324796 

1.670379 

996373 

551228 

1 016295 

005448 

020566 

795634 

. 438576 

1 .009672 

9 

.324796 

1.670379 

1 .001267 

536809 

957536 

.005258 

.018964 

,820470 

.440435 

I .052289 

10 

.324796 

1 670379 

1 . 003805 

496752 

757728 

003943 

. 015612 

,882983 

.438624 

1 . I68I44 

1 1 

.324796 

1 . 670379 

1 005122 

. 466226 

446449 

.002022 

009368 

944720 

. 440453 

1 .281931 

12 

.324796 

1.670379 

1 .005805 

4533 M 

218874 

.000851 

.004647 

.966549 

.438634 

1 . 325784 

13 

.324796 

1 .670379 

1.006159 

453042 

099987 

.000356 

.002121 

972220 

. 440456 

I .334471 

14 

. 324796 

1 670379 

1 006342 

450597 

039391 

000135 

. 000839 

973452 

.438635 

I 339058 

15 

324796 

1.670379 

1 .006438 

452357 

0 OOOOOO 

0.000000 

0 OOOOOO 

.973690 

.440456 

1 . 337297 

3 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.324796 

3.246102 

0 oooooo 

588622 

962513 

.003114 

0 OOOOOO 

.813005 

,478552 

i .004983 

2 

.324796 

3.246102 

484456 

579719 

972800 

.002933 

.001270 

807971 

.468396 

1.004867 

3 

.324796 

3 246102 

. 735740 

561593 

993889 

002503 

020183 

, 796454 

.447283 

1 003211 

4 

324796 

3 246102 

866078 

555369 

I 010752 

002207 

.027349 

791045 

.439321 

1 .000849 

5 

.324796 

3.246102 

933684 

. 557889 

1 .019702 

.002324 

,021904 

.792435 

.442091 

1.000794 

6 

. 324796 

3.246102 

.968750 

555244 

1 020984 

002696 

.022358 

.792073 

.439794 

1 .002239 

7 

.324796 

3 246102 

.986939 

556532 

1 019591 

. 003065 

.020275 

.793746 

. 44 1 745 

1.003425 

8 

. 324796 

3.246102 

996373 

551774 

I 010617 

.002788 

.020149 

. 797358 

.43996! 

1 .011460 


J. 16 K* 


J« 16 K. 


J. 16 K» 


J. 16 K* 


9 

.324796 

3.246102 

1 .001267 

.536322 

.946509 

.000906 

.018599 

.823728 

.441784 

1 .056850 

10 

.324796 

3.246102 

1 ,003805 

. 496085 

.739132 

-.002472 

.015193 

. 886956 

.440006 

I .174032 

11 

.324796 

3 246102 

1 005122 

.466979 

430443 

-.004034 

.009021 

.946083 

.441801 

1 .282952 

12 

. 324796 

3.246102 

1 005SC5 

.455322 

.210388 

-.002916 

004464 

. 966384 

.440016 

1 .323800 

13 

. 324796 

3.246102 

1 006159 

.454691 

096081 

- 001523 

. 002038 

.971657 

.441804 

I .331761 

14 

324796 

3 246102 

1 006342 

452319 

037850 

- 000630 

000806 

,972802 

.440017 

1.336122 

15 

. 324796 

3.246102 

1 006438 

454053 

0 000000 

0 OOOOOO 

0.000000 

. 973022 

.441804 

1 . 334382 

4 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/FT7EF 

ENT 

1 

. 324796 

3.577847 

0 . 000000 

589257 

957351 

.001280 

0 OOOOOO 

.815199 

.480362 

1.007260 

2 

. 324796 

3.577847 

48445$ 

580710 

967650 

000767 

000557 

810268 

,470530 

1 007036 

3 

.324796 

3 577847 

735740 

563431 

988848 

- 000765 

0 1 8098 

. 799052 

45021 1 

1 005168 

4 

.324796 

3 577847 

866078 

557732 

1 006011 

- 002798 

024409 

793758 

442704 

1 002578 

5 

324796 

3 577847 

933G84 

560243 

I 015281 

- 004614 

019250 

. 794908 

.445342 

1 : 002227 

6 

.324796 

3.577847 

968750 

557641 

1 016698 

- ,006514 

019975 

. 794426 

. 443005 

1 .003487 

7 

. 324796 

3.577847 

. 986339 

558453 

1 013728 

- 009237 

.018405 

, 796646 

. 444889 

1 .005705 

8 

.324796 

3.577847 

996373 

.551830 

996995 

- .015069 

018685 

802899 

. 443064 

1 .018448 

9 

. 324796 

3 577847 

1 001267 

.533699 

.917277 

- 025356 

017472 

.833574 

,444877 

1 .071583 

10 

.324796 

3 577847 

1 003805 

494632 

701 105 

- .034492 

.014226 

. 895785 

.443084 

1 . 187109 

11 

.324796 

3.577847 

1 005122 

468793 

407444 

-.029510 

.008484 

.94901 1 

.444889 

1 284928 

12 

.324796 

3.577847 

1 005805 

458100 

201084 

- 017400 

004256 

.967241 

. 443093 

1.321755 

13 

.324796 

3 577847 

1 006159 

45764 1 

092294 

- 008602 

.001956 

.972140 

.444892 

1.328981 

14 

324796 

3 577847 

I .006342 

455291 

036406 

-.003512 

.000776 

.97321 1 

.443094 

1.333189 

15 

. 324795 

3.577847 

1.006438 

,457040 

0 000000 

0 OOOOOO 

0 OOOOOO 

. 973420 

. 444892 

1.331430 

5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

. 324796 

3 673386 

0 000000 

588096 

949887 

- 000137 

0.000000 

.818363 

.481277 

1 .01 1968 

2 

,324796 

3 673386 

.484456 

.579610 

. 960352 

-.000301 

.0031 19 

.813337 

471418 

1 011617 

3 

.324796 

3 673386 

735740 

562627 

981973 

- 000919 

021.630 

801956 

.451202 

1 . 009398 

4 

324796 

3 673386 

866078 

557423 

999753 

- 002295 

027089 

796610 

444046 

1 006403 

5 

324796 

3 673386 

933684 

560389 

1 . 009765 

- 004773 

,020397 

797667 

.447004 

1 005601 

6 

.324796 

3 673386 

968750 

557984 

I 01 1312 

- 009176 

.019584 

. 797342 

444904 

1 .006922 

7 

.324796 

3 673386 

. 986939 

.557722 

1 004194 

- 017452 

.017187 

801 145 

.446816 

1 .01 1915 

8 

.324796 

3 673386 

. 996373 

548174 

973122 

- , 034559 

.017277 

812064 

,445153 

1 032816 

9 

.324796 

3 673386 

1 001267 

529050 

880227 

- 061631 

.016113 

. 844822 

. 446954 

1 .089849 

10 

. 324796 

3 673386 

1 003805 

.497022 

695350 

- 083572 

.013546 

. 895884 

.445274 

1 , 184954 

11 

.324796 

3 673386 

1 005122 

472982 

.438810 

- 070371 

.008970 

945073 

.447003 

1 275051 

12 

.324796 

3 673386 

1 .005305 

460568 

.218759 

- 039103 

. 004584 

.966816 

.445285 

1.318336 

13 

.324796 

3 673386 

I .006159 

. 459539 

. 100146 

- 018513 

:0021 12 

.972725 

.447005 

1 327581 

14 

. 324796 

3 673386 

1 006342 

457160 

039505 

- 007381 

. 000842 

. 974026 

. 445286 

1 .332120 

15 

. 324796 

3 673336 

1 006438 

458808 

0 000000 

0 OOOOOO 

0 OOOOOO 

. 974276 

. 447005 

1 . 330545 

6 L 

X 

Y 

Z 

P/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

.324796 

3 . 700900 

0 000000 

580672 

.923344 

- . 000800 

0 . OOOOOO 

,828287 

.480963 

1 .029458 

2 

.324796 

3 . 700900 

,484456 

572038 

933046 

- 000899 

.014312 

,823405 

.471018 

1 .029541 

3 

324796 

3 700900 

.735740 

554449 

952347 

- .001 198 

.042802 

,812273 

.450363 

1 028389 

4 

324796 

3 . 700900 

: 866078 

.548081 

967366 

- 001591 

.053729 

807235 

442430 

1.026744 

5 

.324796 

3 700900 

933684 

550210 

976167 

-.001923 

048005 

.808617 

444910 

1 ,026908 

6 

.324796 

3 . 700900 

968750 

547384 

976868 

- 003445 

044983 

, 808987 

.442827 

I .029496 

7 

324796 

3 700900 

986939 

545763 

963056 

- 010180 

041341 

815585 

.445116 

1 .039124 

8 

.324796 

3 700900 

996373 

533929 

917544 

- 028610 

038831 

. 830572 

.443466 

1 067539 

9 

.324796 

3 700900 

1 001267 

522594 

849278 

- 057374 

. 032249 

852804 

.445670 

1 . 105563 

10 

.324796 

3.700900 

1 003805 

506956 

.769617 

- 095511 

,023010 

. 875455 

.443817 

1 , 148803 

11 

. 324796 

3 . 700900 

1 005122 

. 482054 

565025 

- 099741 

.013247 

.924801 

, 445804 

1 .238255 

12 

.324796 

3.700900 

1 . 005805 

458970 

222139 

- .060447 

.004911 

967076 

.443858 

1 .320526 

13 

.324796 

3.700900 

1 .006159 

458094 

084780 

-.029626 

.001817 

.973186 

.44581 1 

1 .329884 

14 

, 324796 

3.700900 

1 .006342 

455694 

032050 

- 012182 

.000681 

.974033 

443851 

1 ,333842 

15 

. 324796 

3 700900 

1 006438 

457623 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.974188 

445811 

1.331802 

7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 324796 

3 . 708824 

0.000000 

555784 

810720 

- 000778 

0 OOOOOO 

.866155 

.481395 

1 .095553 

2 

.324796 

3 . 708824 

.484456 

546671 

815663 

- *000801 

.034999 

, 862554 

,471534 

1 .098237 

3 

.324796 

3 . 708824 

.735740 

527865 

822084 

- 000901 

077025 

. 854960 

.451303 

1 . 103918 

4 

324796 

3.703824 

866078 

519755 

822919 

- 000965 

094377 

854429 

444093 

1 . 1 10085 

5 

.324796 

3.706824 

933684 

520508 

824096 

- 001084 

094181 

.858658 

.446938 

1.114934 



J« 16 


J» 16 


J= 16 


J. 17 


6 

.324796 

3.708824 

.968750 

516164 

815845 

-.003163 

.096145 

.861627 

.444741 

I . 122546 

7 

.324796 

3.708824 

.986939 

503121 

.759486 

-.010369 

091863 

.878819 

.446546 

I. 152159 

8 

. 324796 

3 708324 

996373 

487813 

.619694 

- 015230 

080522 

.912836 

. 445293 

1.216441 

9 

.324796 

3 . 708824 

1 001267 

477487 

501884 

-.000689 

. 057063 

.937308 

.447553 

1.259788 

10 

.324796 

3 . 708824 

1 .003805 

459763 

095111 

035174 

.026823 

,972082 

.446927 

1 ,326446 

11 

.324796 

3.708824 

1 005122 

. 490932 

- 522761 

.044094 

- . 003769 

.913712 

.448571 

1.214509 

12 

.324796 

3 708824 

1 005805 

486722 

- 552653 

.003809 

-.009812 

,918999 

. 447297 

1.225752 

13 

.324796 

3 . 708824 

1 006159 

. 467034 

- 286568 

- . 008987 

-.005599 

. 960566 

.448617 

1.302531 

14 

.324796 

3 708824 

1 006342 

459881 

- M3204 

- 005654 

- 002381 

972652 

.447305 

I . 327087 

15 

. 324796 

3 708824 

1 006438 

460161 

0 000000 

0 OOOOOO 

0 OOOOOO 

974927 

. 448623 

1 . 329867 

8 L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/F>R£F 

ENT 

1 

. 324796 

3.711106 

0.000000 

.510903 

487669 

-.000060 

0 . OOOOOO 

.941414 

,480971 

1 .231530 

2 

.324796 

3,711106 

, 484456 

.501604 

482740 

-.000064 

041009 

,939036 

.471024 

1 .237479 

3 

.324796 

3.711106 

. 735740 

48201 1 

464602 

- 000087 

080271 

.934347 

450365 

1 251081 

4 

.324796 

3,711106 

,866078 

,472355 

442880 

- 000071 

.091317 

936647 

442430 

1 264354 

5 

.324796 

3.711 106 

933684 

472006 

432586 

- 000056 

.087830 

942635 

.444929 

1 .272813 

6 

.324796 

3 7 M 1 06 

968750 

466010 

3664 75 

- 000351 

082178 

950677 

.443025 

I 290252 

7 

.324796 

3 71 1 106 

986939 

461784 

036707 

- 001208 

.044532 

965351 

445784 

1 .314951 

8 

.324796 

3 71 1 106 

996373 

.471440 

-.277616 

- 001900 

-.019835 

941518 

443870 

1 271914 

9 

.324796 

3.71 1 106 

1 001267 

457325 

- 017086 

000773 

- 045735 

973671 

.445284 

1.331442 

10 

.324796 

3.71 1 106 

1 .003805 

. 456994 

- 105533 

004799 

- 029261 

.974448 

.445317 

1.332890 

1 1 

.324796 

37! 1106 

1 .005122 

. 506485 

- 755455 

003097 

- 016608 

.88421 1 

.447840 

I . 160725 

12 

.324796 

3711 106 

1 .005805 

441279 

- 333024 

003548 

- . 005065 

I 010408 

. 445872 

1.401560 

13 

324796 

3.711106 

1 .006159 

. 425096 

- 111445 

004772 

-.001735 

1.053431 

,447810 

1 .483239 

14 

.324796 

3.711106 

1 006342 

420700 

- 040746 

003220 

- 000835 

I 059796 

. 445856 

1 498419 

15 

.324796 

3 7! 1 106 

1 006438 

422254 

0 000000 

0.000000 

0 OOOOOO 

1 . 060535 

.447815 

1.497254 

9 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.324796 

3 711763 

0 000000 

494941 

173114 

000005 

0 OOOOOO 

972625 

481392 

1 288617 

2 

324796 

3 711763 

4B4466 

486329 

169506 

000002 

017705 

969572 

471531 

1 293624 

3 

324796 

3 711763 

736740 

458627 

16S006 

- 000008 

033358 

963027 

45 1 300 

1 304090 

4 

.324796 

3 7 1 1 763 

866078 

460958 

145906 

- 000001 

034657 

963408 

.444091 

1 313245 

5 

.324796 

3 711763 

933684 

461518 

139877 

000010 

031679 

96S405 

446937 

1.319416 

6 

.324796 

3.711763 

968750 

4591 15 

. 108507 

.000001 

028521 

.968721 

.444754 

1 .322606 

7 

.324796 

3.711763 

,986939 

462671 

- .002998 

000013 

010180 

,965485 

.446702 

1 . 314124 

8 

.324796 

3.711763 

.9.96373 

, 465552 

- 085647 

000009 

-.014934 

. 957579 

.445803 

! .300131 

9 

.324796 

3.711763 

I 001267 

. 4.60403 

- 033092 

-.000005 

- 026387 

972885 

.447919 

1.326801 

10 

. 324796 

3.711763 

1 .003805 

453586 

- 089615 

.000004 

-.012359 

.985148 

. 446652 

1.351806 

11 

.324796 

3 711763 

1 005122 

449968 

- 303956 

.000035 

- 01 1474 

. 9954 ! 7 

.447906 

1.370036 

12 

.324796 

3.711763 

1 , 005805 

424 1 SO 

- 083788 

.000040 

- 004804 

1 . 053429 

.446844 

! 484516 

13 

. 324796 

3.711763 

1 006159 

419386 

- 028360 

.000068 

-.001587 

I .068149 

.447967 

1 .512120 

14 

.324796 

3.71 1763 

1.006342 

.417156 

- 010573 

000056 

-.000199 

1 071190 

.446853 

1 .519663 

15 

.324796 

3.711763 

1 006438 

.418009 

0 000000 

0 OOOOOO 

0 OOOOOO 

1.071628 

.447951 

1 519042 

10 L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

324796 

3.711952 

0 000000 

. 492308 

0 000000 

0 OOOOOO 

0 OOOOOO 

.976971 

.480971 

1 2S7141 

2 

.324796 

3.71 1952 

484456 

483720 

0 000000 

0 OOOOOO 

0 OOOOOO 

.973753 

.471024 

1.302000 

3 

.324796 

3.71 1952 

. 735740 

465850 

0 000000 

0 OOOOOO 

0 OOOOOO 

. 966760 

.450365 

1 312261 

4 

.324796 

3.711952 

866078 

457678 

0 000000 

0 OOOOOO 

0 OOOOOO 

966684 

.442430 

1 .321479 

5 

.324796 

3.711952 

933684 

458009 

0 000000 

0 OOOOOO 

0 OOOOOO 

971437 

.444927 

1 327593 

6 

.324796 

3.71 1952 

968750 

456423 

0 000000 

0 OOOOOO 

0-000000 

,970518 

442967 

1 .328179 

7 

.324796 

3,711952 

986939 

461355 

0 000000 

0 OOOOOO 

0 oooooo 

.965659 

.445512 

1.315860 

8 

.324796 

3,71 1952 

996373 

4624 71 

0 000000 

0 OOOOOO 

0 oooooo 

. 958959 

.443491 

1 .305468 

9 

. 324796 

3 711952 

1 001267 

45804 1 

0 oooooo 

0 OOOOOO 

0 oooooo 

972361 

-.-445381 

1 .328819 

10 

.324796 

3 711952 

1 003805 

452998 

0 oooooo 

0 OOOOOO 

0 oooooo 

98701 1 

.447114 

1 354826 

11 

.324796 

3.711952 

t 005122 

445893 

0 oooooo 

0 OOOOOO 

0 oooooo 

1 01 1651 

,451088 

1 .397457 

12 

324796 

3 71 1952 

1 005805 

.424325 

0 oooooo 

0 OOOOOO 

0 oooooo 

1 ,055729 

447972 

1,487555 

13 

,324796 

3 711952 

1 006159 

419342 

0 oooooo 

0 OOOOOO 

0 oooooo 

1 069161 

.448344 

1 513616 

14 

324796 

3 711952 

I 006342 

414948 

0 oooooo 

0 OOOOOO 

0 oooooo 

1 069576 

.443818 

1 520597 

15 

.324796 

3 711952 

1 006438 

416480 

0 oooooo 

0 OOOOOO 

0 oooooo 

1 070602 

445884 

1 .519813 

I L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

603192 

0 000000 

0 000000 

553322 

I 015686 

0 OOOOOO 

0 oooooo 

792153 

438316 

1 .003733 

2 

■ .603192 

0.000000 

487298 

549667 

1 017704 

0 OOOOOO 

013515 

789656 

.434048 

1.003225 



J» 1 


J» 1 


J« I 


3 

.603192 

0 000000 

740055 

545474 

1 .022205 

0 000000 

.024305 

.785899 

.428687 

1 .001513 

4 

.603192 

0.000000 

871159 

548796 

1 029408 

0 000000 

.021707 

.786400 

.431573 

.999722 

5 

.603192 

0 000000 

939161 

.550713 

1 037210 

0 000000 

.020673 

. 787053 

. 433440 

.999157 

6 

.603192 

0 000000 

974433 

.549650 

I . 040545 

0 000000 

.021407 

.786519 

,432310 

.993251 

7 

.603192 

0.000000 

992728 

.550306 

1 040647 

0 000000 

.020791 

,787878 

. 433574 

1 000501 

8 

.603192 

0 000000 

1 002218 

543324 

1 021682 

0 000000 

, 020673 

795805 

432379 

1 .015741 

9 

-.603192 

o.oooooo 

1 007140 

.521740 

932421 

0 000000 

.018943 

.831006 

.433569 

1 .078009 

10 

.603192 

0.000000 

1 009693 

.481578 

. 704998 

0 000000 

.014743 

.897835 

.432378 

1 202624 

1 1 

.603192 

0.000000 

1 011017 

455979 

4 1 2788 

0 000000 

008716 

,950845 

.433565 

1,301763 

12 

.603192 

0.000000 

1 011704 

446157 

206980 

0 000000 

,004394 

.9691 14 

.432377 

1 . 338380 

13 

.603192 

0.000000 

1 012061 

.445137 

096339 

0 000000 

002042 

.974001 

.433564 

1.346361 

14 

.603192 

0. 000000 

1 012245 

.443412 

038317 

0 QOOOOO 

,000814 

.975113 

.432377 

1 . 349995 

15 

.603192 

0 . 000000 

I 012341 

.444531 

0 000000 

0 000000 

0 . 000000 

.975328 

.433564 

1.348931 

L 

X 

r 

Z 

fl/RRE.i^ 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

! 

.603192 

1 r670379 

0 000000 

.553635 

1 014024 

001945 

0.000000 

.792674 

.438892 

1.004129 

2 

.603192 

1 . 670379 

487298 

. 550044 

1 016042 

001927 

.013270 

.790183 

. 434636 

1.003619 

3 

.603192 

1 670379 

. 740055 

.645827 

1 020556 

001968 

.023999 

. 786407 

.429242 

1 .001902 

4 

603192 

1 670379 

871159 

549068 

1 027778 

002223 

021524 

786852 

. 432035 

1 000098 

5 

603192 

1 670379 

939161 

550983 

1 035607 

002709 

020527 

787474 

.433834 

.999496 

6 

.603192 

1 670379 

974433 

543954 

1 039012 

003338 

021275 

. 786908 

432763 

.999525 

7 

.603192 

1 . 670379 

992728 

.550595 

i 039078 

.003962 

020689 

. 788272 

.434019 

1 000790 

8 

.603192 

1 670379 

1 002218 

543478 

I 019496 

004273 

.020581 

. 7964 1 4 

. 432833 

I .016404 

9 

.603192 

1 670379 

I 007140 

521613 

928537 

.003778 

.018847 

.832060 

.434014 

1 .079482 

10 

603192 

1 670379 

1 009693 

. .481520 

699385 

00222! 

.014623 

898885 

.432831 

1 . 204088 

1 1 

603192 

I 670379 

1 01 1017 

456301 

408279 

000695 

008620 

951149 

434010 

1 30181 I 

12 

.603192 

1 670379 

1 011704 

446666 

204552 

000125 

004342 

969025 

432831 

I .337648 

13 

.603192 

1 670379 

I 012061 

445684 

095207 

.000015 

002018 

973805 

.434009 

I 345430 

14 

.603192 

I 670379 

I 012245 

443978 

.037869 

- . 000000 

. 000804 

974893 

. 432830 

1 . 349001 

15 

.603192 

1 670379 

1 012341 

445091 

0.000000 

0 000000 

0.000000 

.975103 

.434009 

1.347941 

L 

X 

Y 

Z 

R/RREr 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

! 

.603192 

3.246102 

0 000000 

,554740 

1 .010082 

.001779 

0.000000 

.794141 

. 440542- 

1 .005221 

2 

.603192 

3. 246102 

487298 

.551 197 

1 012144 

001548 

.012495 

791683 

436373 

1 .004681 

3 

603192 

3.246102 

740055 

.547057 

I 016788 

OOlOlO 

022830 

. 787898 

431025 

1 . 002899 

4 

603192 

3.246102 

871 159 

,550127 

1 024157 

.000567 

020624 

.783161 

.433589 

1 .000990 

5 

.603192 

3 246102 

.939161 

.551957 

1 .032120 

.000449 

.019888 

,788613 

.435280 

1 .000234 

6 

.603192 

3.246102 

974433 

.550959 

1 035599 

.000501 

.020750 

.737987 

.434149 

1 .000165 

7 

.603192 

3.246102 

. 992728 

.551345 

I 034852 

.000253 

.020314 

.789618 

.435352 

1 001953 

8 

.603192 

3 246102 

1 .002218 

,543452 

1 .011906 

- 001161. 

.020249 

. 798930 

434188 

1 .019626 

9 

.603192 

3 246102 

1 007140 

520588 

914446 

- .004147 

.018503 

.836244 

. 435339 

1 . 085764 

to 

.603192 

3.246102 

1 009693 

.481048 

.680915 

- 007 I 50 

014225 

. 902580 

.434184 

1 .209512 

1 1 

.603192 

3.246102 

1 .01 1017 

,457151 

394970 

- 006767 

.008334 

.952278 

. 435335 

1 .302386 

12 

.603192 

3.246102 

1 011704 

448065 

. 197827 

-.004179 

.004198 

.969018 

.434183 

1 . 335365 

13 

.603192 

3.246102 

1 012061 

44718’ 

092 1 32 

- ,002081 

.001952 

.973507 

. 435334 

1 .343215 

14 

603192 

3 246102 

1 012245 

.445531 

.036656 

-.000847 

.000778 

.974529 

.434183 

1 ,346615 

15 

603192 

3.246102 

1 .012341 

.446622 

0 000000 

0 000000 

0.000000 

.974726 

.435334 

1 . 345572 

L 

X 

Y 

Z 

B/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/pREF 

ENT 

1 

.603192 

3.577720 

0 000000 

555858 

1 . 005765 

- .000543 

0.000000 

.796249 

.442602 

1 ,007073 

2 

.603192 

3.577720 

. 487298 

,552478 

1 007965 

- . 000905 

012166 

.793818 

. 438567 

1 . 006457 

3 

.603192 

3 577720 

740055 

548743 

1 012983 

- .001992 

.021767 

.790108 

.433566 

1 .004475 

4 

.603192 

3 577720 

871 159 

552153 

1 020775 

- . 003566 

.018992 

.790338 

. 436388 

1 .002280 

5 

.603192 

3 577720 

939161 

554167 

1 029054 

- 005347 

018120 

790654 

433155 

1 001222 

6 

.603192 

3 577720 

.974433 

553 1 36 

I 032196 

- , 007666 

019117 

.790152 

.437061 

1.001332 

7 

.603192 

3.577720 

992728 

552676 

1 028249 

- 01 1696 

,019016 

.792931 

.438234 

1 .005188 

8 

.603192 

3 577720 

1 002218 

542918 

996802 

-.019453 

.019210 

.805053 

.437077 

1 .027852 

S 

.603192 

3.577720 

1 007140 

.518916 

889370 

-.029925 

.017663 

.844463 

.438205 

1 .097848 

10 

.603192 

3 577720 

1 009693 

481522 

. 658058 

-.035255 

.013623 

907675 

. 437065 

1 .215861 

1! 

.603192 

3 577720 

I 011017 

459409 

384742 

- 027281 

.008083 

.953333 

. 438200 

1 .301944 

12 

.603192 

3 577720 

1 01)704 

450695 

194451 

-.015544 

004120 

969756 

.437064 

1 .333857 

13 

.603192 

3 577720 

I 012061 

449838 

09087 I 

-.007610 

001925 

974126 

438199 

1 .340888 

14 

603192 

3 577720 

I .012245 

448212 

036186 

- . 003099 

. 000769 

975128 

. 437064 

1 .344213 

15 

.603192 

3 577720 

1 012341 

449286 

0 000000 

0.000000 

0.000000 

.975322 

.438199 

1 .343194 



5 L 

X 

Y 

Z 

R/RRCr 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

.603192 

3.673313 

0.000000 

554078 

997618 

-.000962 

0 OOOOOO 

799685 

.443088 

1 .012723 

2 

.603192 

3.673313 

487298 

550591 

999704 

- . 000936 

015430 

,797187 

438924 

1 .0121 12 

3 

603192 

3 673313 

740055 

546726 

1 004457 

- 001015 

026728 

793408 

433777 

1 010157 

4 

603192 

3 673313 

871159 

550335 

1 012068 

- 001746 

023571 

793764 

.436836 

I .007953 

5 

.603192 

3 673313 

.939161 

552737 

1 020276 

-.003827 

.021 196 

. 794322 

.439051 

1.006906 

6 

.603192 

3 673313 

.974433 

551560 

I 022078 

- .008212 

.020812 

. 794560 

.438247 

I .00.8068 

7 

.603192 

3 673313 

992728 

549697 

I .012153 

- 016715 

.019656 

799585 

.439530 

I .015816 

8 

.603192 

3.673313 

1 002218 

538234 

970460 

- 032454 

.019092 

.814687 

. 438492 

1 .043764 

9 

.603192 

3.673313 

1 .007140 

516707 

866610 

- 052672 

.017141 

. 850803 

.439616 

1 . 107979 

10 

.603192 

3.673313 

1 009693 

435296 

672168 

- 063115 

013672 

903637 

.438531 

1 206678 

1 1 

603192 

3 673313 

1 011017 

462780 

415384 

- 048579 

008656 

949958 

. 439622 

1 292869 

12 

.603192 

3 673313 

1 011704 

452686 

212468 

- 026608 

004484 

968730 

.438531 

1 330099 

13 

603192 

3 673313 

1 012061 

451372 

099252 

- 012616 

002099 

.973966 

439621 

1 338843 

14 

603192 

3 673313 

1 012245 

449695 

039510 

- 005051 

000839 

975172 

.438530 

1 342499 

15 

. 6031 92 

3.673313 

1 012341 

450706 

0 000000 

0 OOOOOO 

0 . OOOOOO 

975405 

439621 

1 341615 

6 L 

X 

y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

.603192 

3.700869 

0 . 000000 

543218 

957716 

- 001 127 

0 . OOOOOO 

814863 

. 442648 

I .040147 

2 

.603192 

3 . 700869 

. 487298 

539540 

958236 

- .001 125 

, 025504 

812740 

. 438506 

1 040261 

3 

.603192 

3 700869 

. 740055 

534923 

958998 

- 001 1 16 

.044460 

,809851 

.433208 

1 040133 

4 

.603192 

3 . 700869 

.871159 

537239 

962326 

-.001130 

.045507 

.81 1 162 

.435788 

1 .040018 

5 

.603192 

3 . 700869 

.939161 

533513 

967212 

- 001380 

.044001 

.812636 

437615 

1.040921 

6 

603192 

3 . 700869 

.974433 

536118 

.963733 

- 002752 

.041765 

.814919 

.436893 

1 045708 

7 

.603192 

3 . 700869 

. 992728 

532002 

941915 

- 007594 

.037593 

. 824049 

.438396 

1 060688 

8 

.603192 

3 . 700869 

1 002213 

520194 

883318 

- .018407 

.032236 

.841325 

. 437652 

1 .092692 

9 

.603192 

3 . 700869 

1 .007140 

507523 

814777 

-.035467 

025154 

. 864839 

.438926 

1 134365 

10 

.603192 

3 700869 

1 009693 

488404 

697875 

- 052534 

017566 

896627 

.437916 

I 1 94264 

1 1 

603192 

3 700869 

1 011017 

465362 

463027 

- 049582 

010581 

943372 

439010 

1 281051 

12 

603192 

3 700869 

1 011704 

452593 

.222493 

- 028865 

.004397 

967591 

.437925 

1.328643 

13 

. 603 1 92 

3. 700869 

1 012061 

451 125 

099391 

- .013989 

.002139 

973147 

.439010 

1.338011 

14 

.603192 

3 . 700869 

1 012245 

443476 

.033128 

- . 005642 

. 000830 

.974303 

.437925 

1 .341564 

15 

.603192 

3 . 700869 

1 012341 

450489 

0 OOOOOO 

0 . OOOOOO 

0 OOOOOO 

.974521 

.439011 

1 .340657 

7 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

.603192 

3.708812 

0 . 000000 

510990 

.801450 

- . 000576 

0.000000 

.867156 

.443109 

1 . 134312 

2 

.603192 

3.708812 

,487298 

506903 

797586 

- . 000553 

. 036897 

. 865940 

. 438948 

1 . 136365 

3 

.603192 

3.708812 

. 740055 

501219 

787856 

-.000527 

. 062584 

. 865490 

433801 

1 . 140909 

4 

.603192 

3.708812 

.871159 

502301 

781075 

-,000455 

066476 

.869669 

.436835 

1.145429 

5 

.603192 

3.708812 

,939161 

502607 

777361 

- 000600 

.067944 

.873419 

.438987 

I . 150088 

6 

603192 

3.708812 

974433 

498001 

756896 

- 001738 

.068301 

879642 

.438063 

1.162557 

7 

603192 

3 708812 

992728 

489456 

690590 

- 003853 

063270 

897526 

4393U0 

1 194433 

8 

.603192 

3 708012 

1 002218 

475714 

582219 

- 004352 

051210 

921467 

438355 

1 240341 

9 

603192 

3 708812 

1 007140 

465273 

462772 

002625 

035173 

945460 

.439897 

1 283985 

10 

.603192 

3 708812 

1 009693 

451940 

,177580 

013437 

016433 

.971208 

. 438928 

1 . 334382 

11 

.603192 

3.708812 

1.011017 

452756 

- 059416 

011596 

. 002798 

972291 

44021 1 

1 .334907 

12 

.603192 

3.708812 

1 .011704 

451672 

- 085963 

000966 

- 000765 

.971975 

.439015 

1 335753 

13 

603192 

3.708812 

! .012061 

452349 

- 045208 

- 001568 

- 000717 

.973190 

. 440222 

t 336620 

14 

603192 

3 708812 

1 012245 

450976 

- 017854 

- 001065 

- 000377 

973481 

439017 

1 338647 

15 

.603102 

3.700812 

1 012341 

452188 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

973542 

. 440225 

1 337295 

8 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

003192 

3 711102 

0 000000 

46 7764 

4 34607 

• 000020 

0 OOOOOO 

946292 

442C42 

1 202372 

2 

6031 92 

3 711102 

487298 

464094 

427063 

• 000023 

029969 

944849 

.438499 

1 284458 

3 

603192 

3 711102 

. 740055 

458959 

409744 

- 000020 

.047514 

943873 

433199 

1 .288855 

4 

.603192 

3.711102 

.871 159 

459893 

397624 

000012 

.046873 

.947570 

.435781 

I .292851 

5 

.603192 

3.711102 

,939161 

460070 

. 384940 

.000006 

.046998 

951211 

.437624 

1 .297620 

6 

.603192 

3.711102 

974433 

.456278 

315279 

-.000142 

040337 

957647 

.436954 

I 310731 

7 

603192 

3 711102 

992728 

453592 

152439 

- 000438 

0I646I 

966698 

438487 

1 326248 

8 

603192 

3 71 1 102 

1 002218 

451342 

076691 

- 000466 

- 008769 

969873 

437745 

1 333253 

9 

.603192 

3 711102 

I .007140 

450410 

164984 

000854 

- 012842 

974641 

438988 

1 340916 

10 

603192 

3 711102 

I 009693 

448753 

035909 

001642 

- 004909 

976761 

438324 

1 345815 

II 

603192 

3 711102 

1 011017 

450739 

f 107776 

000582 

- 002059 

974606 

439329 

1 340500 

12 

.603192 

3 711102 

1 011704 

448289 

. 060753 

001491 

- 001313 

977810 

438342 

1 347819 


o 


13 .603192 3,711102 1012061 -.448355 

14 .603192 3,711102 1 012245 447106 

15 .603192 3,711102 1 012341 448064 

J* 17 K« 9 L X Y Z R/RPEF 

1 603192 3711762 0000000 456471 

2 .603192 3 711762 487298 453211 

3 .603192 3.711762 740055 449086 

4 .603>''2 3.711762 871159 451004 

5 .6031^2 3.711762 939161 452194 

6 .603192 3.711762 974433 451498 

7 .603192 3711762 992723 453393 

6 .603192 3 711762 1 002218 452112 

9 603192 3 711762 1 007U0 449808 

10 .603192 3 711762 1 009693 448127 

11 .603192 3.711762 1011017 448837 

12 .603192 3.711762 1 011704 .446573 

13 .603192 3.711762 1 012061 447199 

14 .603192 3 711762 1 012245 445904 

15 603192 3 711762 1 012341 447034 

J« 17 10 L X Y Z R/RREF 

1 .603192 3.711952 0000000 454551 

2 .603192 3 711952 487298 451374 

3 .603192 3711952 740055 .447225 

4 .603192 3 711952 871159 448761 

5 .603192 3.711952 939161 449734 

6 .603192 3711952 974433 449699 

7 603192 3711952 992728 452293 

8 .603192 3 711952 1.002218 .451209 

9 .603192 3.711952 I 007140 .448892 

10 .603192 3.711952 1 009693 448321 

11 .603192 3.711952 1.011017 .448864 

12 .603192 3.71 1952 1 011704 446258 

13 .603192 3.711952 1 012061 446441 

14 .603192 3 711952 I 012245 .445388 

15 .603192 3 711952 1 012341 446211 

J. 18 K« i L X Y Z R/RRFF 


1 

1 . 206385 

0 OOOOOO 

0 OOOOOO 

527146 

2 

1 . 206385 

0 OOOOOO 

493455 

527 1 36 

3 

I . 206385 

0 , OOOOOO 

749406 

529003 

4 

1 206385 

0 OOOOOO 

882166 

531892 

5 

1 .206385 

0 OOOOOO 

,951027 

532035 

6 

1 . 206385 

0,000000 

986745 

532663 

7 

1 206385 

0 , OOOOOO 

I 005271 

531 192 

8 

1 . 206385 

0,000000 

1 014831 

.521072 

9 

1 206385 

0,000000 

1 0 1 9865 

493375 

10 

1 206385 

0 OOOOOO 

1 022451 

456389 

I ! 

1 . 206385 

0 OOOOOO 

1 023792 

434221 

12 

I . 206385 

0,000000 

1 024487 

427146 

13 

I 2063S5 

0 OOOOOO 

1 024848 

425249 

14 

1 . 206385 

0 , OOOOOO 

I 025035 

,424843 

15 

1 , 206385 

0 OOOOOO 

1 025132 

424723 

L 

X 

Y 

Z 

R/RREF 

1 

1 206385 

I .670379 

0 OOOOOO 

527649 

2 

1 .206385 

1 670379 

493455 

527623 

3 

1 206385 

1 670379 

749406 

529422 

4 

1 .206385 

I .670379 

.882166 

532248 

5 

1 206385 

1 ,670373 

951027 

532415 

6 

I . 206385 

1 670379 

986745 

533043 

7 

1 206335 

1 .670379 

1 005271 

531474 

8 

I 206385 

I .670379 

1 014881 

521095 

9 

i .206385 

i .670379 

I 019865 

493179 




•7 


-.040119 
-.015878 
0 000000 

0/AREF 
146750 
■ I43I4I 
.135088 
. 129967 
. 124570 
095854 
035915 
012431 
050338 
005660 
- .042374 

- 029288 

- 013646 

- 005223 
0 000000 

U/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 

U/AREF 
I 049503 
1 048358 
I 047825 
1 052508 
I 060370 
1 066438 
I 064719 
1 029646 
909937 
665987 
337077 
196155 
091851 
036630 
0 000000 

U/AREF 
1 048172 
1 047060 
1 046595 
I 051343 
I 059266 
1 065320 
1 063208 
I 026967 
905417 


.001946 
001609 
0 000000 

V/AREF 
000000 
- 000002 
- 000003 
000006 
000004 
000001 
000005 
.00000! 
000003 
.000005 
.000009 
. 000008 
.000015 
000012 
0 000000 

V/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 

V/AREF 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 000000 
0 OQOOOO 
0 000000 
0 000000 
0 000000 

V/AREF 
001011 
.000965 
00091 1 
000998 
001283 
00 1 704 
002038 
.001892 
000935 


-.000725 

- 000328 
0 000000 

W/AREF 
0 000000 
011321 
016887 
,014880 
.015262 
.012620 
. 002639 

- 007941 

- 007976 
-001660 
- . 003079 
-001802 
-.000796 
-000100 
0 000000 

U/AREF 
0 OOOOOO 
0 . OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 
0 OOOOOO 

W/AREF 
0 OOOOOO 
012090 
016975 
017007 
020010 
020685 
021 198 
020750 
018659 
0 1 3928 
008174 
.004148 
001945 
000776 
0 OOOOOO 

W/AREF 
0 OOOOOO 
01 1896 
016779 
016900 
.019900 
020592 
02! 121 
020672 
018562 


979862 

.980398 

.980502 

T/TREF 
970723 
968525 
.965960 
968580 
. 970787 
970255 
969055 
,969937 
978079 
. 978870 
980023 
.982437 
. 983656 
983927 
984003 

T/TREF 
. 973800 
.971475 
. 968638 
.971075 
. 973064 
971592 
969273 
. 969959 
.978399 
979387 
. 980764 
983122 
984339 
984481 
984242 

T/TREF 
. 776884 
, 776485 
776571 
. 777067 
776001 
.775390 
.777414 
. 792586 
836991 
. 904903 
.951007 
.966352 
.971068 
.972080 
97227! 

T/TREF 
.777393 
.776978 
777001 
. 777423 
. 776320 
. 775704 
777370 
. 793436 
.838260 


.439326 

.438341 

.439327 

P/PREF 
.443107 
.438946 
.433799 
.436833 
.438984 
.438069 
.439363 
.438543 
.439947 
. 438658 
439870 
.438730 
. 439890 
.438737 
439883 

P/PREF 
442642 
. 438498 
.433199 
.435780 
.437620 
436925 
.438395 
.437654 
.439196 
.439080 
.440229 
.438726 
.439450 
.438476 
439179 

P/PREF 

409531 

.409314 

.410808 

.413316 

.412860 

.413022 

.412956 

.412995 

.412950 

412988 

.412947 

.412986 

.412946 

.412986 

.412946 

P/PREF 

.410191 

.409952 

.411361 

.413782 

.413324 

.413483 

.413417 

.413456 

.413412 


1.350567 
I .352815 
1.351800 

ENT 

1 328404 
1 329201 
1 330538 
1 .331875 
1 . 333503 
1 ,333594 
1 329715 
1 332501 
1 346366 
1 349474 
1 . 350209 
1 356276 
1 .357197 
1 359148 
I 357877 

ENT 

1 . 334864 
1 .335418 
1 . 336446 
1 337972 
1 339550 
1 337566 
1 331307 
1 333528 
1 ,347905 
1 , 349954 
1.351 197 
1 . 357604 
1 359060 
1 . 36054 1 
1 , 359208 

ENT 

1 .003653 
1 003145 
1 001839 
1 .000298 
.998817 
.997560 
1 001271 
1 .028697 
1 .110325 
1 .238420 
1 .327698 
1 .358719 
1 .367075 
1 .369016 
1 369447 

ENT 

1 003928 
1 003411 
1 002077 
1 .000487 
.993943 
.997680 
1 .001645 
1.029782 
!. 112185 


to 1 .206385 t 

11 1.206385 1 

12 1.206385 1 

13 I.2C6385 1 

14 1 .206385 I 

15 I .206385 1 

J« 18 K* 3 L X 

1 1.206385 3 

2 1 . 206385 3 

3 1 205385 3 

4 1 206335 3 

5 1 206385 3 

6 1 . 206385 3 

7 1 . 206385 3 

8 1 . 206385 3 

9 1 206385 3 

id 1 .206385 3 

1 1 1 206385 3 

12 1.206385 3 

13 1 . 206385 3 

14 1 .206385 3 

15 1 206385 3 

J. 18 K» 4 L X 

1 I . 206385 3 

2 I .206385 3 

3 1 206385 3 

4 I 206385 3 

5 1.206385 3 

6 1 206385 3 

7 1 206385 3 

8 I 206385 3 

S 1 . 206385 3 

10 1.206385 3 

1! 1.206385 3 

12 I 206385 3 

13 1.206385 3 

14 1 206385 3 

15 1.206385 3 

J« 18 5 L X 

1 1 206385 3 

2 1 . 206385 3 

3 1 . 206385 3 

4 1 . 206385 3 

5 1.206385 3 

6 I 206385 3 

7 I . 206385 3 

8 1 206385 3 

9 1 206385 3 

10 1.206385 3 

11 1 . 206385 3 

12 1 206385 3 

13 1.206385 3 

14 1.206385 3 

15 1.206385 3 

J« 18 K» 6 L X 

1 I 206385 3 

2 I 206385 3 

3 1 206385 3 

4 I . 206385 3 

5 1 206385 3 

6 1.206385 3 


670379 

1 022451 

4564 1 1 

670379 

1 023792 

434583 

670379 

1 024487 

427632 

670379 

1 024848 

425768 

670379 

1 .025035 

.425373 

670379 

1 025132 

425250 

Y 

Z 

R/RREF 

246102 

0 000000 

528940 

246102 

493455 

528931 

246102 

, 749406 

530705 

246102 

882166 

533456 

246102 

951027 

533621 

246102 

986745 

.534157 

245 1 02 

1 005271 

532132 

246 1 02 

I 014831 

520870 

246102 

1 019865 

492444 

246102 

I 02245! 

456532 

246102 

1 023792 

435648 

246102 

I 024487 

. 429004 

246102 

I 024848 

427208 

246102 

1 025035 

.426833 

246102 

1 025132 

.426709 

Y 

Z 

R/RREF 

577449 

0 000000 

52966! 

577449 

493455 

523694 

577449 

749406 

.531685 

577449 

882166 

,534804 

577449 

951027 

.535155 

577449 

986745 

,535388 

577449 

1 005271 

532352 

577449 

I 014881 

519774 

577449 

1 019865 

491611 

577449 

1 022451 

457671 

577449 

I 023792 

.437762 

577449 

I 024487 

431245 

577449 

1 024848 

429471 

577449 

1 025035 

429037 

577449 

1 025132 

. 423974 

Y 

Z 

R/RREF 

673157 

0 000000 

525053 

673157 

493455 

, 525935 

673157 

749406 

,527678 

673157 

.882166 

530817 

673157 

951027 

.53115! 

673157 

986745 

530634 

673157 

1 005271 

526086 

673157 

1 014881 

513033 

673157 

1 019865 

483416 

673157 

I 02245! 

.458777 

673157 

1 023792 

4391 13 

673157 

1 024487 

432178 

673157 

1 024848 

43027! 

673157 

1 025035 

429859 

673157 

1 025132 

429738 

Y 

Z 

R/RREF 

700802 

0 000000 

510630 

700802 

493455 

510389 

70,0802 

749406 

.511595 

700802 

882166 

513707 

700802 

.951027 

512731 

700802 

986745 

510354 


660699 
383439 
194301 
090998 
036293 
0 000000 

U/AREF 
1 045211 
I 044201 
1 043958 
1 048907 
1 056961 
I 062708 
1 058825 
1 018488 
891 764 
646306 
374435 
189940 
.089017 
035512 
0 000000 

U/AREF 
1 041305 
I 040383 
1 040 341 
1 045465 
I 053418 
I 057835 
1 049720 
1 002451 
871682 
632447 
.369427 
188450 
088478 
035314 
0 000000 

U/AREF 
I 028258 
I 027032 
1 026257 
1 030508 
I 037110 
I 038054 
I 022759 
968891 
846324 
632736 
379836 
135163 
091665 
036583 
0 000000 

U/AREF 

966939 

964416 

960473 

960864 

962472 

954439 


- .000487 
-001088 
- . 000788 
- . 000407 
- 000168 
0.000000 

V/AREF 

000214 

.000019 

- 000473 

- 00I0I9 

- 001435 

- 001872 

- 002952 

- 005348 

- 003675 

- 0 1 0399 

- 008233 

- 004746 

- 002315 

- 000936 
0 000000 

V/AREF 

- 001616 

- 001791 

- 002468 

- 003773 

- 005568 

- 008196 

- 0 1 2888 

- 020430 

- 028275 

- 029336 

- 020951 

- 011597 

- 005634 

- 002288 
0 000000 

V/AREF 
- 001128 

- 001031 

- 000925 

- 00 1 386 

- 003042 

- 006883 

- 014385 

- 026130 

- 037718 

- 039059 

- 026829 

- 013970 

- 006464 

- 002555 
0 000000 

V/AREF 

- 001 141 

- 001099 

- 000985 

- 000920 
-.001149 
-002259 


013818 

008097 

.004109 

.001927 

000769 

0.000000 

W/AREF 
0 000000 
.01 1389 
.016086 
016332 
.019434 
020234 
020848 
020407 
.018261 
.013512 
. 007904 
004016 
00 1 885 
000752 
0 000000 

y/AREF 
0 000000 
.011663 
.016084 
,01568! 
.018413 
019260 
020012 
.019720 
.017697 
.013172 
007788 
. 003984 
,001874 
000749 
0 000000 

U/AREF 
0 000000 
014936 
.021102 
020451 
.021967 
021627 
021213 
.020013 
.017503 
.013224 
.008019 
004129 
001941 
.000775 

e 000000 

W/AREF 
0 000000 
021667 
.032872 
035209 
037533 
035587 


905870 

.951277 

.966830 

.970971 

.971965 

.972153 

T/TREF 
.778717 
. 778284 
778212 
. 778460 
777234 
. 776694 
. 779493 
796419 
842294 
.908639 
.952096 
. 966939 
970904 
971858 
972038 

T/TREF 
. 780673 
780234 
780201 
. 780533 
779406 
779372 
.783707 
802726 
848633 
.91 1634 
953014 
. 967493 
971412 
.972357 
.972537 

T/TREF 
785865 
.785421 
. 785474 
.786136 
. 785643 
787028 
, 793899 
814230 
.855210 
.910536 
951227 
966573 
970774 
.971786 
971978 

T/TREF 

809400 

809280 

810078 

811580 

812393 

.816696 


.41345^ 

.413409 

.413448 

.413408 

.413447 

.413408 

P/PREF 
.411895 
.41 1658 
.413001 
4 1 5274 
.414748 
.414876 
414793 
.414831 
414782 
.414823 
414779 
.414821 
.414778 
.414821 
.414778 

P/PREF 
.413492 
.413285 
.414821 
.417433 
417103 
.417266 
. 4 1 7208 
.417237 
.417197 
.417228 
.417194 
.417226 
.417193 
.417226 
417193 

P/PREF 

.413406 

.413081 

.414478 

.417294 

417295 

.417623 

.417659 

.417727 

.417638 

.417733 

.417697 

417732 

.417696 

.417731 

.417636 

P/PREF 

.413304 

. 4 1 3048 

.414431 

.416915 

.416539 

.416804 


I .239719 
1,327633 
1.358069 
1.366271 
1.368178 
I .368601 

ENT 

I 004655 
I .004103 
1 002666 
I 000915 
999214 
998119 
1 003239 
1 033832 
I 1 18204 
I .243378 
1 327475 
1 356483 
I 364334 
1 366154 
1.366566 

ENT 

1 .006630 
I 006039 
I 004489 
1 002567 
1 000857 
I 000639 
I 008496 
I 042897 
I 127382 
1 .246233 
1 326185 
! 354435 
1 362165 
I 363979 
1 .364374 

ENT 

1.016099 
I .015617 
1 .014342 
1 .012790 
I 01 1901 
I 014080 
1 026461 
1 063381 
1 139037 
I 243530 
1 322068 
I 351977 
1 360257 
I 3621^ 
1.362620 

ENT 

I 059060 
I 059104 
I 059147 
1 .059364 
1.061232 
I 068838 



7 1.206385 

8 I .206385 

9 1 206385 

10 1.206385 

11 1 . 206385 

12 1.206385 

13 1 206385 

14 1.206385 

15 1.206385 

J. 18 K* 7 L X 

1 1 206385 

2 .1 -.206385 

3 1.206385 

4 1 206385 

5 1 . 206385 

6 i 206385 

7 1 206385 

8 1 . 206385 

9 I .206385 

10 1.206385 

1 1 1 206385 

12 1.206385 

13 1 .206385 

14 1 206385 

15 I . 206385 

J« 18 K» 8 L X 

1 1.206385 

2 1.206385 

3 1.206385 

4 1 . 206385 

5 1 206385 

6 1.206385 

■7 1.206385 

8 1 .206385 

9 1 206385 

10 1.206385 

11 1 . 206385 

12 1.206385 

13 ’.206385 

14 1 .206385 

15 1.206385 

J« 13 K* 9 L X 

1 1 206385 

2 1 206385 

3 1 206385 

4 I . 206385 

5 1.206385 

6 I . 206385 

7 I 206385 

8 1.206385 

9 1 206385 

10 1 206385 

11 ! . 206385 

12 1.206385 

13 1.206385 

14 1.206385 

15 1.206385 

J* 18 K* 10 L. X 

1 1.206385 

2 1.206385 

3 1 . 206385 


3.700802 

1 .005271 

503644 

3.700802 

1 .014881 

491417 

3.700802 

1 019365 

474552 

3 700802 

I 022451 

454728 

3.700802 

1 023792 

, 438444 

3.700802 

I 024487 

431980 

3.700802 

I 024848 

430170 

3 700802 

1 025035 

429796 

3.700802 

1 025132 

429670 

1 

Z 

R/RREF 

3. 708787 

0 000000 

472979 

3.708787 

493455 

.472562 

3 708787 

.749406 

473377 

3 708737 

882 166 

■475202 

3 708787 

951027 

473865 

3 708787 

986745 

470264 

3 708787 

1 005271 

462584 

3.708737 

I 014881 

,452546 

3.708787 

I 019865 

.442349 

3-708787 

1 022451 

.435270 

3 708787 

1 023792 

432795 

3 708787 

1 024487 

431721 

3 708787 

1 024843 

431228 

3.708787 

1 025035 

431106 

3 708787 

1 025132 

,431067 

Y 

Z 

R/RREF 

3.711094 

0 000000 

435130 

3,711094 

. 493455 

435065 

3 7! 1094 

.749406 

,436391 

3.71 1094 

882166 

438376 

3.71 1094 

951027 

437540 

3.71 1094 

986745 

.436160 

3.711094 

1 005271 

434260 

3.711094 

1 014881 

432882 

3.711094 

1 019865 

431562 

3.71 1094 

I ,022451 

431095 

3. 71 1094 

I . 023792 

431903 

3.711094 

1 . 024487 

.432354 

3.711094 

1 024848 

432483 

3.71 1094 

I . 025035 

432541 

3.71 1094 

1 025132 

.432516 

Y 

z . 

R/RREF 

3 711760 

0 000000 

426772 

3.711760 

493455 

426733 

3.711760 

.749406 

, 428350 

3.711760 

.882166 

43031 1 

3.711760 

951027 

. 430S87 

3.711760 

.986745 

.431 165 

3.711760 

I 00527 I 

431255 

3.711760 

I .014881 

. 43C388 

3.711760 

1 .019865 

430216 

3.711760 

1 022451 

.430754 

3.711760 

I 023792 

432088 

3.71 1760 

1 .024487 

432919 

3.711760 

I 024848 

433178 

3.711760 

1 . 025035 

.433227 

3,711760 

I .025132 . 

.433241 

Y 

Z 

R/RREF 

3 71 1952 

0 000000 

. 42564 1 

3.711952 

. 493455 

. 425734 

3.711952 

749406 

. 427307 


. 924533 

- 005665 

.031775 

860383 

- 012239 

. 026098 

756022 

- 020184 

019756 

592347 

- 024004 

.013724 

371115 

- 018572 

008187 

. 192193 

-.009958 

.004143 

090006 

- 004634 

001921 

035881 

- 001831 

000760 

0 000000 

0 000000 

0.000000 

U/AREF 

V/AREF 

W/AREF 

767467 

- 000395 

0.000000 

762929 

- 000376 

.025195 

754527 

- 000321 

. 038386 

, 749956 

- 000267 

042001 

743842 

- 000370 

. 045976 

718767 

- 000780 

045275 

658724 

-.001359 

040567 

562121 

- 001271 

030826 

.431316 

000017 

. 020006 

284995 

000674 

010494 

. 185545 

- 000609 

.005251 

108030 

- 001009 

. 002603 

.052784 

- 000711 

.001 13! 

021292 

- 000323 

.000450 

0 000000 

0 000000 

0 . 000000 

0/AREF 

V/AREF 

W/AREF 

.384368 

-.000002 

0 000000 

380397 

- 000002 

.015084 

.373548 

000006 

.021622 

369643 

.000020 

023416 

.358128 

000006 

.026569 

318684 

- 000044 

.022590 

25740! 

- 000128 

013563 

215543 

- . 000075 

. 005549 

183266 

.000165 

.00383! 

121974 

.000062 

003593 

■ 086025 

- . 000090 

002331 

045874 

000286 

.001113 

.021920 

000399 

. 000497 

.008926 

.000432 

.000178 

0 000000 

0.000000 

0 000000 

U/AREF 

V/AREF 

W/AREF 

125999 

- .000001 

0 000000 

124393 

- 000002 

004896 

121788 

- 000000 

006428 

.120582 

000001 

. 006763 

. 116081 

- . 000003 

. 0084 I 9 

. 100830 

-.000002 

.006858 

.078738 

-.000002 

003326 

.060629 

- .000001 

.000122 

060822 

- 000002 

000671 

041633 

-.000001 

.000989 

029796 

- 00000! 

.000170 

.016007 

- . 000003 

. 000095 

008102 

- 000004 

.000030 

003447 

-.000004 

.000031 

0 000000 

0.000000 

0.000000 

U/AREF 

V/AREF 

W/AREF 

0 000000 

0 000000 

0 000000 

0 000000 

0 000000 

0 000000 

0 000000 

0.000000 

0.000000 


.827816 

.416925 

1.089142 

848777 

,417104 

! . 127752 

878987 

4I7I25 

1 , 184320 

917442 

.417187 

1 257413 

95I4I4 

417142 

1 .323134 

965755 

.417187 

1 351080 

969713 

.417142 

1 . 358898 

970663 

.417187 

1 360704 

.970843 

.417142 

1 361115 

T/TREF 

P/PREF 

ENT 

.874095 

.413428 

I .179293 

.874132 

,4131 10 

I . 1 7984 1 

875659 

,414517 

1 . 181007 

.878215 

.417329 

I . 182632 

. 880606 

.417288 

1 I87I88 

887820 

. 4 1 7509 

1 . 200572 

902459 

.417463 

1 228432 

922740 

.417583 

1 .267109 

.944175 

.417655 

1.308418 

959669 

.417715 

I . 338499 

965144 

.417709 

1.349210 

967579 

4 I 7724 

I 353958 

968653 

.41771 1 

1 . 356080 

968959 

.417724 

I ,356662 

969019 

.417711 

1 356795 

T/TREF 

P/PREF 

ENT 

. 949825 

.413298 

1 . 324940 

949378 

.413041 

1 . 324394 

949665 

.414425 

1 323183 

.951033 

.41691! 

1 , 322686 

. 952009 

.416542 

1 325055 

955658 

.416820 

1 331815 

.960173 

.416965 

1 . 340447 

.963713 

.417174 

1 .347101 

.966733 

.417205 

1 ,352975 

967863 

417241 

1 .355142 

. 965984 

.4172! 1 

1,351498 

.965043 

.417240 

1 .349613 

. 964687 

.417211 

! . 348959 

.964624 

,417240 

1 .343798 

.964614 

.41721 1 

1.348815 

T/TREF 

P/PREF 

ENT 

96873! 

413428 

1.361835 

.967960 

.413109 

1 . 360738 

. 967702 

.414515 

1 .358383 

.968703 

.417328 

1 356676 

.968438 

.417237 

1 .356209 

.968342 

.417515 

1 .355724 

.968088 

.417492 

1 . ^5255 

.969262 

.417643 

I .357361 

970830 

417669 

1 . 360403 

969560 

.417642 

1 357948 

96663 I 

.417670 

1 352172 

964753 

.417660 

1 .348507 

.964204 

.417672 

1 .347418 

.964072 

.417662 

1 .347173 

.964060 

.417670 

1.347139 

T/TREF 

P/PREF 

ENT 

.971001 

.413297 

1 . 366477 

.970185 

.413041 

1 365209 

.969853 

.414424 

I 362730 



4 

1.206385 

3.711952 

.882166 

. 429449 

5 

1 .206385 

3.711952 

951027 

.429262 

6 

1 .206385 

3.711952 

986745 

. 429802 

7 

1 .206385 

3.711952 

1 005271 

.430307 

8 ■ 

1 .206385 

3.711952 

1 014881 

430H2 

9 

1 .206385 

3.71 1952 

1 .019865 . 

.429572 

10 

1 .206385 

3.71 1952 

1 022451 

.430357 

11 

1 206385 

3.711952 

1 023792 

.431592 

12 

1 . 206385 

3.71 1952 

1 .024487 

432475 

13 

1 .206385 

3.71 1952 

1 024848 

432684 

14 

1 .206385 

3.71 1952 

1 025035 

432913 

15 

1 .206385 

3 71 1952 

I .025132 

. 433077 

1 L 

X 

Y 

Z 

R/RRtr 

1 

1 .809577 

.0.000000 

0 000000 

.508572 

2 

1 . 809577 

0 . 000000 

.499612 

.509019 

3 

1 .809577 

0.000000 

758757 

.510306 

4 

1 .809577 

0 000000 

893173 

51 1 193 

5 

1 .809577 

0 . 000000 

962893 

511602 

6 

1.809577 

0 . 000000 

.999057 

512522 

7 

I .809577 

0.000000 

1 017814 

509327 

8 

1 . 809577 

0 . 000000 

1 .027544 

495692 

9 

1 .809577 

0.000000 

1 . 032590 

464920 

10 

1 .809577 

0 . 000000 

1 .035208 

.430391 

1 1 

I . 809577 

0 000000 

1 036566 

410993 

12 

1 . 809577 

0.000000 

1 037270 

.405251 

13 

I . 809577 

0 . 000000 

1 037635 

.403343 

14 

1 .809577 

0 . 000000 

1 037825 

.403276 

15 

1 .809577 

0 . 000000 

1 037923 

402885 

2 L 

X 

Y 

Z 

R/RREF 

i 

1 . 809577 

1 .670379 

0 OOOOOO 

. 509084 

2 

1 .809577 

1 .670379 

.499612 

509517 

3 

I .809577 

1 .670379 

. 758757 

.51.0763 

4 

1 809577 

1 .570379 

.893173 

51 1628 

5 

1 .809577 

1 670379 

962893 

.512056 

6 

1.809577 

1 670379 

.999057 

.512940 

7 

1 .809577 

1 .670379 

I .017814 

.509591 

8 

1 . 809577 

1 .670379 

1 .027544 

. 495688 

9 

I . 809577 

1 .670379 

1 032590 

464813 

10 

1 . 809577 

1 .670379 

1 035208 

. 430536 

1 1 

1 . 809577 

1 .670379 

1 036566 

411376 

12 

1 .809577 

1 .670379 

1 037270 

. 405704 

13 

1 . 809577 

1 .670379 

1 037635 

.403815 

14 

1 .809577 

I 670379 

1 037825 

403750 

15 

1 809577 

1 670379 

1 037923 

403362 

3 L 

X 

Y 

Z 

R/RREF 

1 

1 .809577 

3 246102 

0 OOOOOO 

.510285 

2 

1 .809577 

3.246102 

.499612 

510730 

3 

1 . 809577 

3.246102 

. 758757 

.512007 

4 

1 .809577 

3 246102 

893173 

512903 

5 

I . 809577 

3.246102 

96289.3 

513314 

6 

1 .809577 

3.246102 

999057 

.513995 

7 

1 . 809577 

3.246102 

1 017814 

.510091 

8 

I 809577 

3.246102 

1 .027544 

495459 

9 

1 809577 

3.246102 

I .032590 

.464520 

10 

1 .809577 

3.246102 

1 035208 

.431088 

n 

1.809577 

3 246102 

1 .036566 

.412534 

12 

1 . 809577 

3 246102 

I .037270 

407018 

13 

1 809577 

3.246102 

I .037635 

.405169 

14 

1 809577 

3 246102 

1 037825 

405108 

15 

1 809577 

3.246102 

I 037923 

.404726 


J- 19 K* 4 L 


X 


Y 


Z 


R/RREF 


0 OOOOOO 

0 OOOOOO 

0.000000 

, 970304 

.416910 

1.361342 

0 OOOOOO 

0 OOOOOO 

0 . OOOOOO 

.970370 

■ .416543 

1 . 360968 

0 OOOOOO 

0 OOOOOO 

0.000000 

.969792 

.416819 

1.359475 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

968971 

.416955 

1 .357686 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.969898 

.417165 

1 . 359233 

0 OOOOOO 

0 OOOOOO 

0.000000 

.971386 

.417280 

1.362001 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

969877 

417393 

1 .358893 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

. 966768 

.417249 

1 352985 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

964755 

.417233 

1 . 349065 

0 OOOOOO 

0.000000 

0 . OOOOOO 

.964217 

.417201 

1.348051 

0 OOOOOO 

0.000000 

0 . OOOOOO 

.964273 

.417446 

1 .347844 

0 OOOOOO 

0 OOOOOO 

0.000000 

.964166 

.417558 

1.347491 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 075137 

0 OOOOOO 

0 OOOOOO 

. 765722 

. 389424 

1.003529 

1 074449 

0 OOOOOO 

.009159 

. 765708 

389760 

1 003158 

I 074943 

0 OOOOOO 

014047 

.765691 

.390737 

1 .002124 

1 079728 

0. OOOOOO 

017335 

764937 

.391031 

1 .000442 

1 087755 

0-000000 

020132 

. 763328 

.390520 

.998018 

1 094781 

0 . OOOOOO 

.020977 

762642 

.390870 

. 996404 

1 088521 

0 OOOOOO 

021584 

.766776 

.390540 

1 .004315 

1 038209 

0 OOOOOO 

.020912 

. 788484 

. 390845 

I .044018 

895203 

0 OOOOOO 

.018396 

. 840002 

. 390533 

1 141 1 14 

639939 

0 OOOOOO 

.013389 

.908103 

.390839 

I .272301 

368297 

0.000000 

.007777 . 

.95021 1 

.390530 

I . 356083 

186978 

0 OOOOOO 

.003953 

.964433 

.390837 

1 .384147 

087724 

0 OOOOOO 

.001853 

.968231 

. 390529 

1.392225 

035029 

0 OOOOOO 

. 000742 

.969155 

. 390837 

1 393646 

0 OOOOOO 

0 OOOOOO 

0 . OOOOOO 

. 969330 

.390529 

1 . 394438 

U/AREF 

y/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 074347 

.000129 

0 . OOOOOO 

. 766090 

. 390004 

1 . 003607 

I . 073686 

.000068 

. 009032 

.766056 

.390319 

1 .003222 

i 074240 

-.000056 

.013915 

.765981 

.391234 

1.002144 

1 079095 

-.000124 

.017247 

.765160 

.391478 

1 .000393 

1 087169 

-.000061 

.020048 

.763519 

.390965 

.997914 

1 094049 

.000062 

.020913 

. 762877 

.391310 

.996386 

! 087153 

- .000032 

.021529 

. 767246 

.390982 

1 .004723 

1 035560 

-.000690 

. 020850 

. 789376 

.391284 

1 . 045203 

89M49 

- 001936 

.018315 

341144 

390975 

1 . 14277! 

635934 

-.002901 

. 0 1 3306 

.908816 

.391278 

1.273128 

365871 

-.002516 

.007726 

. 950400 

.390971 

1.355848 

185802 

-.001486 

003928 

. 964439 

.391276 

1 . 383538 

087189 

- 000726 

001847 

.968192 

. 390970 

1.391518 

034818 

- 000294 

.000738 

.969105 

.391276 

1 .392920 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

969278 

.390970 

1 393704 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 072440 

-.000975 

0 OOOOOO 

. 767 1 30 

.391455 

I 004023 

I 071848 

- 001138 

.008778 

. 767075 

.391769 

1 .003601 

I 072550 

- 001604 

.013514 

766933 

.392675 

1 .002414 

I 077547 

-.002250 

.016831 

.766010 

.392889 

1 .000507 

1 085530 

-.002926 

.019707 

. 764325 

. 392338 

.997986 

I 091710 

- 003824 

020662 - 

763935 

.392658 . 

.996949 

1 082545 

-.005537 

021329 

.769127 

.392325 

1 .006790 

I 027181 

- 008372 

.020643 

. 792439 

.392621 

1.049451 

879590 

-.011327 

.018076 

844559 

.392315 

1.147699 

625785 

-.0! 1685 

.013094 

910751 

.392614 

1.275186 

.360310 

- 008434 

007608 

. 950980 

.392311 

1 .355150 

183241 

- 004687 

.003873 

964507 

.392613 

1.38199! 

086040 

- 002263 

001822 

968264 

.392310 

1 .389759 

034367 

- 000913 

000728 

.969155 

.392612 

1 .391122 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.969324 

.392310 

1.391889 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 



1 

1 .809577 

3.577180 

0 . 000000 

510299 

1 067716 

- 002215 

0 . OOOOOO 

.769417 

.392632 

1 .007005 

2 

1 ,809577 

3.577180 

,499612 

.510763 

1 067133 

- 002315 

.009367 

. 769363 

.392962 

1 .006568 

3 

1 . 809577 

3 577180 

. 758757 

.512223 

1 067840 

-.00283! 

.014001 

. 769302 

. 394054 

1.005340 

4 

1 .809577 

3.577180 

.893173 

.513438 

I 072717 

- 003992 

.016683 

.768580 

.394618 

1 .003445 

5 

1 809577 

3.577180 

.962893 

513854 

1 080064 

- 005714 

019209 

. 767222 

. 394240 

I .001348 

6 

1 .809577 

3 577180 

. 999057 

513997 

1 083908 

- .008412 

,0201 18 

. 767696 

.394593 

I .001855 

7 

1 . 809577 

3.577180 

1 017814 

509073 

1 070139 

-.013006 

,020806 

. 774525 

. 394294 

1 .014663 

8 

1 .809577 

3 577180 

1 027544 

493735 

1 009530 

-.019257 

.020170 

.799166 

. 394577 

I .059833 

9 

1 . 809577 

3.577180 

1 032590 

463793 

861236 

- 024 ! 4 1 

.017670 

.850137 

. 394287 

1 . 156003 

!0 

1 . 809577 

3,577180 

1 035208 

432U1 

614543 

- 022559 

.012857 

.913058 

. 394570 

1 ,277169 

i I 

1 .809577 

3.577180 

1 036566 

414304 

356264 

- .015043 

. 007526 

.951678 

.394284 

1 . 353825 

12 

1 ,809577 

3 577180 

1 037270 

.408873 

181863 

- 008118 

.003848 

.965015 

. 394569 

1 . 380053 

13 

1 .809577 

3 577180 

1 037635 

407055 

085491 

- 003924 

.001812 

. 968624 

. 394283 

1 387695 

14 

1 809577 

3 577180 

1 037825 

406979 

034160 

- 001592 

. 000724 

969504 

. 394568 

1 . 389059 

15 

1 . 809577 

3.577180 

1 037923 

406615 

0 000000 

0 000000 

0 OOOOOO 

.969671 

. 394283 

1 . 389796 

5 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 . 809577 

3.673002 

0 000000 

504732 

1 047543 

- ,001416 

0 OOOOOO 

, 777498 

. 392428 

1 .022056 

2 

1 . 809577 

3 673002 

4C96I2 

505077 

1 046686 

-.001321 

012117 

,777444 

. 392669 

I .021707 

3 

1 .809577 

3.673002 

758757 

506313 

1 046664 

- 001207 

.018222 

.777477 

. 393647 

I . 020752 

4 

1 .809577 

3.673002 

893173 

507385 

1 050319 

- 001533 

020784 

777159 

.394319 

I .019470 

5 

1 . 809577 

3 673002 

.962393 

507373 

1 055189 

- 002797 

022424 

. 776758 

.3941 10 

1 .018951 

6 

1 809577 

3 673002 

999057 

506378 

1 053878 

- 005953 

022272 

.779164 

. 394552 

I .022914 

7 

1 809577 

3 673002 

1 017814 

500043 

1 032233 

- 01 1964 

.021825 

.788561 

.394314 

1 .040477 

8 

1 809577 

3.673002 

1 027544 

485035 

956438 

- 019902 

. 020293 

.813563 

. 394607 

1 086631 

9 

1 809577 

3 673002 

1 032590 

458956 

825924 

- 025392 

017346 

85919! 

.394331 

1 I 73224 

10 

I 809577 

3.673002 

1 035208 

431309 

598926 

- 022604 

012650 

914904 

. 394606 

1 230738 

11 

1 .809577 

3 673002 

1 036566 

414583 

352522 

- 013559 

007481 

.951143 

. 394328 

I 352698 

12 

1 ,809577 

3 673002 

1 037270 

409260 

180777 

- . 006472 

. 003832 

.964188 

. 394604 

1 378358 

13 

1 ,809577 

3 673002 

1 037635 

407471 

085017 

- 002865 

. 00 1 803 

967744 

394327 

1 . 385868 

14 

1 809577 

3 673002 

1 037825 

407391 

033975 

- 001107 

000720 

96861 I 

. 394604 

1 387218 

15 

1 809577 

3.673002 

1 037923 

407036 

0 000000 

0 000000 

0 OOOOOO 

968776 

.394327 

1 . 387938 

6 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 809577 

3 , 700736 

0 000000 

485277 

966027 

- 001146 

0 , OOOOOO 

.808869 

.392525 

I 080146 

2 

1 . 809577 

3.700736 

499612 

485604 

964557 

- 001105 

,016052 

808944 

, 392826 

1 079955 

3 

1 .809577 

3.700736 

, 758757 

486613 

962822 

- 001009 

,025273 

809308 

393820 

1 . 079544 

4 

1 ,809577 

3 700736 

,893173 

485939 

963391 

- ,000981 

029919 

809612 

. 394272 

1 ,079616 

5 

1 , 809577 

3 700736 

962S93 

, 485688 

962384 

- 001180 

032183 

810764 

, 393778 

1.082310 

6 

I , 809577 

3 700736 

. 999057 

482741 

950188 

- 0020 1 6 

,030707 

.816402 

.394111 

I .092492 

7 

1. , 809577 

3.700736 

1 ,017814 

474768 

912820 

- .004442 

027280 

829659 

. 393896 

1 117653 

8 

1 , 809577 

3,700736 

I ,027544 

461598 

836462 

- . 0084 I 2 

022253 

854039 

. 394223 

I I635I5 

9 

1 809577 

3,700736 

1 032590 

443501 

710099 

- 011435 

01 6865 

833309 

. 393966 

t 229720 

10 

1 809577 

3 700736 

1 035203 

425510 

627359 

- 010452 

01 1655 

926516 

394242 

I 304034 

11 

1 809577 

3 700736 

I 036566 

4 1 3289 

320995 

- 000048 

006920 

953248 

393967 

1 357389 

12 

1 809577 

3 700736 

1 037270 

409037 

167277 

- 002624 

003566 

963826 

.394240 

t 378141 

13 

I 809577 

3 700736 

1 037635 

407490 

078955 

- 001072 

.001678 

966811 

393966 

I . 384506 

14 

1 809577 

3 . 70073.6 

1 037825 

407463 

031583 

- 000395 

000689 

967548 

. 394240 

1 . 385598 

15 

1 809577 

3.700736 

1 037923 

407121 

0 000000 

0 000000 

0 OOOOOO 

,967688 

.393966 

1 .386264 

7 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 .809577 

3 708762 

0 000000 

445300 

736580 

-.000292 

0 OOOOOO 

881322 

.392452 

I 218073 

2 

1 . 809577 

3.708762 

,499612 

445614 

734878 

- 000281 

.015815 

881253 

.392699 

1 .217635 

3 

1 809577 

3.708762 

758757 

446645 

732384 

- 000252 

025095 

.881433 

. 393687 

1 .216759 

4 

1 809577 

3 708762 

.893173 

447128 

730494 

- 000238 

030231 

881992 

.394364 

1 .217003 

5 

1 .809577 

3.708762 

962893 

445780 

722713 

- 000295 

,033149 

.884129 

.394127 

1 .221426 

6 

I 809577 

3.708762 

999057 

442637 

696795 

-.000455 

032281 

891200 

.394479 

1 .234685 

7 

1 809577 

3 708762 

1 017814 

435760 

638665 

- 000725 

028155 

904551 

.394167 

1 261055 

8 

1 809577 

3 708762 

1 027544 

427256 

544530 

- 000870 

.020673 

923275 

. 394475 

1 .297346 

9 

1 .809577 

3 708762 

1 .032590 

4 1 9006 

428921 

- 000940 

.013276 

.940852 

.394223 

1 .332395 

10 

1 809577 

3.708762 

1 035208 

414140 

322408 

- 001213 

.008050 

952584 

.394503 

1 .355329 

II 

I .809577 

3 708762 

1 036566 

410731 

22I7I5 

- 001168 

004967 

.959823 

.394229 

1.370150 

12 

1 809577 

3 708762 

1 037270 

409146 

125364 

- 000751 

.002706 

.964209 

.394502 

1 378542 

13 

1 809577 

3 708762 

I 037635 

408205 

060642 

- 000447 

.001298 

.965761 

. 394228 

1 . 382033 

14 

1 .809577 

3 708762 

1 037825 

.408312 

024420 

- . 000200 

000517 

966177 

.394502 

1 382483 



15 I 809577 3 . 708762 I . 037923 


407995 


J« 19 


J» 19 


J» 20 


K> 8 


K* 9 


K« 10 


K« 1 


L 

X 

Y 

2 

R/RREF 

1 

1 .809577 

3.71 1085 

0 000000 

412043 

2 

1 809577 

3.7! 1085 

.499612 

412496 

3 

1 . 809577 

3. 711085 

758757 

413715 

4 

1 .809577 

3.711085 

,893173 

414348 

5 

I .809577 

3 71 1085 

962893 

413738 

6 

1 .809577 

3 71 1085 

999057 

.4131 19 

7 

1 . 809577 

3.711085 

1 017814 

411657 

8 

1 809577 

3.71 1085 

1 02^544 

.410576 

9 

1 809577 

3 71 1085 

1 032590 

409386 

10 

1 809577 

3 711085 

1 035208 

409372 

11 

I 809577 

3 71 1085 

I 036566 

4092.35 

12 

1 809577 

3 71 1085 

1 037270 

409393 

13 

1 .809577 

371 1085 

1 037635 

. 409047 

14 

1 809577 

3.711085 

1 037825 

. 409294 

15 

1 .809577 

3.71 1085 

1 , 037923 

.409013 

U 

X 

Y 

2 

R/RREF 

I 

1 .809577 

3 71 1758 

0 000000 

405219 

2 

1 809577 

3 711758 

,499612 

405618 

3 

1 809577 

3 711758 

758757 

406816 

4 

1 809577 

3 711758 

893173 

407724 

5 

1 809577 

3 711758 

962893 

407763 

6 

1 , 809577 

3 7 1 1 758 

999057 

. 408084 

7 

1 809577 

3.711758 

1 .017814 

.407812 

8 

1 .809577 

3.711758 

1 ,027544 

4080 1 6 

9 

1 809577 

3.711758 

1 . 032590 

,408018 

10 

1 . 809577 

3.711758 

1 035208 

,408744 

11 

1 .809577 

3,711758 

1 036566 

409134 

12 

1 . 809577 

3 711758 

1 037270 

409687 

13 

1 809577 

3 711758 

1 037635 

409512 

14 

1 809577 

3 711758 

1 037825 

409792 

15 

1 809577 

3 71 1758 

I 037923 

. 409529 

L 

X 

r 

2 

R/RREF 

1 

1 . 809577 

3.711952 

0 OOOGOO 

.404502 

2 

I . 809577 

3,71 1952 

.499612 

404958 

3 

1 .809577 

3 71 1952 

. 758757 

,406157 

4 

I 809577 

3 71 1952 

.893173 

406840 

5 

1 . 809577 

3.711952 

.962893 

406665 

6 

1 . 809577 

3.711952 

999057 

40707S 

7 

I . 809577 

3.71 1952 

1 017814 

407053 

8 

I , 809577 

3.71 1952 

I 027544 

.407429 

9 

1 809577 

3.711952 

1 . 032590 

.407531 

10 

1 . 809577 

3.711952 

I .035208 

. 408389 

11 

1 . 809577 

3.71 1952 

1 , 036566 

408798 

12 

1 . 809577 

3.711952 

1 037270 

.409431 

13 

1 . 809577 

3.711952 

I .037635 

409277 

14 

1 . 809577 

3.71 1952 

1 037825 

. 4096 1 4 

15 

1 .809577 

3.7! 1952 

I .037923 

409571 

L 

X 

Y 

2 

R/RREF 

1 

2.366370 

0.000000 

0 . 000000 

. 492294 

2 

2.366370 

0,000000 

, 505295 

. 492064 

3 

2.366370 

0 . 0.00000 

. 767383 

491765 

4 

2 . 366370 

0.000000 

.903333 

492161 

5 

2.366370 

0.000000 

.973847 

493232 

6 

2.366370 

0.000000 

I 010422 

493526 

7 

2.366370 

0.000000 

1 .029393 

. 488649 

8 

2:366370 

0.000000 

I .039233 

.471449 

9 

2.366370 

0.000000 

I .044337 

.439269 

10 

2 366370 

0,000000 

! . 046984 

406633 

I! 

■ 2.366370 

0.000000 

I .048357 

. 389838 



0 000000 

0 OOOOOO 

0 oooooo 

966257 

394228 

1 383027 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


352680 

.000009 

0 oooooo 

.952616 

.392519 

1 .358128 


3521 12 

000009 

007648 

.952302 

.392821 

1 357085 


351819 

.000011 

012109 

.951898 

.393815 

I . 354908 


350791 

.000013 

.015669 

.951540 

. 394269 

I 353570 


341872 

000007 

.017708 

.951759 

,393779 

I .354680 


.318547 

- 000010 

,015807 

. 954009 

.394! 19 

1 . 358697 


281097 

- . 000048 

01 1968 

. 956907 

.393917 

I . 364758 


234328 

- . 000052 

.008041 

960258 

, 394^9 

1 370977 


180538 

- 000074 

005729 

962432 

. 394006 

1 375678 


138489 

- 000135 

003774 

963127 

394277 

1 376691 


10421 1 

- 000019 

002490 

962794 

. 394009 

1 376398 


062365 

- 0000 17 

001378 

963072 

. 394275 

I 376583 


031052 

- 000021 

. 000676 

. 963235 

. 394008 

1 .377281 


012687 

. 000070 

. 000248 

. 963304 

.394274 

I .377049 

0 

, 000000 

0 . OFOOOO 

0.000000 

. 9633 1 8 

. 394009 

1 . 377447 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


114375 

OOOOOO 

0 OOOOOO 

.968494 

. 392452 

1,390021 


1 1 423S 

. OOOOOO 

002276 

.968147 

. 392698 

1 388975 


1 14353 

- oooooo 

00351 1 

967725 

393686 

I 386732 


114187 

• 000001 

004799 

967231 

394363 

1 384790 


1 10906 

- 000002 

. 005583 

. 966562 

.394129 

1 , 383778 


, 102688 

- .000001 

,004927 

966677 

.394485 

1.383509 


090361 

- , 000002 

. 003629 

.966573 

.394183 

1 383736 


075961 

- ,000001 

.002281 

, 966866 

. 394496 

1.383871 


059167. 

- 000001 

.001873 

.966198 

. 394226 

1 .382912 


046230 

- , oooooo 

001028 

965128 

.394491 

1.380398 


,036052 

' . 000002 

.000754 

.963593 

. 394239 

1 , 377676 


022272 

- 000001 

000490 

962911 

.394492 

1 375959 


01 1575 

- 000003 

000221 

962702 

394238 

1 375895 


004089 

- 000002 

0001 14 

962664 

. 394493 

1 . 375464 

0 

000000 

0 oooooo 

0 OOOOOO 

. 962660 

.394237 

1 .375812 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

0 

oooooo 

0 . oooooo 

0.000000 

.970375 

.392519 

1 . 393706 

0 

000000 

0 . oooooo 

0.000000 

. 970028 

. 392820 

1.392580 

0 

oooooo 

0 oooooo 

0 oooooo 

.969611 

.393814 

I .390336 

0 

oooooo 

0 oooooo 

0 oooooo 

.969103 

.394269 

1 .388675 

0 

oooooo 

0 oooooo 

0 oooooo 

, 968320 

. 393782 

1.387793 

0 

oooooo 

0 oooooo 

Q oooooo 

.968182 

.394124 

1 .387032 

0 

oooooo 

0 oooooo 

0 oooooo 

967742 

. 393922 

1 . 386435 

0 

oooooo 

0 oooooo 

0 oooooo 

967685 

.394263 

I .385840 

0 

oooooo 

0 oooooo 

0.000000 

. 966694 

.394016 

1 .384200 

0 

oooooo 

0 oooooo 

0 . oooooo 

. 965422 

. 394268 

1.381298 

0 

oooooo 

0 oooodt) 

0 oooooo . 

.963726 

. 393969 

i . 378320 

0 

oooooo 

0 oooooo 

0 . oooooo 

.962923 

. 394250 

1 .376320 

0 

oooooo 

0 oooooo 

0.000000 

.962661 

.393995. 

1.376153 

0 

oooooo 

0 oooooo 

0 oooooo 

.952679 

. 394327 

1 . 375724 

0 

oooooo 

0.000000 

0.000000 

.962669 

.394282 

1.375768 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT- 

I 

,098152 

0 oooooo 

0 oooooo 

. 755795 

. 372073 

1.003493 

1 

, 098574 . 

0 oooooo 

. 008962 

. 755398 

.371704 

! .003154 

1 

100839 

. 0.000000 

.015358. 

.754375 

.370975 

1 .002039 

I 

. 106212 

0 oooooo 

.019014 

.752968 

.370581 

.999847 

1 

. 1 14420 

0 oooooo 

.020714 

.751250 

. 370540 

.996700 

1 

. 120419 

0 oooooo 

,021738 

. 750856 

. 370567 

.995939 

1 

107488 

0 oooooo 

022049 

. 758200 

.370494 

1.009684 

1 

042230 

0 oooooo 

.021129 

.785931 

.370550 

1 .061789 


880100 

0 oooooo 

.018144 

.843409 

. 370483 

1 .172049 


615145 

0 oooooo 

.012902 

.911252 

. 370545 

1 .306044 


.348966 

0 oooooo 

.007370 

.950344 

.370480 

1 .385248 



J» 20 K» 


J* 20 K* 


J* 20 K= 


J« 20 K- 


12 

2.366370 

0.000000 

1 049070 

. 384759 

.176061 

0 OOQOOO 

,003725 

963053 

, 370544 

1.411154 

13 

2.366370 

0.000000 

1 049439 

383343 

082369 

0 000000 

.001745 

966444 

. 370480 

1.418214 

14 

2.366370 

0 000000 

1 049631 

383087 

032846 

0 000000 

000695 

.967256 

.. 370543 

1.419784 

15 

2.366370 

0.000000 

1 049730 

382960 

0.000000 

0 000000 

0 000000 

967410 

. 370479 

I .420199 

2 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 . 366370 

1 .670379 

0.000000 

, 492790 

1 .097879 

-.000649 

0.000000 

. 756008 

.372553 

1 .003371 

2 

2 366370 

1 670379 

.505295 

■ .492560 

1 .098315 

- 000728 

.008371 

. 755599 

.372178 

1.003016 

3 

2.366370 

1 .670379 

767388 

. 492255 

1 100616 

-.000925 

.015245 

. 754538 

.371425 

1 .001855 

4 

2 . :<56370 

1 .670379 

.903333 

492646 

1 106034 

- 001143 

018929 

.753081 

.371003 

. 999603 

5 

2 . 366370 

1 670379 

.973347 

493713 

1 114219 

- 001324 

020652 

.751355 

.370953 

.996449 

6 

2 366370 

1 670379 

1 010422 

49394) 

! 119937 

- 001559 

021694 

.751059 

. 370979 

. 995873 

7 

2 366370 

1 670379 

1 029393 

.488887 

1 106280 

- 002101 

.022011 

. 758669 

, 370903 

I .010110 

8 

2 . 366370 

1 . 670379 

1 .039233 

,471482 

I 039920 

- 003133 

.021081 

, 786796 

. 370960 

I . 062859 

9 

2 : 366370 

1 .670379 

1 044337 

. 433294 

876961 

- 004332 

.018083 

.844292 

.370893 

1 . 173250 

10 

2 . 366370 

1 670379 

1 .046984 

406875 

6I24S1 

- 004594 

.012847 

,911718 

.370955 

1 . 306399 

11 

2 . 366370 

1 .670379 

1 048357 

390220 

.347528 

- 003362 

.007340 

. 950465 

, 370890 

1.384881 

12 

2.366370 

1 .670379 

I 049070 

385178 

.175397 

-. 001865 

003711 

963072 

. 370954 

I .410569 

13 

2 366370 

1 .670379 

1 .049439 

383769 

0820 70 

- 000895 

.001738 

.966440 

,370889 

1 .417573 

14 

2 366370 

1 .670379 

1 049631 

383515 

032728 

- 000360 

000694 

967246 

. 370954 

1 419135 

15 

2 . 366370 

1 670379 

1 049730 

. 383383 

0 000000 

0 000000 

0 . 000000 

. 967399 

. 370889 

1 4 19549 

3 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

2 . 366370 

3 246102 

0 . 000000 

493760 

1 096519 

- 001851 

0 000000 

. 756924 

. 373739 

1.003797 

2 

2.366370 

3.246102 

. 505295 

. 493563 

1 096985 

- 002011 

008747 

.756511 

. 373385 

1.003409 

3 

2 . 366370 

3.246102 

.767388 

.493344 

1 099349 

- .002495 

014974 

755435 

. 372689 

1 002160 

4 

2 366370 

3.246102 

903333 

493784 

1 104777 

- 003233 

0186M 

.753952 

. 372289 

. 993837 

5 

2 366370 

3 246102 

.973347 

494763 

I 112639 

-.004136 

.020414 

. 752300 

.372210 

.996855 

6 

2 366370 

3,246102 

I .010422 

.494700 

1.117174 

- , 005425 

021512 

, 752428 

. 372226 

.997075 

7 

2 366370 

3 246102 

1 .029333 

489092 

1 101123 

- 007507 

.021854 

. 760888 

.372144 

1 012895 

8 

2 366370 

3.246102 

1 .039233 

471226 

1 031761 

-.010300 

.020905 

. 789857 

.372201 

1 067227 

9 

2.366370 

3 246102 

1 044337 

439281 

867338 

-.012439 

.017890 

.847139 

.372132 

1 .177220 

10 

2.366370 

3.246102 

1 046984 

.407616 

.605265 

-.011593 

,012697 

.913106 

.372196 

1.307436 

11 

2 . 366370 

3.246102 

1 048357 

391345 

.344020 

- 007836 

. 007266 

.950899 

.372129 

1 .383919 

12 

2 . 366370 

3.246102 

1 .049070 

386390 

1 73867 

- 004241 

.003679 

.963263 

.372195 

1.409077 

13 

2 . 366370 

3,246102 

I 049439 

. 384997 

081394 

- 002032 

001724 

. 966576 

.372129 

1 .4*15966 

14 

2 366370 

3.246102 

1 04963! 

384749 

032454 

- 000818 

.000688 

.967369 

.372195 

1 .41 7494 

15 

2 . 366370 

3 246102 

I .043730 

,384621 

0 000000 

0 000000 

0 000000 

967521 

.372128 

1.417905 

4 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF. 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 . 366370 

3 576934 

0 000000 

492721 

I 089414 

- 002485 

0 000000 

.760204 

.374569 

t 008996 

2 

2 366370 

3 576934 

505295 

492546 

1 089853 

- 002584 

009375 

759797 

.374235 

1 008599 

3 

2 366370 

3 576934 

767388 

492473 

1 092103 

- 003059 

015587 

758825 

.37370! 

1 .007369 

4 

2 366370 

3.576934 

903333 

.493077 

1 097102 

- 004095 

.018741 

. 757628 

.373569 

I .005286 

5 

2 . 366370 

3 576934 

973347 

.49384! 

I 103611 

- 005690 

. 020249 

.756531 

. 373606 

1.003210 

6 

2 366370 

3 576934 

1 010422 

.493032 

I 105096 

- 008278 

.02121 1 

757806 

. 373660 

1 005519 

7 

2 366370 

3 576934 

1 029393 

486564 

1 084391 

- 012313 

021484 

767828 

373597 

1 .024254 

8 

2 366370 

3 576934 

1 039233 

468558 

1 011080 

- 016981 

020504 

797451 

.373652 

I 079938 

9 

2 366370 

3 576934 

I 044337 

438092 

847803 

- 019467 

0 1 7520 

852766 

373590 

I 186326 

10 

2 366370 

3 576934 

1 046984 

. 408237 

593453 

- 016671 

012468 

915273 

373648 

1 309742 

11 

2 366370 

3 576934 

1 048357 

.392651 

339274 

- 010460 

.007175 

951447 

.373587 

1.382872 

12 

2 366370 

3 576934 

1 049070 

387813 

171983 

- 005492 

003643 

963471 

.373647 

1 .407310 

13 

2 366370 

3 576934 

1 049439 

386450 

080588 

- 002630 

001708 

966713 

. 373586 

1 .414034 

14 

2 366370 

3.576934 

1 043631 

386202 

032154 

- X501063 

000682 

.967490 

.373647 

1.415536 

15 

2 366370 

3 576934 

1 049730 

386080 

0 000000 

0.000000 

0 000000 

.967639 

.373586 

1,415932 


L 

X 

Y 

Z 

R/RREF. 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 366370 

3 672860 

0 000000 

. 484860 

1 060436 

- 001418 

0 000000 

771937 

374282 

1 031183 

2 

2 366370 

3 672860 

505295 

484610 

1 060696 

- 001371 

011442 

.771514 

.373883 

I 030829 

3 

2.366370 

3 672860 

767388 

484353 

1 062325 

- 001347 

.018790 

; 7706 1 4 

. 373249 

1 029845 

4 

2 366370 

3 672860 

903333 

484659 

1 06583! 

- 001629 

021922 

. 769887 

.373132 

1 028614 

5 

2.366370 

3 672860 

973847 

484700 

1 068952 

- 002594 

022773 

770018 

.373228 

1 .028755 

6 

2 366370 

3 672860 

1 010422 

.482630 

I 064118 

- 00509! 

022772 

. 773533 

.373330 

1 035222 

7 

2 366370 

3 672860 

1 029393 

474977 

1 035220 

- 009549 

022006 

785931 

373299 

! 058560 

8 

2 366370 

3 672860 

1 039233 

458057 

957439 

- 014489 

020234 

.815095 

.373360 

1 113885 
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9 

2.366370 

3 672860 

1 044337 

431896 

801811 

-.016416 

.016909 

.864334 

.373302 

I .209288 

to 

2 366370 

3 672860 

1 046984 

406315 

.566497 

- 012651 

012004 

.918888 

.373358 

I ,317399 

1 1 

2 366370 

3 672860 

1 048357 

392334 

.327292 

- 006504 

006948 

.951484 

373299 

I . 383372 

12 

2 366370 

3 672860 

1 049070 

387847 

. 166514 

- 002704 

. 003532 

962639 

373357 

1 406045 

13 

2 366370 

. 3 672860 

1 049439 

386571 

.078078 

- 001086 

001655 

965665 

373298 

1 412326 

14 

2 366370 

3 672860 

1 049631 

386340 

031162 

• 000396 

000660 

966393 

373356 

I 413728 

15 

2 366370 

3 672860 

1 049730 

386225 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

966532 

373298 

1.414100 

6 L 

X 

Y 

Z 

R/RRCF 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

1 

2.356370 

3 700674 

0 000000 

462132 

,960735 

- .001000 

0 OOOOOO 

810209 

.374424 

I 103293 

2 

2 366370 

3 700674 

505295 

461931 

.960794 

- 000992 

013613 

809806 

. 374075 

1 . 102935 

3 

2 366370 

3 700674 

767388 

461628 

961479 

- 000987 

022753 

. 809058 

. 373484 

I 102206 

-4 

2 366370 

3 700674 

903333 

461417 

.962231 

- 001030 

027130 

808952 

373264 

1 102263 

5 

2 366370 

3 700674 

97384 7 

460259 

.959013 

- 001190 

028327 

310789 

.373172 

1 105877 

6 

2 366370 

3 700674 

1 010422 

456502 

942507 

- 001823 

027237 

.817471 

373177 

1.118652 

7 

2 366370 

3 700674 

1 029393 

448047 

89819! 

- 003528 

. 024096 

832839 

.373151 

I 148238 

6 

2 366370 

3 700674 

1 039233 

434281 

.812084 

- 005810 

.019848 

, 859398 

373220 

1 199737 

9 

2 366370 

3 700674 

1 044337 

416842 

.673432 

- 006557 

.015155 

8C^230 

.373170 

I 270416 

10 

2 366370 

3 700674 

1 046984 

400606 

482991 

-.004593 

010419 

931646 

373223 

1 343272 

1 1 

2 366370 

3 700674 

1 04 8 357 

390939 

285544 

- 001774 

. 006080 

.954419 

.373167 

1 389547 

12 

2 366370 

3 700674 

1 049070 

387664 

. I46S82 

- 000427 

003! 16 

962744 

.373221 

1 406464 

13 

2 366370 

3 700674 

1 049439 

386676 

069105 

- 000076 

.001465 

. 965062 

.373166 

1 .411291 

14 

2 3C6370 

3 700674 

1 04963! 

386507 

027616 

- 000008 

. 000586 

965625 

373221 

I .412360 

15 

2 366370 

3 700674 

1 049730 

386408 

0 OOOOOO 

0.000000 

0.000000 

.965733 

373166 

1 412663 

7 L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

EMT 

! 

2 366370 

3 708739 

0 oooooo 

421913 

7! 125! 

- 000209 

0 OOOOOO 

887139 

.374296 

1 252860 

2 

2 366370 

3 708739 

505295 

421726 

711443 

- .000210 

012342 

886599 

373902 

! 252319 

3 

2 366370 

3 708739 

767388 

421465 

.71 1887 

- 000215 

020768 

885670 

.373279 

1 251317 

4 

2 366370 

3 708739 

903333 

421310 

.710479 

- 000224 

024832 

885742 

373172 

1 251603 

5 

2 366370 

3 708739 

973847 

420261 

.701321 

- . 000252 

. 026007 

888134 

. 373248 

1 256235 

6 

2 366370 

3.708739 

1 010422 

417080 

: .673596 

- 000355 

025141 

.895004 

373288 

1 269806 


2 366370 

3 708739 

1 029393 

41 1048 

614600 

- . 000568 

021408 

. 907943 

.373208 

1 .295691 

8 

2 366370 

3 708739 

1 039233 

403665 

.524612 

- 000734 

.015653 

.924717 

373276 

I 329231 

9 

2 366370 

3 708739 

1 044337 

397084 

420564 

- 000747 

010412 

.939912 

373224 

1 359987 

10 

2 366370 

3 708739 

I 046934 

392259 

.312919 

- 000644 

.006856 

951626 

. 373284 

1 383685 

11 

2 366370 

3 708739 

1 04 8357 

388871 

198929 

-.000497 

.004208 

.95976! 

373223 

1 400364 

12 

2.366370 

3 703739 

1 049070 

387428 

106575 

- 0004 1 1 

. 002245 

. 963487 

373282 

1 407891 

13 

2.366370 

3 708739 

1 043439 

386905 

,050845 

- 000270 

001075 

.964635 

. 373222 

1 .410332 

14 

2 366370 

3 708739 

1 049631 

386850 

020423 

- 000124 

000432 

964926 

373282 

1 410836 

15 

2 366370 

3 708739 

I 049730 

386766 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

964982 

373222 

1 41 1043 

8 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V2AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

! 

2 366370 

3 71 1078 

0 OOOOOO 

392373 

.331350 

000015 

0 OOOOOO 

,954241 

.374419 

1.387325 

2 

2 366370 

3 7! 1078 

505295 

392230 

331798 

0000 14 

. 006268 

.953701 

.374070 

1 . 386744 

3 

2 366370 

3 7M078 

767383 

392037 

33259! 

.000010 

.010676 

.952663 

. 373479 

1 . 385507 

4 

2 366370 

3 711078 

903333 

392037 

., .331318 

.000010 

012903 

952104 

. 373260 

i . 384692 

5 

2 366370 

3 711078 

973847 

39181 1 

.323572 

. 000008 

013412 

952427 

373172 

I 385482 

6 

2.366370 

3 711078 

1 010422 

391161 

303796 

- 000004 

012400 

954038 

.373183 

. 1 388748 

7 

2.366370 

3 71 1078 

I 029393 

390072 

268252 

- 000034 

009713 

956655 

.373165 

1 394 III 

8 

2.366370 

3,71 1078 

1 039233 

389088 

,221953 

- 000053 

006770 

959270 

373241 

1 399335 

9 

2.366370 

3 71 1078 

1 044337 

383388 

175551 

- 000080 

.004625 

.960877 

.373193 

1 . 402689 

10 

2.366370 

3.711078 

I 046984 

388003 

.135508 

- 000054 

.00317! 

.961961 

. 373244 

i .404828 

1! 

2 366370 

3.711078 

I 048357 

387552 

092597 

, 000059 

002097 

962941 

.373190 

I ,406915 

12 

2 366370 

3 711078 

1 049070 

387351 

,052746 

- 000090 

001138 

963574 

.373242 

1 408I3I 

13 

2 366370 

3 71 1078 

! 049439 

387201 

.025941 

- 000121 

.000560 

963814 

.373189 

I .408701 

14 

2 366370 

3,7! 1078 

1 049631 

387227 

010571 

-.000021 

,000201 

963882 

.373241 

1 408763 

15 

2 366370 

3 71 1078 

I 049730 

387168 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

963896 

.373190 

1 .408869 

9. L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 366370 

3 71 1756 

0 OOOOOO 

386593 

. 106836 

OOOOOO 

0 OOOOOO 

.968189 

.374295 

1.415984 

2 

2 366370 

3 711756 

505295 

386392 

107048 

- OOOOOO 

.002082 

.967675 

.373902 

1.415529 

3 

2 366370 

3.71 1756 

767388 

386148 

107435 

-.000001 

003525 

966674 

.373279 

I 414421 

4 

2.366370 

3 711756 

903333 

386315 

, 107036 

-.000001 

.004155 

965978 

.373172 

1 413157 

5 

2.366370 

3.711756 

973847 

386546 

104333 

-.000001 

.004234 

.965604 

.373250 

1 ,412273 
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J-= 21 


J= 21 


6 

2.366370 

3 711756 

1 010422 

386624 

.097675 

- 000001 

,003981 

.965524 

. 373294 

I 412042 

7 

2.366370 

3.711756 

1 029393 ■ 

386576 

.086087 

- 000001 

,003035 

.965446 

.373218 

1.411998 

• 8 

2 366370 

3 71 1756 

1 039233 

386769 

.071413 

- 000001 

002137 

965140 

. 373286 

1 411270 

9 

2.366370 

3 711756 

1 044337 

386997 

056693 

- 000001 

001536 

964406 

.373222 

1 409863 

10 

2 366370 

3 711756 

1 046934 

387252 

044607 

- 000001 

000867 

963916 

. 373278 

1 408775 

1 1 

2 366370 

3 711756 

1 048357 

337296 

031661 

- 000001 

000777 

963686 

373232 

I 408375 

12 

2 366370 

3 71 1756 

1 049070 

387361 

.016711 

- 000001 

, 000482 

.963635 

. 373275 

1 408205 

13 

2 366370 

3 711756 

1 049439 

387315 

.003615 

- 000001 

000210 

963634 

,373230 

1 408271 

14 

2 366370 

3 711756 

1 049631 

387359 

.004049 

- 000001 

. 00C097 

.963642 

,373275 

1 408220 

15 

2 366370 

3 71 1756 

1 049730 

38731 1 

0 000000 

0 000000 

0 000000 

963641 

.373229 

1 408238 

10 1 

X 

Y 

Z 

R/HREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 366370 

3 71 1952 

0 000000 

386067 

0 000000 

0 000000 

0 000000 

969328 

374419 

I 419154 

2 

2 366370 

3 711952 

505295 

385909 

0 000000 

0 000000 

0 000000 

.969321 

. 374070 

1 418644 

3 

2 366370 

3 711952 

767388 

385694 

0 000000 

0 000000 

0 000000 

.968330 

.373479 

1.41751 1 

4 

2 . 365370 

3.711952 

903333 

395752 

0 000000 

0 000000 

0 000000 

967620 

373261 

1 416386 

5 

2 366370 

3 71 1952 

973847 

385845 

0 000000 

0 000000 

0 000000 

967161 

.373174 

1 415578 

6 

2 366370 

3 711952 

I 010422 

3S59G8 

0 000000 

0 000000 

0 000000 

. 966885 

.373187 

1 414993 

7 

2 . 366370 

3 711952 

1 029393 

385104 

0 000000 

0 000000 

0 000000 

966501 

.373170 

141 4232 

8 

2 366370 

3 711952 

1 039233 

386435 

0 000000 

0 000000 

0 000000 

965860 

373242 

i 412810 

9 

2 366370 

3 711952 

1 044337 

386779 

0 000000 

0 000000 

0 000000 

964857 

373187 

1 410839 

10 

2 366370 

3 711952 

1 046984 

387094 

0 000000 

0 000000 

0 000000 

964183 

373229 

1 409396 

1 1 

2 366370 

3 711952 

1 048357 

387194 

0 000000 

0 000000 

0 000000 

.963795 

.373176 

1 408682 

12 

2 366370 

3 711952 

1 049070 

38731 1 

0 000000 

0 000000 

0 000000 

963662 

. 373237 

1 408317 

13 

2 366370 

3 711952 

1 049439 

387231 

0 000000 

0 000000 

0 000000 

963611 

,373188 

1 408287 

14 

2 366370 

3 711952 

1 049631 

387314 

0 000000 

0 000000 

0 000000 

963580 

. 373208 

1 403193 

15 

2 366370 

3 711952 

1 049730 

387313 

0 000000 

0 000000 

0 000000 

963610 

.373218 

1 . 40824 1 

1 L 

X 

r 

2 

R/RREE 

U/APEF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 108760 

0 000000 

0 000000 

476915 

1 113382 

0 000000 

0 000000 

. 746095 

355824 

! 003269 

2 

3, 108760 

0 000000 

512873 

476352 

1 1 20328 

0 000000 

010157 

745423 

. 355084 

1 .002840 

3 

3 108760 

0 000000 

778896 

475740 

1 123463 

0 000000 

017224 

.743947 

.353925 

I .001369 

4 

3 108760 

0 000000 

916880 

476610 

1 129429 

0 000000 

020082 

742384 

.353827 

.998535 

5 

3. 108760 

0 000000 

988451 

477903 

1 137652 

0 000000 

021433 

740596 

. 353933 

.995052 

6 

3 108760 

0 000000 

1 025575 

477407 

1 141233 

0 000000 

022409 

.741113 

.353813 

.996159 

7 

3. 108760 

0 000000 

1 044830- 

470623 

1 120763 

0 000000 

022476 

,751948 

353888 

1.016521 

8 

3 108760 

0 000000 

1 054818 

450552 

1 041767 

0 000000 

021250 

785258 

. 353800 

I 080225 

9 

3,108760 

0 000000 

I 059999 

417665 

864089 

0 000000 

,017885 

847280 

, 353879 

1.201422 

10 

3 108760 

0 000000 

1 062686 

386872 

.591946 

0 000000 

.012447 

914505 

353796 

1 337086 

1 1 

3 108760 

0 000000 

1 064080 

372124 

331113 

0 000000 

006999 

950965 

353877 

1 412179 

12 

3 108760 

0 000000 

1 064802 

367617 

165869 

0 000000 

003512 

962402 

. 353795 

1 436144 

13 

3 108760 

0 000000 

1 065177 

366548 

077348 

0 000000 

00 1 638 

965429 

353877 

1 442341 

14 

3 108760 

0 000000 

1 065372 

366 1 93 

030794 

0 000000 

000653 

.966145 

.353795 

1 443971 

15 

3 108760 

0 ocoooo 

1 065473 

366225 

0 000000 

0 000000 

0 000000 

.966281 

.353876 

1 444123 

2 L 

X 

Y 

Z 

R/RREE 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 108760 

1 . 670379 

0 000000 

477383 

1 119423 

- ,001264 

0 OOOOOO 

746218 

356232 

1.003041 

2 

3. 108760 

1 670379 

512873 

476827 

1 120376 

- 0Q1361 

010083 

745540 

355494 

1 .002598 

3 

3 108760 

I 670379 

778896 

476222 

1 123528 

- 001622 

017123 

.744043 

354330 

1 ,001092 

4 

3 108760 

1 670379 

916880 

477082 

1 129489 

- 001974 

.020012 

, 742455 

354212 

998234 

5 

3 108760 

t 670379 

988451 

473344 

1 . 1 37589 

- 002387 

021 391 

. 740695 

354307 

994817 

6 

3 108760 

I 670379 

1 025575 

477753 

1 140781 

- 002958 

022379 

.741353 

.354187 

.996189 

7 

3. 108760 

I .670379 

1 044830 

470812 

1 119594 

- 003848 

022447 

. 752442 

354259 

1 .017031 

8 

3 108760 

1 670379 

1 054818 

450607 

1 039754 

- 0G5035 

021211 

785991 

.354173 

1.081182 

9 

3 108760 

1 670379 

1 059999 

417771 

861638 

- 005933 

017838 

847952 

.354250 

1 .202253 

10 

3. 108760 

1 670379 

I 062686 

38715! 

590167 

- .005487 

.012410 

.914810 

.354170 

1 .337146 

1 1 

3 108760 

1 670379 

1 0640SO 

372483 

330243 

- . 003690 

006980 

,951044 

354248 

1 411750 

12 

3 103760 

1 670379 

1 064S02 

367997 

165482 

- 001930 

003503 

962424 

.354169 

1 .435584 

13 

3 108760 

. 1 670379 

1 065177 

. 366929 

077176 

- . 00094 1 

001635 

965438 

354247 

1 441755 

14 

3 108760 

1 670379 

1 065372 

366577 

030726 

- 000377 

000651 

966151 

354 169 

I 443374 

15 

3 108760 

I ,670379 

1 065473 

366607 

0 000000 

0 000000 

0 OOOOOO 

966286 

354247 

1 443529 

3 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 108760 

3 246102 

0 000000 

477993 

1 117873 

- 002421 

0 OOOOOO 

747270 

.357190 

1 ,003942 

2 

3 108760 

3 246102 

512873 

477476 

1 . 1 18835 

- 002588 

.010014 

.746599 

. 356483 

1 003475 


3 

3. 108760 

3.246102 

778896 

476953 

I I2I980 

- 003095 

.016936 

.745122 

.355388 

1 .001930 

4 

3 108760 

3 246102 

916880 

477820 

1 127774 

- 003901 

019791 

.743585 

355300 

999137 

5 

3. 108760 

3 246102 

968451 

478913 

1 135220 

- 004991 

021226 

.742036 

. 355375 

996140 

6 

3 108760 

3 246102 

1 025575 

477981 

1 136905 

- 006558 

.022235 

.743243 

.355256 

.998543 

7 

3 108760 

3 246102 

1 044830 

470548 

1 113388 

- . 003774 

.02230! 

.755121 

.355320 

1.020880 

8 

3.108760 

3 246102 

1 054818 

450150 

1 031295 

- 011238 

.021042 

,789159 

. 355240 

I .085980 

9 

3.108760 

3 246102 

I 059999. 

417773 

852935 

-012481 

017665 

.850489 

.355312 

I .205848 

10 

3 108760 

3 246102 

1 062686 

. 387853 

584287 

- 010757 

012289 

915904 

355236 

I 337774 

1 1 

3 108760 

3 246102 

1 064080 

373470 

327567 

- 006894 

006925 

951373 

355309 

1 4)0745 

12 

3 108760 

3 246102 

1 064802 

369047 

164337 

- 003646 

003480 

962575 

. 355235 

1 434175 

13 

3 108760 

3 246102 

1 065177 

367986 

076672 

- 001734 

001624 

965550 

. 355309 

I . 440264 

14 

3 108760 

3 246102 

1 065372 

367642 

030530 

- 000696 

.000647 

.966254 

355235 

1 .441854 

15 

3. 108760 

3 246102 

1 065473 

367667 

0 OOOOOO 

0.000000 

0 OOOOOO 

.966387 

355309 

1 442014 

L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.108760 

3.576510 

-0 OOOOOO 

475642 

1 107255 

- .002468 

0.000000 

.751995 

.357681 

1 .012285 

2 

3 108760 

3 5766 1 0 

.512873 

.475133 

1 108175 

- , 002575 

.010567 

.751332 

. 356986 

1.01 1822 

3 

3. 108760 

3 576610 

, 778S96 

.474679 

I 1 1 1 104 

- 003020 

.017547 

. 749972 

. 355996 

I 010380 

4 

3 . 1 08760 

3 576610 

916880 

.475529 

1 116149 

-.003937 

. 020076 

. 748797 

. 356074 

1 .008077 

5 

3 108760 

3 576610 

988451 

476236 

1 121657 

- 005412 

021230 

.748011 

. 356230 

1 006421 

6 

3 108760 

3 576610 

1 025575 

474522 

1 119752 

-.007801 

022037 

. 750536 

.356146 

1 .0! 1274 

7 

3 1 08760 

3 576610 

1 044830 

466377 

1 09168! 

- 011158 

021965 

. 763798 

.356218 

1 036296 

8 

3 108760 

3 576610 

1 054818 

446362 

1 006591 

- 014437 

.020623 

797875 

.356141 

1 . I0I69! 

9 

3. 108760 

3 576610 

1 059999 

415888 

830635 

- 015317 

.017259 

,856509 

.356212 

1 .216582 

10 

3 108760 

3 575610 

1 062636 

.387913 

. 570526 

- 012136 

.012023 

.918075 

.356138 

1.340855 

1 1 

3 108760 

3.576610 

1 064030 

.374270 

321423 

- .007134 

, 006804 

.951745 

. 356209 

1 .410089 

12 

3 . 1 08760 

3 576610 

1 064802 

370005 

161652 

- , 003593 

. 003426 

.962521 

.356137 

1 . 432609 

13 

3 108760 

3 576610 

I 065177 

. 368977 

075478 

-.00168! 

.001600 

. 965397 

.356209 

1.438488 

14 

3 108760 

3 576610 

1 065372 

368642 

030064 

- . 000672 

.000638 

. 966078 

.356137 

1 . 440026 

15 

3 108760 

3 576610 

I 065473 

, 368667 

0 OOOOOO 

0 . OOOOOO 

0 OOOOOO 

. 966208 

. 356209 

1 .440180 

L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.108760 

3.672673 

0 OOOOOO 

465523 

I 069086 

- : 00 1267 

0 OOOOOO 

.767572 

.357322 

I .042180 

2 

3. 108760 

3 672673 

.512873 

464962 

1 069857 

- 00126$ 

.012055 

. 766897 

. 356578 

1.041766 

3 

3 108760 

3 672673 

.778896 

464305 

I 072134 

-.001325 

.019875 

. 765645 

.355493 

1.040653 

4 

3. 108760 

3,672673 

916880 

.464709 

I .075363 

-.001 584 

.022415 

.765055 

.355528 

I .039490 

5 

3 108760 

3.672673 

988451 

.464512 

1 076790 

-.002347 

.023033 

. 765707 

. 355680 

1 .040552 

6 

3. 108760 

3 672673 

1 025575 

46 1 504 

1 067912 

-.004299 

022960 

.770571 

.355622 

1 . 049886 

7 

3. 108760 

3 672673 

1 044830 

. 452668 

1 031772 

-.007468 

021963 

. 785797 

. 355705 

1 .078943 

8 

3 108760 

3 672573 

I 054818 

43452! 

943155 

-.010359 

.019956 

.818455 

. 355636 

1 . 142327 

9 

3. 108760 

3 672673 

1 059999 

40887! 

775758 

-.010499 

016368 

. 869.966 

.355704 

I .244136 

10 

3 108760 

3 672673 

1 062686 

385427 

. 535824 

-.007007 

.011358 

. 922699 

.355633 

1 .351086 

1 1 

3 . 1 08760 

3 672673 

1 064080 

.373601 

304234 

- 002935 

. 006454 

.952088 

.355701 

1.41 1608 

12 

3 108760 

3 672673 

1 064802 

369794 

. 15348! 

- 000916 

003254 

961703 

. 355632 

1.431716 

13 

3 108760 

3.672673 

I 065177 

36S875 

071720 

- 000265 

.001520 

. 964286 

355701 

1.436391 

14 

3. 108760 

3 672673 

1 065372 

368569 

028578 

- , 000072 

.000605 

. 964898 

.355632 

1 .43838! 

15 

3 108760 

3 672673 

1 065473 

368596 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.965015 

.355701 

1 .438514 

L 

X 

Y 

2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

3.108760 

3 . 700594 

0 OOOOOO 

,440551 

954020 

- .000874 

0.000000 

.81 1562 

.357534 

1 . 126479 

2 

3. 108760 

3 . 700594 

512873 

.440031 

.954607 

- . 000892 

.013220 

.810921 

.356831 

1.126122 

3 

3 108760 

3 700594 

778896 

439317 

955910 

-.000945 

.021932 

.809907 

.355806 

I . 125444 

4 

3. 108760 

3 700594 

916880 

439218 

956222 

- .001014 

.025020 

.810103 

.355812 

I . 125818 

5 

3.108760 

3 . 700594 

.98845! 

437944 

951007 

- .001 139 

025731 

812542 

.355848 

1.130520 

6 

3 1 08760 

3 . 700594 

I 025575 

.433685 

930461 

- ;oor622 

024721 

820224 

.355719 

1 145678 

7 

3. 108760 

3 . 700594 

1 044830 

425057 

880558 

- . 002772 

.021889 

.837078 

. 355806 

1 . 1 78656 

8 

3. 108760 

3 . 700594 

I 054818 

411361 

. 787929 

- ,003987 

.018205 

.864776 

.355735 

1 .233714 

9 

3 108760 

3 700594 

1 059999 

394897 

641810 

- 003784 

.013984 

.901019 

.355809 

1 .306594 

10 

3. 108760 

3.700594 

1 062686 

.360219 

447443 

-.002005 

.009524 

.935604 

.355734 

1.377459 

1 1 

3.108760 

3.700594 

1 064080 

372395 

257885 

-.000347 

.005458 

.955455 

.355807 

1 .418432 

12 

3 108760 

3.700594 

1 064802 

. 369698 

.131 122 

.000147 

.002776 

.962226 

.355733 

1 .432643 

13 

3. 108760 

3.700594 

1 065177 

.369061 

.061462 

.000144 

.001301 

. 964084 

.355806 

1 . 436400 

14 

3 108760 

3 700594 

I 065372 

.368815 

024523 

000069 

.000520 

.964528 

. 355733 

1 437445 

15 

3 108760 

3 700594 

I 065473 

368859 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.964613 

. 355806 

1 .437504 



J* 21 


J* 21 


J» 21 


J« 21 


L 

X 

Y 


z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.108760 

3.708709 

0 

000000 

401085 

690743 

- 000157 

0 000000 

890932 

.357339 

I .283957 

2 

3.108760 

3 708703 


512873 

400544 

691087 

- 000164 

.01 1680 

.890285 

.356598 

1 283716 

3 

3 108760 

3 708709 


778396 

399749 

691316 

- 000182 

0 I 9 I 87 

889362 

355522 

I 283404 

4 

3. 108760 

3 . 708709 


916380 

. 399572 

688976 

- 000189 

02 1 422 

.889861 

. 355563 

I .284352 

5 

3.108760 

3 , 708709 


988451 

, 390540 

.678302 

- . 000200 

.021812 

892513 

.355702 

I .289513 

6 

3. 108760 

3 . 708703 

1 

025575 

395431 

648659 

- 000277 

.020805 

.899282 

. 355604 

I . 303369 

1 

3.108760 

3.708709 

1 

044330 

. 390205 

. 590335 

- 000425 

.017496 

.91 1460 

.355656 

1 . 328068 

8 

3 . 10 S 760 

3 708709 

1 

054318 

383358 

5061 16 

- 000505 

.013006 

926365 

.355593 

1 .358669 

9 

3. 103760 

3 708709 

1 

059999 

378127 

.406617 

- . 000405 

. 009084 

940587 

. 355662 

1 . 387854 

10 

3 108760 

3 . 708709 

1 

062686 

373300 

292154 

- 000263 

006155 

.952571 

. 355595 

1 .412778 

n 

3. 108760 

3 708703 

1 

064080 

.370398 

, 1 75585 

- . 000254 

. 003659 

.960209 

. 355660 

I 428559 

12 

3 108760 

3 . 708709 

1 

054802 

36920 1 

.091366 

- 000266 

001912 

.963145 

. 355594 

1 .434785 

13 

3 108760 

3 708709 

1 

065177 

.368939 

.043241 

- .000179 

.000911 

. 364006 

. 355659 

1 .436474 

U 

3,108760 

3 708709 

1 

065372 

368790 

0 1 7328 

-.000081 

. 000366 

964216 

. 355593 

1 .437020 

15 

3 108760 - 

3 708709 

1 

065473 

368843 

0 . 000000 

0 000000 

0 000000 

964257 

355659 

1 436998 

L 

X 

Y 


-2 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 108760 

3.71 1068 

0 

000000 

374598 

315335 

000016 

0 000000 

.954435 

357530 

1.413578 

2 

3.108760 

3.71 1068 


512873 

374100 

315380 

.000014 

. 006399 

. 953826 

356826 

1.41 3423 

3 

3.108760 

3.71 1068 


778396 

373400 

.315007 

000009 

010196 

.952870 

. 355802 

1 .413070 

4 

3 108760 

3 71 1068 


916880 

.373443 

312796 

000010 

.010780 

952776 

. 355808 

1 412865 

5 

3 108760 

3 711068 


988451 

37331 1 

305037 

000010 

.010853 

953217 

. 355846 

1 413721 

6 

3 108760 

3,71 1068 

1 

025575 

372677 

285644 

- . 000002 

. 0 1 0054 

954505 

355722 

1 .416594 

7 

• 3. 108760 

3.711068 

1 

044830 

371902 

. 252075 

- . 000024 

007833 

956743 

.355814 

I 421099 

8 

3 . 108760 

3.711058 

1 

05481.8 

371047 

21 1273 

- , 000037 

, 00554 1 

958770 

.355748 

1 425420 

9 

3 . 108760 

3 711068 

1 

059999 

370474 

171023 

- . 000048 

.003972 

. 960453 

. 355 S 23 

1 428805 

10 

3 108760 

3,711068 

1 

062686 

. 369806 

. 128154 

- 000003 

002860 

961977 

. 355745 

1 432106 

1 1 

3.108760 

3,711068 

1 

064080 

369386 

081442 

000073 

001813 

.963271 

.355818 

1 . 434684 

12 

3 . 1 08760 

3.711068 

1 

064802 

.369091 

044413 

- ,000121 

000951 

963837 

.355743 

1 ,435987 

13 

3 108760 

3,711068 

1 

065177 

369093 

021556 

- 000154 

000464 

964035 

355818 

1 436279 

14 

3 108760 

3,711068 

1 

065372 

368995 

008750 

- 000054 

000165 

964 C 85 

355743 

1 436505 

15 

3 . 108760 

3.711068 

1 

065473 

.369071 

0 . 000000 

0 . 000000 

0 000000 

.964095 

.365819 

1 436403 

L 

X 

Y 


Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 . 108760 

3.711753 

0 

000000 

369548 

. I 0 I 22 ! 

- 000000 

0 000000 

966962 

. 357339 

1 439929 

2 

3. 108760 

3 71 1753 


512873 

369018 

101228 

-.000001 

002252 

966343 

. 356598 

1.439833 

3 

3 108760 

3.711753 


778896 

368289 

. .101067 

- . 000002 

.003487 

965331 

.355521 

1 439464 

4 

3 108760 

3.711753 


916880 

368443 

100289 

- 000000 

003435 

965045 

365564 

1 .438798 

5 

3, 108760 

3 71 1753 


98845 1 

368666 

.097653 

- .000001 

003443 

.964843 

. 355705 

1 .438148 

6 

3 . 108760 . 

3 711753 

1 

025575 

368663 

.091182 

- .000001 

, 003250 

. 964590 

. 355609 

1 . 437775 

7 

3 . 1 08760 

3.711753 

1 

044830 

368774 

. 080258 

- .000001 

. 002506 

. 964450 

. 355664 

I .437394 

8 

3, 108760 

3 711753 

1 

054318 

368 S 57 

067377 

- .000001 

.001770 

964057 

.355599 

1 . 436678 

9 

3. 108760 

3 711753 

1 

059999 

369015 

.054912 

- 000000 

00 1 304 

963806 

. 355659 

1 436058 

10 

3 108760 

3 711753 

1 

062686 

363963 

042060 

- ,090001 

.000807 

963760 

. 355592 

1 436070 

1 1 

3 108760 

3.711753 

1 

064080 

. 368979 

.027676 

- 000000 

000744 

.963920 

355666 

1 . 436285 

12 

3 108760 

3.711753 

1 

064802 

368381 

.015598 

- 000001 

000438 

963961 

355587 

1 436497 

13 

3 108760 

3 711753 

1 

065 1 77 

368949 

007887 

- 000000 

000184 

963991 

. 355664 

1 436437 

14 

3 108760 

3 711753 

1 

065372 

368064 

003302 

- 000000 

000080 

964005 

355587 

1 436590 

15 

3.103760 

3 711753 

I 

065473 

368944 

0 000000 

0 000000 

0 000000 

. 964004 

.355663 

1 436464 

L 

X 

Y 


Z 

R/rref 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.108760 

3 71 1952 

0 

000000 

369185 

0 000000 

0 000000 

0 000000 

-.968429 

. 357530 

1 .442679 

2 

3 . 108760 

3.71 1952 


512873 

366695 

0 000000 

0.000000 

0,000000 

.967810 

. 356826 

1 442525 

3 

3 108760 

3.711952 


778896 

36 S 022 

0 000000 

0 000000 

0 000000 

. 966794 

. 355802 

1 442064 

4 

3 108760 

3.711952 


916880 

368146 

0 000000 

0 , 000000 

0,000000 

966486 

. 355808 

1.441410 

5 

3. 108760 

3 . 7! 1952 


988451 

. 368294 

0 000000 

0 000000 

0 000000 

.966207 

.355848 

1 . 440762 

6 

3. 108760 

3.71 1952 

1 

025575 

368330 

0 , 000000 

0 . 000000 

0 000000 

.965777 ; 

. 355725 

1 440065 

7 

3. 108760 

3.711952 

1 

044830 

. 368583 

0.000000 

0 000000 

0 000000 

.965368 

.355818 

1 .439060 

8 

3. 108760 

3.711952 

1 

054818 

368765 

0 000000 

0 000000 

0 000000 

964699 

.355748 

I .437779 

9 

3 108760 

3.71 1952 

1 

059999 

.369017 

0 000000 

0 000000 

0 000000 

.964231 

.355818 

1 .436689 

10 

3.108760 

3.711952 

1 

062686 

. 369026 

0 000000 

0 000000 

0 000000 

963999 

.355740 

1 .436328 

1 1 

3 108760 

3.711952 

1 

C 64080 

. 35910 ! 

0 000000 

0 . 000000 

0 000000 

.964012 

.355818 

1 .436230 

12 

3. 108760 

3.71 1952 

1 

064302 

. 369035 

0 oocooo 

0.000000 

0 000000 

.963990 

.355746 

1 .436302 


J- 22 


J* 22 


J* 22 


J« 22 


13 

3. 108760 

3.711952 

1 065177 

.369117 

0 OOOOOO 

0 OOOOOO 

0.000000 

.963978 

.355820 

1.436156 

14 

3.108760 

3.711952 

1 065372 

369000 

0 OOOOOO 

0 OOOOOO 

0.000000 

.963926 

.355688 

1.436260 

15 

3. 108760 

3 711952 

1 065473 

368972 

0.000000 

0 OOOOOO 

0 OOOOOO 

.963965 

.355676 

1 . 436362 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

3 758352 

0.000000 

0 000000 

464229 

1 137081 

0 OOOOOO 

0 OOOOOO 

737735 

.342478 

1 .002784 

2 

3 758352 

0.000000 

519504 

.463752 

1 . 138130 

0 OOOOOO 

.010970 

.737022 

.341795 

1 . 002227 

3 

3.758352 

0 . 000000 

788966 

.463551 

1 .141566 

0 OOOOOO 

.018001 

. 735528 

340955 

1 . 000369 

4 

3,758352 

0 000000 

928734 

464895 

1 .147932 

0 OOOOOO 

020403 

733909 

.341190 

.997012 

5 

3.758352 

0 000000 

1 001231 

466126 

1 155987 

0.000000 

021879 

.732124 

.341262 

.993535 

6 

3.758352 

0,000000 

1 038834 

464971 

I . 156395 

0 OOOOOO 

.022775 

733747 

.341171 

.996726 

7 

3,758352. 

0 000000 

1 058338 

456530 

1 130123 

0 OOOOOO 

022747 

747468 

.341242 

1 022832 

8 

3 758352 

0 000000 

I 068455 

434592 

1 040780 

0 OOOOOO 

021293 

7850 1 4 

341160 

1 095581 

9 

3 , 758352 

0 000000 

1 073703 

401389 

852293 

0 OOOOOO 

017693 

850136 

341235 

1 .224791 

10 

3 758352 

0,000000 

1 076425 

372117 

576131 

0 OOOOOO 

0I2I37 

916801 

341157 

1.361456 

11 

3.758352 

0 . 000000 

1 077836 

358635 

319680 

0 OOOOOO 

006764 

.951479 

.3412 '3 

1 433964 

12 

3 758352 

0 000000 

1 078569 

354570 

159719 

0 OOOOOO 

003383 

962169 

.341 156 

1 . 456702 

(3 

3 758352 

0 000000 

1 078948 

353614 

.074431 

0 OOOOOO 

.001577 

964987 

.341233 

1 . 462548 

14 

3 758352 

0 . 000000 

1 079145 

353290 

029625 

0 OOOOOO 

000628 

.965653 

.341156 

1 . 464092 

15 

3.758352 

0 000000 

1 079248 

353324 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.965779 

341233 

I . 464228 

L 

X 

r 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 758352 

1 670379 

0 OOOOOO 

464663 

1 137200 

- 001669 

0 . OOOOOO 

.737851 

. 342852 

1 .002567 

2 

3 . 758352 

1 670379 

519504 

464193 

1 138252 

- 001777 

.010909 

.737136 

.342174 

1 .002001 

3 

3 758352 

1 .670379 

788966 

463999 

1 141687 

- 002080 

017917 

. 735633 

.341333 

1..000126 

4 

3 758352 

I 670379 

928734 

465322 

1 149046 

- 002526 

020348 

734012 

.341552 

996786 

5 

3 758352 

1 670379 

1 001231 

466502 

1 155842 

- 003113 

.021849 

732290 

.341615 

993441 

6 

3 758352 

1 670379 

1 038834 

465241 

1 156389 

- 003319 

022751 

. 734080 

.341524 

99694S 

7 

3.758352 

I .670379 

1 058338 

456652 

1 128833 

- 005010 

022720 

. 748035 

.341592 

I .023499 

8 

3 758352 

I 670379 

1 068455 

.43464! 

1 038833 

-.006194 

021256 

. 785736 

.341513 

1 .096539 

9 

3 758352 

1 . 670379 

1 073703 

401525 

850202 

- 006756 

017652 

.850720 

.341585 

1 225467 

10 

3 758352 

1 670379 

1 076425 

372401 

574695 

- 005796 

012107 

917048 

.341509 

1.361406 

i ! 

3 758352 

1 670379 

i 077836 

358976 

318994 

- 003713 

006749 

951548 

.341583 

1.433522 

12 

3 758352 

1 .670379 

1 078569 

354926 

159409 

- 001957 

003377 

962196 

.341503 

1.456158 

13 

3 758352 

1 ,670379 

1 078948 

353970 

074231 

- 000926 

00 1574 

. 965005 

.341583 

1 .461984 

14 

3 758352 

1 .670379 

! 079145 

353650 

029570 

- 000371 

000627 

. 965668 

.341508 

1 .463519 

15 

3 . .758352 

1 .670379 

1 079248 

35368! 

0 OOOOOO 

0 OOOOOO, 

0.000000 

.965794 

.341583 

1.463659 

L 

X 

V 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 753352 

3 246102 

0 OOOOOO 

464930 

1 134986 

- 002750 

0 OOOOOO 

739220 

343685 

1 004197 

2 

3 753352 

3 246102 

519504 

464490 

1 136035 

- C0291S 

010875 

.738515 

343033 

1 003619 

3 

3.758352 

3 246102 

738966 

464347 

1 139404 

-.003433 

.017801 

. 737057 

342250 

1.001760 

4 

3 758352 

3 246102 

928734 

46563! 

1 145432 

- 004282 

020203 

. 735556 

. 342497 

.998617 

5 

3 758352 

3.246102 

1 001231 

466593 

1 152310 

- 005499 

021724 

.734156 

. 342552 

995893 

6 

3 . 75S352 

3.246102 

1 038834 

464947 

I 151144 

- 007224 

022622 

. 736566 

. 342464 

1 000577 

7 

3 758352 

3.246102 

1 058338 

455954 

1 121349 

- 009436 

• 022569 

751232 

. 342527 

1 .028503 

8 

3 758352 

3.246102 

1 068455 

433947 

1 029539 

- 011534 

021078 

789156 

342452 

1 102017 

9 

3 758352 

3 246102 

1 073703 

401440 

841320 

- .012085 

017477 

853230 

342520 

1 229187 

10 

3 738352 

3 246102 

1 076425 

373010 

568944 

- 009840 

.011988 

918067 

342448 

1 362028 

1 1 

3 758352 

3 246102 

1 077836 

359847 

316332 

- 006060 

006694 

951843 

342518 

1 . 432578 

12 

3 . 758352 

3 246102 

1 078569 

355856 

158229 

- 003149 

.003352 

962321 

. 342448 

1 .454823 

13 

3 758352 

3 246102 

I 078948 

. 354908 

073762 

- 001489 

.001563 

965089 

.342518 

1 460566 

14 

3 758352 

3 246102 

1 079145 

354595 

029362 

- 000597 

000623 

965743 

.342447 

1 462073 

15 

3 . 758352 

3 246102 

1 079248 

354622 

0 OOOOOO 

0 OOOOOO 

0 OOOOOO 

.965868 

.342518 

1 462216 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3 758352 

3 576329 

0 OOOOOO 

461483 

1 120945 

• 002410 

0 OOOOOO 

745402 

343991 

1 015613 

2 

3 . 758352 

3 576329 

519504 

461039 

1 I2I934 

- 002517 

011355 

744709 

,343340 

1 015060 

3 

3.758352 

3 576329 

788966 

46087$ 

1 124985 

- 002922 

018388 

. 743382 

342607 

1 013395 

4 

3 758352 

3 576329 

928734 

462002 

1 129999 

- 003746 

.020560 

.742317 

.342952 

1 010956 

5 

3 758352 

3 576329 

1 00 1 231 

462459 

1 134528 

- 005134 

021796 

.741827 

.343065 

i. 009888 

6 

3.758352 

3 576329 

I 038834 

. 460022 

1 129470 

- 007337 

022453 

. 745626 

.343004 

I 017208 

7 

3 758352 

3 576329 

I 058338 

450528 

1 095255 

- 010158 

022214 

.761485 

.343071 

1 .047545 

8 

3 758352 

3.576329 

1 068455 

429312 

1 001134 

- 012491 

020611 

. 798955 

.343001 

1 . 120504 

9 

3 758352 

3 576329 

I 073703 

399032 

816131 

-.012461 

017016 

.859745 

343066 

1.241557 



i 




10 

3.758352 

3 576329 

1 076425 

372681 



1 1 

3 758352 

3.576329 

1 077836 

. 360309 



12 

3 . 758352 

3 576329 

1 078569 

. 356504 



13 

3 . 758352 

3 . 576329 

1 078948 

355596 



14 

3 , 758352 

3.576329 

1 079145 

. 355296 



15 

3 . 758352 

3.576329 

1 .079248 

.355321 

J* 22 

K* 

5 L 

X 

Y 

Z 

R/RREF 



1 

3.758352 

3 672510 

0 000000 

.449689 



2 

3 , 758352 

3 672510 

519504 

449183 



3 

3 758352 

3 672510 

788966 

448776 



4 

3 758352 

3 672510 

928734 

449342 



5 

3 . 758352 

3 672510 

1 00123! 

448810 



6 

3 . 758352 

3 672510 

1 038834 

445188 



7 

3 758352 

3.672510 

1 053338 

435452 



8 

3 . 758352 

3 672510 

1 060455 

.416740 



9 

3 758352 

3 672510 

i .073703 

.391672 



10 

3 758352 

3 672510 

1 076425 

369957 



1 1 

3 . 758352 

3 672510 

1 077836 

.359481 



12 

3 . 758352 

3.672510 

1 078569 

356175 



13 

3 758352 

3 672510 

1 078948 

.355383 



14 

3 , 758352 

3 672510 

1 079145 

3551 16 



15 

3 . 758352 

3 672510 

1 .079248 

355142 

J. 22 

K’ 

6 L 

X 

Y 

Z 

R/RREF 



i 

3 758352 

3 . 700523 

0 000000 

423369 



2 

3.758352 

3 . 700523 

519504 

422866 



3 

3 758352 

3 . 700523 

788966 

422322 



4 

3 758352 

3 . 700523 

928734 

.422353 



5 

3.758352 

3 700523 

1 001231 

420866 



6 

3 . 758352 

3 . 700523 

1 038834 

4 1 64 17 



7 

3 758352 

3 . 700523 

1 058338 

407752 



8 

3 758352 

3 . 700523 

1 068455 

.394393 



9 

3 758352 

3 700523 

1 073703 

378644 



10 

3 758352 

3 700523 

1 076425 

365168 



1 1 

3.758352 

3 700523 

1 077836 

.358381 



12 

3 758352 

3 . 700523 

1 078569 

356104 



13 

3 758352 

3.700523 

1 078948 

. 355576 



14 

3.758352 

3 700523 

1 079145 

355365 



15 

3.758352 

3 700523 

1 079248 

355407 

22 


7 L 

X 

Y 

Z 

R/RREF 



1 

3 758352 

3 708682 

0 000000 

384826 



2 

3 . 758352 

3 708682 

5 1 9504 

384271 



3 

3 . 758352 

3 . 708682 

788966 

.383560 



4 

3 758352 

3 . 708682 

928734 

.383457 



5 

3 758352 

3 . 708682 

1 001231 

,382337 



6 

3 758352 

3 . 708682 

1 038834 

379432 



7 

3 . 758352 

3 . 708632 

1 053338 

,374780 



8 

3 . 758352 

3 . 708682 

1 068455 

369147 



9 

3.758352 - 

3 . 708682 

1 073703 

.363723 



10 

3 758352 

3 . 708682 

1 076425 

, 359055 



1 1 

3 . 758352 

3.708682 

1 077636 

.356474 



12 

3 . 758352 

3 . 708682 

1 078569 

355470 



13 

3 . 758352 

3 708682 

1 078948 

355260 



14 

3 758352 

3 . 708682 

1 079145 

355133 



15 

3 . 758352 

3.708682 

1 079248 

355181 

J* 22 

K* 

J 

CD 

X 

Y 

Z 

R/RREF 



1 

3.758352 

3 711059 

0.000000 

360421 



2 

3 758352 

3.711059 

519504 

359927 



3 

3 . 758352 

3 7 1 1 059 • 

788966 

.35936! 



4 

3.758352 

3.71 1059 

.928734 

359551 



5 

3 . 758352 

3.71 1059 

1 00123! . 

359339 



6 

3.758352 

3.711059 

I . 038834 

.358859 


553039 
308734 
154739 
072.182 
028742 
0 000000 

U/AREF 
1 075301 
I 076108 
t 078372 
1 081260 
1 031260 
1 068974 
1 027084 
930467 
755182 
513465 
288415 
144966 
067686 
026963 
0 000000 

U/AREF 
949167 
949654 
950528 
950278 
943450 
920001 
866696 
769972 
619219 
423549 
. 240656 
121832 
057073 
022769 
0 000000 

U/AREF 
676973 
676855 
676047 
672660 
. 660763 
630273 
573975 
494300 
395537 
.27721 1 
162512 
083305 
039603 
0 1 5866 
0 000000 

U/AREF 
. 304980 
. 304496 
303101 
300275 
292290 
273535 


- 009243 

- 005095 
- . 002442 

- 001109 

- 000437 
0 000000 

V/AREF 

-.001193 

- 001216 

- 00131 1 

- 001539 

- 002172 

- 003744 

- 005061 

- 007770 

- 007144 

- 004134 
- .001285 
- .000148 

000071 
000057 
0 000000 

V/AREF 

- 000803 

- 000829 
- . 000697 

- 00.0958 
-.001056 
-.001429 

- 002213 

- 002039 

- 002309 

- 000394 
000107 
.000262 
000164 
000071 

0 000000 

V/AREF 

- 000127 

- 000135 

- 000151 
-.000149 

- 000152 

- 000209 

- 000305 

- 000322 

- 000207 
-.000138 

- 000187 

- 000208 

- 000138 

- 000061 
0 000000 

. V/AREF 
.000017 
.000015 
00001 1 
000013 
.000013 
000003 


0II676 
. 006542 
003281 
001531 
000610 
0 000000 

W/AREF 
0 000000 
.012453 
0201 18 
022304 
023067 
022905 
021829 
.019659 
015931 
010833 
006118 
003073 
001434 
00057! 
0 000000 

W/AREF 
0 000000 
013020 
021010 
.023332 
.024040 
. 023048 
020519 
017191 
013263 
008958 
005082 
002577 
.001209 
. 000483 
0 000000 

W/AREF 
0 000000 
011203 
017659 
.018933 
019260 
018181 
015311 
.011653 
003465 
.005777 
.003379 
.001753 
000634 
000335 
0 . 000000 

W/AREF 

0.000000 

006081 

.009050 

008989 

009231 

008510 


.920353 

.952140 

962113 

964758 

965384 

965503 

T/TREF 
. 764 1 75 
763495 
. 762353 
761994 
. 763072 
769170 
786521 
821685 
874429 
925582 
952726 
.961397 
.963712 
964261 
964366 

T/TREF 
812249 
.81 1662 
810917 
81 1516 
814397 
822855 
840516 
868818 
905128 
.938344 
956298 
962223 
.963839 
964225 
964299 

T/TREF 
893022 
892517 
89204 1 
892996 
895794 
902452 
913783 
.927571 
941570 
.953643 
.960712 
963259 
963993 
964172 
964207 

T/TREF 
. 954098 
953584 
.952981 
.953250 
953702 
954841 


.342998 
. 343064 
.342997 
343064 
342997 
,343063 

P/PREF 
.343641 
342949 
.342126 
342396 
. 342474 
,342425 
. 342493 
342429 
. 342489 
342426 
. 342487 
.342425 
.342487 
.342425 
.342486 

P/PREF 
343881 
.343225 
. 342468 
. 342746 
342752 
.342651 
.342723 
342656 
.342721 
342653 
.342719 
342652 
.342718 
.342652 
.342718 

P/PREF 
343658 
. 342968 
.342151 
. 342426 
.342495 
.342419 
.342467 
.342410 
.342470 
.342410 
. 34.-'469 
. 342409 
342468 
. 342409 
.342468 

P/PREF 

.343878 

.343221 

.342464 

.342742 

,342750 

.342653 


I . 365903 
1 .432290 
1 453450 
1 458935 
1 460374 
1 460512 

ENT 

1 .052030 
1 051567 
1 050375 
1 049350 
I 051333 
1 063176 
1 .096817 
1 . 166163 
1.2722C0 
1 377699 
1 434489 
1 . 452906 
1 457703 
1.458971 
1 459087 

ENT 

I 145517 
I 145234 
1 . 144771 
1 , 145583 
1 151273 
1 168185 
1 .203338 
1 260542 
1 334804 
I 403994 
1.441635 
1 454269 
I 457576 
1 . 458507 
1 . 458550 

ENT 

1 . 308448 
I 308464 
1 308735 
I .310276 
1 .315921 
1 329752 
1 .353108 
1 .381871 
1 .41 1055 
1 . 436552 
1 .451384 
1 456875 
1 . 458328 
1 458808 
1 .458781 

ENT 

1 4350 ^ 
1.435070 
1 .435066 
I .435168 
1 .436107 
1 .438672 


7 3 

8 3 

9 3 

10 3 

11 3 

12 3 

13 3 

14 3 

15 3 

J. 22 K. 9 1. 

1 3 

2 3 

3 3 

4 3 

5 3 

6 3 

7 3 

8 3 

9 3 

10 3 

I i 3 

12 3 

13 3 

14 3 

15 3 

J« 22 K» n L 

1 3 

2 3 

3 3 

4 3 

5 3 

6 3 

7 3 

8 3 

. 9 3 

10 3 

I I 3 

12 3 

13 3 

14 3 

15 3 

J. 23 1 L 

1 4 

2 4 

3 4 

4 4 

5 4 

6 4 

7 4 

8 4 

9 4 

10 4 

11 4 

12 4 

13 4 

14 4 

15 4 

J* 23 K» 2 L 

1 4 

2 4 

3 4 


758352 

3.71 1059 

758352 

3.71 1059 

758352 

3.71 1059 

758352 

3 711059 

758352 

3.71 1059 

758352 

3 71 1059 

758352 

3.71 1059 

758352 

3.71 1059 

758352 

3 71 1059 

X 

Y 

758352 

3.711751 

7583C? 

3 71 1751 

758352 

3 711751 

758352 

3.711751 

753352 

3 71 1751 

758352 

3 711751 

758352 

3 71 1751 

758352 

3 711751 

758352 

3.711751 

758352 

3 71 1751 

758352 

3 71 1751 

753352 

3 711751 

758352 

3 711751 

758352 

3.711751 

758352 

371 1751 

X 

Y 

758352 

3.71 1952 

758352 

3 71 1952 

758352 

3 7 1 1 952 

758352 

37! 1952 

758352 

3 7 1 1 952 

758352 

3 711952 

750352 

3 7 1 1 952 

758362 

3 7! 1962 

758352 

3 711952 

758352 

3 7! 1952 

758352 

3 711952 

758352 

3 71 1952 

758352 

3 7! 1952 

758352 

3 711952 

758352 

371 1952 

X 

Y 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 . 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0.000000 

222346 

Q 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

222346 

0 000000 

X 

Y 

222346 

1 670379 

222346 

1 .670379 

222346 

1 670379 


1 058338 

.358225 

1 068455 

357454 

1 073703 

356791 

1 076425 

356030 

1 .077836 

355624 

1 078569 

355369 

1 078943 

355378 

1 079145 

355291 

1 079243 

355360 

Z 

R/RREF 

0 000000 

35584 1 

519504 

355333 

788966 

354753 

928734 

355025 

1 .00123! 

355165 

1 038834 

355190 

1 058338 

355300 

1 068455 

■355306 

1 073703 

355302 

1 076425 

355150 

1 077836 

355139 

1 078569 

355052 

1 078948 

3551 14 

1 079145 

355039 

1 079248 

3551 10 

Z 

R/RRFF 

0 000000 

355565 

5 1 9504 

355094 

. 788966 

354583 

928734 

354858 

1 00123! 

354971 

1 038834 

3660 12 

1 060 J 38 

356263 

1 068465 

355336 

1 073703 

355418 

1 076425 

355327 

1 077836 

355371 

1 078569 

355308 

1 078948 

355331 

1 079145 

355283 

1 079248 

355196 

Z 

R/RREF 

0 000000 

45532$ 

524240 

455042 

795159 

455206 

937201 

456676 

1 010358 

457748 

1 048305 

456059 

1 067987 

446505 

1 078196 

423636 

1 083491 

390463 

1 086238 

362169 

1 087663 

349296 

1 088402 

345464 

1 088785 

344519 

1 088984 

344246 

1 089087 

344243 

Z 

R/RREF 

0 000000 

455728 

524240 

455449 

796159 

455615 


s. 



243090 

- 000013 

.006709 

956743 

.342729 

1 . 442557 


207001 

- 000019 

004934 

.958627 

.342665 

I .446643 


168438 

- 000026 

003759 

960592 

.3'2730 

1 .450687 


122837 

000018 

002720 

962444 

. 342659 

1.454725 


075607 

000072 

.001677 

963732 

342726 

1 457336 


040642 

- 000134 

.000871 

964232 

. 342658 

1 .458512 


019672 

- 000165 

. 000423 

964399 

342726 

I 458750 


007982 

- 000067 

000153 

964441 

342657 

I 458955 

0 000000 

0 000000 

0 OOOOOO 

.964449 

.342726 

I . 458855 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


097742 

- 000000 

0 OOOOOO 

965763 

.343658 

1 .460052 


097531 

- 000001 

002126 

965203 

.342968 

1 460039 


096971 

- 000001 

003030 

964475 

.342151 

1 459891 


095988 

000000 

002783 

964513 

342426 

1 45950! 


093306 

- 000000 

002928 

964332 

342497 

I ,458996 


087098 

- 00000! 

002733 

964057 

342423 

I 458541 


077286 

- 000000 

002137 

963900 

342473 

1 458122 


066015 

- 000000 

001576 

963720 

.342415 

1 457841 


054201 

- 000000 

001229 

963878 

. 342468 

I 458085 


040443 

- 000000 

000790 

964126 

342409 

1 458709 


025728 

000000 

000728 

964338 

.342474 

1 459050 


014277 

- 000000 

0004 1 7 

964377 

.342403 

1.459251 


007197 

000000 

000174 

964400 

.342471 

1 .459185 


00301 1 

000000 

000073 

964410 

. 342404 

1 459322 

0 000000 

0 000000 

0 OOOOOO 

964409 

.342471 

1 . 459205 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

0 

000000 

0 OOOOOu 

0 OOOOOO 

.967130 

. 343877 

1 462572 

0 000000 

0 000000 

0 OOOOOO 

966564 

343221 

I 462492 

0 

000000 

0 000000 

0 OOOOOO 

965322 

342464 

1 .462211 

0 

000000 

0 000000 

0 oooooo 

. 965833 

.342743 

1.461758 

0 

000000 

0 000000 

0 OOOOOO 

305578 

342752 

1 461202 

0 

000000 

n 000000 

0 oooooo 

965142 

342656 

1 460442 

0 

000000 

0 oooooo 

0 oooooo 

964 752 

342731 

1 459408 

0 

000000 

0 oooooo 

0 oooooo 

964339 

.342664 

1 458723 

0 

000000 

0 oooooo 

0 oooooo 

364295 

. 342728 

1 458526 

0 000000 

0 oooooo 

0 oooooo 

964350 

.342660 

1 . 458759 

0 

000000 

0 oooooo 

0 OOOOOO 

.964423 

.342728 

1.458795 

0 

000000 

0 oooooo 

0 OOOOOO 

964407 

.342661 

1.458876 

0 000000 

0 oooooo 

0 OOOOOO 

964395 

342727 

1 458738 

0 

000000 

0 oooooo 

0 OOOOOO 

964356 

,342619 

1 ,458840 

0 

000000 

0 oooooo 

0 OOOOOO 

.964332 

.342545 

1 .459022 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

149831 

0 oooooo 

0 oooooo 

731730 

.333176 

1 002356 

1 

150842 

0 oooooo 

010951 

731059 

.332663 

1.001687 

1 

154372 

0 oooooo 

017836 

729588 

.332113 

.999527 

1 

161028 

0 oooooo 

020383 

,727858 

332396 

.995872 

I 

168604 

0 oooooo 

022048 

.726211 

.332422 

992687 

i 

167465 

0 oooooo 

022947 

. 728800 

.332376 

,997700 

1 

1 36228 

0 oooooo 

022895 

744466 

. 332408 

I ,027814 

1 

040830 

0 oooooo 

021321 

784553 

. 332365 

' . 106178 


846839 

0 oooooo 

01 7609 

851304 

. 332402 

1 240090 


569418 

0 oooooo 

.012006 

,917697 

.332361 

1 . 377637 


315403 

0 oooooo 

006677 

951630 

.332400 

1 449407 


157643 

0 oooooo 

003340 

962070 

.332360 

1 471789 


073490 

0 oooooo 

001558 

964823 

.332400 

1 477618 


029254 

0 oooooo 

000620 

965474 

.332360 

I 479085 

0 000000 

0 oooooo 

0 OOOOOO 

.965598 

.332400 

1.479280 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

149793 

- 001878 

0 OOOOOO 

.731930 

.333561 

I 002276 

1 

150805 

- 001991 

010902 

.731259 

333051 

1 .001602 

1 

154317 

- 002312 

017768 

729788 

.332502 

999442 








4 

4 

222346 

1 

670379 

937201 

457057 






5 

4 

222346 

1 

670379 

1 010358 

458064 






6 

4 

222346 

1 

670379 

1 048305 

456264 




i 


7 

4 

222346 

1 

670379 

1 067987 

446579 






8 

4 

222346 

1 

670379 

1 078196 

421667 






9 

4 

222346 

1 

67U <79 

1 083491 

390602 






10 

4 

222346 

1 

670379 

1 086233 

362453 






1 1 

4 

222346 

1 

670379 

1 087663 

349645 






12 

4 

222346 

1 

670379 

1 08S402 

345829 






13 

4 

222346 

1 

670379 

1 088785 

344888 






14 

4 

222346 

1 

670379 

1 088984 

344614 






15 

4 

222346 

1 

670379 

1 089087 

344610 


J* 

23 

K* 

3 

L 


X 


Y 

Z 

R/RREF 






1 

4 

222346 

3 

245102 

0 OOCOOO 

455733 






2 

4 

222346 

3 

246102 

524240 

455478 






3 

4 

222346 

3 

246102 

796159 

455663 






4 

4 

222346 

3 

246! 02 

937201 

45 70 18 






5 

4 

222346 

3 

246102 

1 010353 

457798 


o 




6 

4 

222346 

3 

246102 

1 048305 

455607 






7 

4 

222346 

3 

246102 

1 067987 

445537 






8 

4 

222346 

3 

246102 

1 078196 

422799 






9 

4 

222346 

o 

246102 

1 083431 

390435 






10 

4 

222346 

3 

246102 

1 086238 

363018 






1 1 

4 

222346 

3 

246102 

1 087663 

350486 






12 

4 

222346 

3 

246102 

1 0C8402 

346736 






13 

4 

222346 

3 

246102 

1 088785 

345806 






14 

4 

222346 

3 

246102 

1 088984 

345540 






15 

4 

222346 

3 

246102 

i 089007 

3455.14 


J* 

23 

Ke 

4 

L 


X 


T 

Z 

R/RMEF 






1 

4 

222346 

3 

576131 

0 000000 

451560 






2 

4 

222346 

3 

576131 

524240 

451278 






3 

4 

222346 

3 

576I3I 

796159 

451389 






4 

4 

222346 

3 

576131 

937201 

452522 






5 

4 

222346 

3 

57GI31 

1 010358 

452730 






6 

4 

222346 

3 

576131 

1 048305 

449784 






7 

4 

222346 

3 

576131 

1 067987 

439440 






8 

4 

222346 

3 

0 76 ni 

1 0 7BI96 

417701 






9 

4 

22.' M6 

3 

n?c.i 31 

I 00.149! 

315 7 75S 






10 

4 

222346 

3 

676131 

1 OH62 38 

362500 

f 





1 1 

4 

222346 

3 

576131 

1 087663 

350602 






12 

4 

222345 

3 

576131 

1 088402 

347257 






13 

4 

222346 

3 

576I3I 

I 089785 

346371 






14 

4 

222346 

3 576131 

1 009'^ 64 

346120 






15 

4 

222346 

3 

576131 

1 099097 

346 1 1 3 


J* 

23 


5 

L 


X 


Y 

Z 

R/RRER 






1 

4 

222346 

3 

672395 

0 000000 

4 30 740 






2 

4 

222346 

3 

67.;395 

524240 

438384 






3 

4 

222346 

3 

672395 

796159 

438206 






4 

4 

222346 

3 

672395 

937201 

438717 






5 

4 

222346 

3 

672395 

1 010358 

437928 






6 

4 

222346 

3 

672335 

1 048305 

433946 






■7 

4 

222346 

3 

6‘’2395 

1 067987 

423716 






8 

4 

222346 

3 

672395 

1 078196 

404879 






9 

4 

222346 

3 

672395 

1 083491 

380335 






10 

4 

222346 

3 

672395 

1 086238 

35971 1 






1 1 

4 

222346 

3 

672395 

1 087663 

349904 






12 

4 

222346 

3 

672395 

1 088402 

346859 






13 

4 

222346 

3 

672395 

1 068785 

346091 






14 

4 

222346 

3 

672395 

I 088934 

345874 






15 

4 

222346 

3 

672395 

1 089087 

345367 


J« 23 K» 6 L X r z R/RREF 


I 


1 

160875 

- 002810 

020337 

1 

168185 

- 003489 

.022021 

1 

166551 

- 004402 

02292! 

I 

134649 

- 005542 

022863 

I 

030656 

- 006632 

021279 


844597 

- 006943 

017563 


567840 

- 00-3734 

0! 1973 


314592 

- 003593 

. 0C6660 


157256 

- 001882 

003332 


07331 1 

- 000890 

00.1554 


029183 

- 000357 

000619 

0 

000000 

0 000000 

0 000000 

U/AREF 

V/APEF 

W/AREF 


146622 

- 002923 

0 000000 


1476 19 

- 003083 

01089! 


151009 

- 003597 

017695 


1671 17 

- 004466 

020224 


163357 

- 005744 

021905 


159923 

- 007516 

022785 


125847 

- 009654 

022692 


C28308 

- 011478 

021079 


334837 

- 011650 

.017369 


561374 

- 009217 

01 1839 


311413 

- 005577 

006594 


155780 

- 002881 

003301 


072638 

- 00136! 

001540 


028918 

- 000546 

000613 

0 

OCOOOO 

0 000000 

0 000000 

U/AREF 

V/AREF 

W/AREF 

1 

129862 

- 002409 

0 000000 

1 

130768 

- 002508 

01 1329 

1 

133737 

- 002878 

018257 

I 

133644 

- 003648 

020539 

1 

142332 

- 004908 

021975 

1 

1 34934 

- 007069 

022591 

1 

09661 1 

- 009594 

022292 


997102 

- 011405 

020560 


80 7 193 

- 011132 

016058 


54374 1 

- 000025 

011488 


302688 

- 004301 

006416 


151683 

- 002011 

003217 


070769 

- 000898 

001501 


028181 

- 000350 

000598 

0 

000000 

0 000000 

0 000000 

U/AREF 

V/AREF 

W/AREF 

1 

079365 

- 001150 

0 000000 

1 

080031 

- 001180 

012220 

I 

082047 

- 001273 

019674 

I 

084598 

- 001470 

022023 

I 

083572 

- 002038 

022962 

1 

069049 

- 003420 

022792 

1 

023614 

- 005354 

021704 


922526 

- 006633 

019461 


743500 

- 005832 

015630 


502108 

- 003234 

010640 


281 141 

- 000863 

005963 


141300 

000021 

002995 


065994 

000139 

001399 


026292 

000082 

000557 

0 

000000 

0 000000 

0 OOCOOO 


U/AREF V/AREF W/AREF 


728076 

. 332772 

995838 

726515 

332790 

992828 

729281 

332745 

998179 

745165 

332775 

1 028710 

785362 

332732 

1 107287 

851939 

332769 

1 240836 

917980 

332729 

1 377623 

951727 

332767 

1 448977 

9621 19 

332728 

1 471243 

964360 

332766 

1 477046 

965508 

. 332728 

1 478504 

965631 

332766 

1 478700 

T/TREF 

P/PREF 

ENT 

.733733 

334392 

1 004743 

733031 

333902 

1 004072 

731674 

333401 

1 001979 

730134 

333699 

998669 

728959 

333716 

996399 

732368 

333672 

1 002982 

748900 

333700 

1 034787 

.789171 

333660 

111 3570 

854672 

333694 

1 245030 

.919120 

. 333657 

1 378481 

952083 

333692 

1 448126 

962276 

333656 

1 469941 

964968 

333692 

I 475639 

965606 

333656 

1 477067 

965727 

3336V2 

1 477263 

T/TREF 

P/PREF 

ENT 

741107 

. 334655 

1 018579 

740471 

.334158 

1 017960 

739227 

333679 

1 016150 

738183 

334044 

1 013697 

737989 

334110 

1 013244 

742776 

334089 

1 022483 

760329 

334119 

1 056432 

7990 1 7 

334004 

1 1 34002 

861658 

334115 

1 250666 

921602 

334081 

1 382994 

952426 

.334113 

1 448125 

962055 

334080 

1 468723 

964603 

334113 

1 474125 

965213 

334080 

1 475477 

965328 

334113 

I 475665 

T/TREF 

P/PREF 

ENT 

761976 

334309 

1 059396 

761384 

333778 

1 058917 

760401 

333212 

1 057722 

760152 

.333491 

I 056882 

761569 

333512 

1 059S14 

768521 

333497 

1 073202 

787146 

. 333526 

1 109750 

823694 

333497 

1 182594 

876918 

333522 

I 290893 

927114 

333493 

1 395570 

953177 

333520 

1 450754 

961464 

333492 

1 468494 

963677 

333520 

1 473178 

964202 

. 333492 

1 474352 

.964302 

.333520 

1.474517 

T/TREF 

P/PREF 

ENT 


1 4.222346 

2 4 222346 

3 4 222346 

4 4 222346 

5 4 222346 

6 4 222346 

7 4 222346 

8 4 222346 

9 4 222346 

10 4 222346 

11 4 222346 

12 4 222346 

13 4 222346 

14 4 222346 

15 4 222345 

•» 23 K» 7 L X 

1 4 222346 

2 4 222346 

3 4 222345 

4 4 222345 

5 4 222346 

6 4 222346 

7 4 222346 

e 4 222346 

9 4 222346 

10 4 222346 

11 4 222346 

12 4 222346 

13 4 222346 

1 4 4 222346 

15 4 222346 

J» 23 8 L X 

1 4 222346 

2 4 222345 

3 4 222346 

4 4 222346 

5 4 222346 

6 4 222346 

7 4 222346 

8 4 222346 

9 4 222346 

10 4 222346 


3 

700473 

0 OOOOOO 

41 1812 

3 

700473 

524240 

411428 

3 

700473 

796159 

4 1 1059 

3 

700473 

937201 

411029 

3 

700473 

1 010358 

409399 

3 

700473 

I 043305 

404S20 

3 

700473 

1 067987 

39631 1 

3 

700473 

1 078196 

383255 

3 

700473 

1 083491 

367949 

3 

700473 

1 086238 

355 1 80 

3 

700473 

1 087663 

348840 

3 

700473 

1 088402 

346758 

3 

700473 

I 083785 

346237 

3 

700473 

1 083984 

346071 

3 

700473 

1 089087 

346080 


Y 

Z 

B/RREF 

3 

708664 

0 OOOOOO 

374000 

3 

703654 

524240 

373558 

3 

708654 

796159 

373016 

3 

708664 

937201 

372882 

3 

70S664 

1 010358 

371722 

3 

708664 

I 043305 

369002 

3 

708664 

1 067987 

364655 

3 

708664 

1 078196 

359332 

3 

708664 

1 08 349! 

35396! 

3 

708664 

I 085238 

349432 

3 

708664 

I 08 7663 

346963 

3 

708664 

1 088402 

346049 

3 

708664 

1 088785 

34582! 

3 

708664 

1 088984 

345733 

3 

708664 

1 089087 

345747 


y 

1 

B/RREF 

3 

711052 

0 OOOOOO 

350715 

3 

711052 

524240 

350348 

3 

711052 

796159 

349983 

3 

7U052 

937201 

350202 

3 

711052 

! 010358 

350018 

3 

7! 1052 

1 048305 

349556 

3 

71 1052 

! 067937 

348934 

3 

71 1052 

1 078196 

348156 

3 

711052 

1 08349! 

347367 

3 

711052 

1 086238 

346584 


947010 

• 

000763 

0 OOOOOO 

.812385 

.334550 


158464 

,947233 


000789 

.012455 

8’ 1930 

.334051 


158246 

.947696 

- 

000849 

019982 

811445 

333552 


157970 

946780 

- 

000893 

022345 

812239 

. 333854 


I59I38 

938963 


000975 

023200 

815396 

333822 


165493 

.914062 

. 

001291 

022280 

824269 

. 333763 


183372 

,859178 

. 

001918 

019940 

842260 

. 333797 


219639 

760618 

- 

002364 

0167.75 

870865 

333763 


278073 

607908 

. 

001855 

012964 

907176. 

.333795 


, 353246 

412897 

. 

000700 

008726 

939694 

333761 


421696 

233959 


000080 

00494 1 

956865 

333793 


458144 

t 18501 


00019! 

002507 

962515 

333760 


470269 

055543 


000117 

.001 177 

964056 

333792 


473508 

,022163 


000050 

000471 

964424 

333759 


474355 

0 OOOOOO 

0 

OOOOOO 

0 OOOOOO 

964495 

333732 


. 474449 

U/AREF 

V/AHEF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.670343 

- 

0001 12 

0 OOOOOO 

89392! 

334327 

1 

324801 

669844 


000120 

010365 

893562 

333797 

I 

324894 

668330 


000131 

016224 

893354 

333236 

1 

325356 

664350 

. 

000123 

017591 

894434 

333519 

1 

327148 

651925 


000123 

.018112 

897267 

333534 

I 

333013 

621707 

- 

000171 

017117 

903782 

333497 

1 

346642 

567358 

• 

000246 

014547 

914595 

333512 

1 

369228 

489695 

- 

000250 

01 1267 

928076 

333488 

I 

397606 

390276 

- 

000167 

008319 

942232 

.333514 

I 

427497 

271194 

- 

000141 

005672 

954370 

333487 

1 

453355 

1 58506 

• 

000 1 79 

003307 

961233 

333512 

1 

467964 

061314 

- 

000191 

001714 

963697 

333486 

1 

473280 

038687 

- 

000124 

000316 

964404 

333512 

1 

474750 

0 1 5502 

■ - 

000055 

000328 

964578 

333486 

! 

475167 

0 OOOOOO 

0. 

OOOOOO 

0- OOOOOO 

96461 1 

33351! 

1 

475193 

U/AREF 

V/AREF 

y/AREF 

T/TREF ^ 

P/PREF 

ENT 

300092 


000019 

0 OOOOOO 

953896 

334546 

1 

450505 

299373 


000016 

005345 

953473 

334047 

1 

450469 

297631 


000013 

007888 

953025 

333543 

1 

45038! 

294645 


000015 

008056 

953309 

.33385! 

1 

450461 

28668! 


000014 

008516 

953724 

333821 

I 

451397 

268895 


000005 

00790! 

954825 

333765 

1 

453841 

240784 

- 

000008 

005362 

956635 

.333803 

1 

457635 

206568 

- 

000012 

004828 

958686 

333772 

1 

462066 

167366 

• 

000022 

.003750 

960949 

333802 

I 

466843 

120680 


000018 

002678 

963014 

333765 

1 

471327 



4 


\ ^ { 

PRINTOUT OF FLOWFIELD INITIAL DATA FOR TEST CASE NO. 4 


NOZZLE FLOW F 

■ELO AS WRITTEN TO RESTART FILE AT 

STEP 0 

TIME = 

.00000 

CT = 

. 05000 



1 K= 1 L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-9.0551 1 8 

.000000 

.000000 

.977679 

. 21 2002 

.000000 

. cooooo 

. 9S1 01 1 

.968890 

1 .OOOCOO 

2 

-9 . 0551 18 

. 000000 

.691889 

.977679 

.212002 

.000000 

.000000 

.951 01 1 

. 968890 

1 .OOOCOO 

3 

-9.0551 18 

. 000000 

1 . 1 00368 

.977679 

.212002 

.000000 

.000000 

.95101 1 

. 968890 

1 .OOOCOO 

4 

-9.0551 1 3 

.000000 

1 .341528 

.977679 

.212002 

.000000 

.000000 

.951 01 1 

.968890 

1 .OOOCOO 

5 

-9.0551 10 

.000000 

1 .483905 

.977679 

.212002 

.000000 

.000000 

.951011 

.968890 

1 .OOOCOO 

6 

-9.0551 18 

.000000 

1 .567962 

.97767'9 

. 21 2002 

.000000 

. oooooo 

.951 01 1 

.968890 

1 .OOOCOO 

7 

-9.0551 18 

.000000 

1 .617587 

.977679 

.212002 

.000000 

.000000 

.951 01 1 

. 968890 

1 .ooocoo 

8 

-9.0551 18 

. 000000 

1 .646886 

.977679 

.21 2002 

.000000 

.cooooo 

. 951 01 1 

. 968890 

1 .ooocoo 

9 

-9.055118 

. 000000 

1 .6641 83 

.975332 

.181716 

.000000 

. cooooo 

. 953396 

.968890 

1 .003371 

10 

-9.0551 18 

.000000 

1 .674395 

.973354 

. 151430 

.000000 

.000000 

. 955414 

. 968890 

1 .006225 

1 1 

-9.0551 18 

. 000000 

1 .680424 

.971743 

.121144 

.000000 

.000000 

. 957065 

.968890 

1 .008563 

12 

-9.0551 18 

.000000 

1.683983 

.970493 

. 090858 

.000000 

.cooooo 

. 958349 

.968890 

1 .010382 

13 

-9.0551 1 8 

.000000 

1 . 686085 

.969602 

. 060572 

.000000 

. cooooo 

. 959266 

. 968890 

1.01 1E81 

14 

-9.0551 18 

. 000000 

1 .687325 

.969068 

.030286 

.000000 

.000000 

. 95981 7 

.968890 

1 .012<:62 

15 

-9.0551 18 

. 000000 

1 . 688058 

.968890 

.000000 

.OOOOCO 

.000000 

1 . OOOOOO 

. 968890 

1 .012722 

16 

-9.0551 18 

. 000000 

2.000000 

.454203 

. OOOOCO 

.000000 

.cooooo 

1 . 1 05440 

. 502094 

1 .515777 

17 

-9.0551 18 

.000000 

2.000031 

.456233 

. 21 8045 

.000000 

.000000 

1 . 055931 

.500000 

1 .500C60 

18 

-9 . 055 1 1 8 

. ooocoo 

2 .0001 1 0 

.457948 

. 260884 

.000000 

. oooooo 

1 . 051828 

.500000 

1 .492203 

19 

-9.0551 18 

. 000000 

2.000309 

.459905 

. 302158 

.000000 

. cooooo 

1 . 087 180 

.500000 

1 .48331 7 

20 

-9.0551 13 

. 000000 

2.000807 

.462358 

. 346609 

,000000 

. oooooo 

1 . 081 41 2 

. 500000 

1 .47231 2 

21 

-9 .0551 1 8 

. 000000 

2.002059 

.465531 

.396219 

.000000 

.cooooo 

1 . 074042 

.500000 

1 .458283 

22 

-9.035118 

. 000000 

2.005204 

.469695 

.452327 

.000000 

.cooooo 

1 .064520 

. 500000 

1 .44021 5 

23 

-9.0551 18 

.000000 

2.013103 

.47521 0 

.516112 

.000000 

.oooooo 

1 .052166 

.500000 

1 .416E69 

24 

-9.035118 

.000000 

2.032944 

.482574 

.588771 

.000000 

.cooooo 

1 . 0361 1 0 

.500000 

1 .386692 

25 

-9.0551 1 8 

. 000000 

2.082783 

.492499 

.671603 

.000000 

. cooooo 

1 . 015230 

. 500000 

1 .347728 

26 

-9.0551 1 8 

. 000000 

2 . 207974 

.506037 

.766064 

.000000 

.oooooo 

.988069 

.500000 

1 .297521 

27 

-9.055118 

. 000000 

2.522438 

.510204 

. 791960 

.000000 

.cooooo 

.980000 

.500000 

1 .282710 

28 

-9.055118 

.000000 

3.312336 

.510204 

. 791960 

.000000 

.oooooo 

.980000 

.500000 

1 .28271 6 

2 K= 1 L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7.7-42732 

. 000000 

.000000 

.977679 

.212002 

.000000 

.oooooo 

.951 01 1 

.968890 

1 .OOOCOO 

2 

-7.742782 

. 000000 

. 691889 

.977679 

.212002 

.000000 

.cooooo 

.95101 1 

.968890 

1 .OOOCOO 

3 

-7.742782 

. 000000 

1 . 1 00368 

.977679 

.212002 

.000000 

.cooooo 

.951 01 1 

.968890 

1 .OOOCOO 

4 

-7 .712782 

. 000000 

1 . 341528 

.977679 

.212002 

.000000 

.cooooo 

.951 01 1 

.968890 

1 .OOOCOO 

. 5 

-7.742782 

. 000000 

1 .483905 

.977679 

.21 2002 

.000000 

.oooooo 

.951 01 1 

.968890 

1 .ooocoo 

6 

-7 . 742782 

.000000 

1 .567962 

.977679 

.212002 

.000000 

.oooooo 

.951 01 1 

.968890 

1 .ooocoo 

7 

-7.742782 

. 000000 

1 .617587 

.977679 

. 212002 

.000000 

. oooooo 

. 951 01 1 

. 968890 

1 .ooocoo 

8 

-7.742782 

. 000000 

1 .646886 

.977679 

.212002 

.000000 

.cooooo 

.951 01 1 

.968890 

1 .ooocoo 

9 

-7.742782 

. 000000 

1 .664183 

.975332 

.181716 

.000000 

.oooooo 

.953396 

. 968890 

1 .003371 

10 

-7.742782 

. oocooo 

1 , 674395 

.973354 

. 151430 

.000000 

.oooooo 

. 955414 

.968890 

1 .006225 

11 

-7.742782 

. 000000 

1 .680424 

.971743 

.121144 

.000000 

.oooooo 

.957065 

.968890 

1 .008563 

12 

-7.742782 

. 000000 

1 . 6639B3 

. 970433 

. 090858 

.000000 

.oooooo 

.958349 

. 968890 

1 .010382 

1 3 

-7 . 742 V82 

. oocooo 

1 . 686085 

.969602 

. 060572 

.000000 

.oooooo 

.959266 

. 968890 

1.011681 

14 

-7.742782 

. 000000 

1 .687325 

.969068 

. 030286 

.000000 

.oooooo 

. 959817 

.968890 

1 .012462 

15 

-7 . 742782 

.000000 

1 . 688058 

.968890 

.000000 

.000000 

.cooooo 

1 .OOOOOO 

.968890 

1 .012722 

16 

-7 . 742782 

. 000000 

2 .000000 

.454203 

. 000000 

.000000 

.cooooo 

1 . 1C5440 

.502094 

1 .515777 

1 7 

-7.742782 

. 000000 

2 . G00C31 

.456233 

.218045 

.000000 

.cooooo 

1 .0S5931 

.500000 

1 -500C60 

1 S 

-7.742782 

. 000000 

2 .0001 1 0 

.457948 

. 260884 

.000000 

.oooooo 

1 .051828 

.500000 

1 .492203 

19 

-7.742782 

. 000000 

2.000309 

.459905 

.302158 

.000000 

.cooooo 

1 . 087180 

. 500000 

1 .48331 7 

20 

-7.742782 

.000000 

2.000807 

.462358 

.346609 

.000000 

.oooooo 

1 .081 41 2 

.500000 

1 .472312 

21 

-7.742782 

•OOCOOO 

2 . 002059 

.465531 

.395219 

.000000 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

-7.742782 

.000000 

2.005204 

.468695 

.452327 

.000000 

.oooooo 

1 .064520 

.500000 

1 .440215 

23 

-7.742782 

. 000000 

2.013103 

.475210 

.516112 

.000000 

.oooooo 

1 .052166 

.500000 

1 .416669 



24 

-7.742782 

.000000 

2 . 032944 

.482574 

.588771 

.OOOOOO 

.oooooo 

1 

.0361i:0 

.500000 

1 .386E92 

25 

-7.742782 

.000000 

2.082783 

.492499 

.671603 

.oooooo 

.oooooo 

1 

.01523^ 

.500000 . 

1 .347728 

26 

-7.742782 

. 000000 

2.207974 

.506037 

.766064 

.OOOOOO 

.oooooo 


.988069 

.500000 5 

1.297521 

27 

-7.742782 

. 000000 

2.522438 

.510204 

.791960 

.000000 

.oooooo 


.98000'0 

.500000 1 

1 .282710 

28 

-7.742782 

.000000 

3.312336 

.510204 

.791960 

.OOOOOO 

.oooooo 


. 980000 

. 500000 ^ 

1 .28271 0 

L 

X 

Y 

z 

R/RREF 

U/AREf 

V/AREF 

W/AREF 


T/TREF 

P/PREF 

ENT 

1 

-6.430446 

.000000 

.oooooo 

.977679 

.212002 

.OOOOOO 

.oooooo 


.991 01 1 

.968890 

1 .OOOCOO 

2 

-6.430446 

. 000000 

.691889 

.977679 

.212002 

.OOOOOO 

.oooooo 


.99101 1 

.968890 

1 .OOOCOO 

3 

-6.430446 

. 000000 

1 . 1 00368 

.977679 

.212002 

.OOOOOO 

.oooooo 


.99101 1 

. 968890 

1 .OOOCOO 

4 

-6.430446 

.000000 

1 .341528 

.977679 

.212002 

.OOOOOO 

.oooooo 


.991 01 1 

.968890 

1 .OOOCOO 

5 

-6.430446 

. 000000 

1 .483905 

.977679 

.212002 

.OOOOOO 

.oooooo 


.99101 1 

.968890 

1 .OOOCOO 

6 

-6.430446 

. 000000 

1 .567962 

.977679 

.212002 

.OOOOOO 

.oooooo 


.991 01 1 

.968890 

1 .OOOCOO 

7 

-6.430446 

. 000000 

1 .617587 

.977679 

.212002 

.OOOOOO 

.oooooo 


.99101 1 

.968890 

1 .OOOCOO 

8 

-6.430446 

. 000000 

1 .646886 

.977679 

.212002 

.OOOOOO 

.oooooo 


.991 01 1 

. 968890 

1 .OOOCOO 

9 

-6 .-430446 

. 000000 

1 .664183 

.975332 

.181716 

.OOOOOO 

.oooooo 


.993396 

.968890 

1 .003371 

10 

-6.430446 

. 000000 

1 .674395 

.973354 

. 151430 

.oooooo 

.oooooo 


.995414 

. 968890 

1 .006225 

11 

-6.430446 

. 000000 

1 .680424 

.971743 

.121144 

.OOOOOO 

.oooooo 


.997065 

. 968890 

1 .008563 

12 

-6.430446 

. 000000 

1 .683983 

.970493 

. 090858 

.oooooo 

.oooooo 


.998349 

.968890 

1 .010382 

13 

-6.430446 

. 000000 

1 .686085 

.969602 

.060572 

.000000 

.oooooo 


.999266 

.968890 

1 .01 1E81 

14 

-6.430446 

. 000000 

1 .687325 

.969068 

.030285 

.oooooo 

.oooooo 


. 99981 7 

.968890 

1 .012^62 

15 

-6.430446 

. 000000 

1 .688058 

.968890 

.OOOOOO 

.oooooo 

.oooooo 

1 

.OOOOOO 

.968890 

1 .012722 

16 

-6.430446 

. 000000 

2.000000 

.454203 

. OOOOOO 

.oooooo 

.oooooo 

1 

. 105440 

.502094 

1 .515777 

17 

-6.430446 

. 000000 

2.000031 

.456233 

.218045 

.oooooo 

.oooooo 

1 

.095931 

. 500000 

1 .500C60 

18 

-6.430446 

. 000000 

2.0001 10 

.457948 

.260384 

.oooooo 

.oooooo 

1 

.091828 

.500000 

1 .492203 

19 

-6.430446 

. 000000 

2.000309 

.459905 

. 302158 

.oooooo 

.oooooo 

1 

.087180 

.500000 

1 .48331 7 

20 

-6.430446 

.000000 

2.000807 

.462358 

.346609 

.oooooo 

.oooooo 

1 

.081412 

.500000 

1 .47231 2 

21 

-6.430446 

. 000000 

2.002059 

.465531 

.396219 

.oooooo 

.oooooo 

1 

.074042 

.500000 

1 .458283 

22 

-6.430446 

. 000000 

2.005204 

.469695 

.452327 

.oooooo 

.oooooo 

1 

.064520 

.500000 

1 .440215 

23 

-6.430446 

. 000000 

2.013103 

.47521 0 

.516112 

.oooooo 

.oooooo 

1 

.052166' 

.500000 

1 .416E69 

24 

-6.430446 

. oooooo 

2.032944 

.482574 

.588771 

.oooooo 

.oooooo 

1 

.036110 

.500000 

1 .386E92 

25 

-6.430446 

.000000 

2.082783 

.492499 

.671603 

.oooooo 

.oooooo 

1 

.015230 

.500000 

1 .347728 

26 

-6.430446 

.000000 

2.207974 

.506037 

. 766064 

.oooooo 

.oooooo 


.988069 

.500000 

1 .297521 

27 

-6.430446 

. oooooo 

2.522438 

.510204 

.791960 

.oooooo 

.oooooo 


.980000 

.500000 

1 .282710 

28 

-5.430446 

.000000 

3.312336 

.510204 

.791960 

.oooooo 

.oooooo 


.980000 

.500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 


T/TREF 

P/PREF 

ENT 

1 

-5.118110 

. oooooo 

.OOOOOO 

.977679 

.212002 

.oooooo 

.oooooo 


.991 01 1 

.968890 

1 .OOOCOO 

2 

-5.118110 

. oooooo 

.691889 

.977679 

.212002 

.oooooo 

-.000922 


.991 01 1 

.968890 

1 .OOOCOO 

3 

-5.118110 

. oooooo 

1 . 1 00368 

.977679 

.212002 

.oooooo 

-.001466 


.991 01 1 

.968890 

1 .OOOCOO 

4 

-5.118110 

.oooooo 

1 .341528 

.977679 

.212002 

.oooooo 

-.001788 


.991 01 1 

.968890 

1 .OOOCOO 

5 

-5.118110 

. oooooo 

1 .483905 

.977679 

.212002 

.oooooo 

-.001978 


.991 01 1 

.968890 

1 .OOOCOO 

6 

-5.118110 

.oooooo 

1 .567962 

.977679 

.212002 

.oooooo 

-.002090 


.99101 1 

.968890 

1 .OOOCOO 

7 

-5.118110 

.oooooo 

1 .617587 

.977679 

.212002 

.oooooo 

-.002156 


.991 01 1 

.968890 

1 .OOOCOO 

8 

-5.118110 

. oooooo 

1 .646886 

.977679 

.212002 

.oooooo 

-.0021 95 


.991 01 1 

.968890 

1 .OOOCOO 

9 

-5.118110 

.oooooo 

1 .664183 

.975332 

.181716 

.oooooo 

-.001901 


.993396 

.968890 

1 .003371 

10 

-5.118110 

. oooooo 

1 .674395 

.973354 

. 151430 

.oooooo 

-.001594 


.995414 

.968890 

1 .006225 

11 

-5.1 181 10 

. oooooo 

1 .680424 

.971743 

.121144 

.oooooo 

-.001280 


.997065 

.968890 

1.008563 

12 

-5.118110 

.oooooo 

1 .683983 

.970493 

. 090858 

.oooooo 

-.000962 


.998349 

.968890 

1 .010382 

13 

-5.118110 

.oooooo 

1 .686085 

.969602 

.060572 

.oooooo 

-.000642 


.999266 

.968890 

1.011681 

14 

-5.118110 

.oooooo 

1 .687325 

.969068 

.030286 

.oooooo 

-.000321 


.99981 7 

.968890 

1 .012^62 

15 

-5.118110 

. oooooo 

1 .688058 

.968890 

.OOOOOO 

.oooooo 

.oooooo 

1 

.OOOOOO 

.968890 

1 .012722 

16 

-5.118110 

. oooooo 

2.000000 

.454203 

.OOOOOO 

.oooooo 

.oooooo 

1 

. 105440 

.502094 

1 .515777 

17 

-5.118110 

.oooooo 

2.000031 

.456233 

.218045 

.oooooo 

.oooooo 

1 

.095931 

.500000 

1 .500C60 

18 

-5.118110 

. oooooo 

2.0001 10 

.457948 

.260884 

.oooooo 

.oooooo 

1 

.091828 

.500000 

1 .492203 

19 

-5.118110 

.oooooo 

2.000309 

.459905 

.302158 

.oooooo 

.oooooo 

1 

.087180 

.500000 

1 .48331 7 

20 

-5.118110 

.oooooo 

2.000807 

.462358 

.346609 

.oooooo 

.oooooo 

1 

.081412 

.500000 

1 .472312 

21 

-5.118110 

.oooooo 

2.002059 

.465531 

.396219 

.oooooo 

.oooooo 

1 

.074042 

.500000 

1 .458283 


V 


22 

-5.118110 

.000000 

2.005204 

.469695 

. 452327 

.OOOOOO 

.oooooo 

1 . 064520 

.500000 

1 .44021 5 

23 

-5.118110 

.000000 

2.013103 

.47521 0 

. 51 61 12 

.oooooo 

.oooooo 

1 .052166 

. 500000 

1 .416669 

24 

-5.118110 

.Oooooo 

2.032944 

.482574 

. 588771 

.OOOOOO 

.oooooo 

1 . 03611 0 

.500000 

1 .386692 

25 

-5.1 18110 

.000000 

2.082783 

.492499 

.671603 

.oooooo 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

-5.118110 

. OOOOOO 

2.207974 

.506037 

. 766064 

.OOOOOO 

.oooooo 

. 988069 

.500000 

1 .297621 

27 

-5.118110 

.000000 

2.522438 

.510204 

. 791 960 

.oooooo 

.oooooo 

. 980000 

.500000 

1 .28271 0 

28 

-5.118110 

. oooooo 

3.312336 

.51 0204 

. 791960 

.OOOOOO 

.oooooo 

.980000 

.500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-4.068241 

.oooooo 

•OOOOOO 

.976244 

. 218758 

.OOOOOO 

.oooooo 

. 9S0429 

. 966900 

1 .OOOCOO 

2 

-4.068241 

.oooooo 

.681615 

.976244 

. 21 8758 

.oooooo 

-.003042 

.990429 

.966900 

1 .OOOCOO 

3 

-4.068241 

.oooooo 

1 .084029 

.976244 

.218758 

.OOOOOO 

-.004838 

.990429 

.966900 

1 .OOOCOO 

4 

-4.068241 

.oooooo 

1 .321608 

.976244 

. 218758 

.oooooo 

-.005899 

.990429 

.966900 

1 .OOOCOO 

5 

-4.038241 

.oooooo 

1 .461870 

.976244 

. 218758 

.OOOOOO 

-.006525 

. 990429 

. 966900 

1 .OOOCOO 

6 

-4.068241 

.oooooo 

1 .544679 

,976244 

. 218758 

.oooooo 

-.006894 

.990429 

. 966900 

1 .OOOCOO 

7 

-4.068241 

.oooooo 

1 .593568 

.976244 

.218758 

.OOOOOO 

-.007112 

.990429 

. 966900 

1 .OOOCOO 

8 

-4 .058241 

.oooooo 

1 . 622431 

.976244 

.218758 

.oooooo 

-.007241 

.960429 

. tBESOO 

1 .eeecee 

9 

-4.058241 

. oooooo 

1 . 639472 

.973748 

. 187507 

.oooooo 

-.006272 

. 992968 

. 966900 

1 .003691 

10 

-4.068241 

. oooooo 

1 .643532 

.971645 

. 156256 

.oooooo 

-.005259 

. 9951 1 7 

. 966900 

1 .006633 

1 1 

-4.0S8241 

.oooooo 

1 .655472 

.969932 

. 125004 . 

.oooooo 

-.004222 

.996875 

.966900 

1 .009123 

12 

-4.038241 

. oooooo 

1 .558978 

.968603 

.093753 

.oooooo 

-.0031 73 

.998242 

.966900 

1 .01 1 C61 

13 

-4.068241 

. oooooo 

1 . 661 048 

.967656 

. 062502 

.oooooo 

-.0021 18 

.999219 

. 966900 

1 .012446 

14 

-4.056241 

.oooooo 

1 .662271 

.967089 

. 031 251 

.oooooo 

-.001060 

. 999805 

.966900 

1 .013278 

15 

-4.068241 

. oooooo 

i . 662992 

.966900 

.OOOOOO 

.oooooo 

.OOOOOO 

1 . OOOOOO 

.966900 

1 .013655 

16 

-4.068241 

. oooooo 

1 .980640 

.454203 

•OOOOOO 

.oooooo 

.OOOOOO 

1 .105440 

.502094 

1 .515777 

17 

-4.053241 

. oooooo 

1 .980672 

.456233 

.218045 

.oooooo 

.OOOOOO 

1 .095931 

.500000 

1 .500C60 

IB 

-4.068241 

.oooooo 

1 .980753 

. 457948 

. 260884 

.oooooo 

.OOOOOO 

1 .091 828 

.500000 

1 .492203 

19 

-4.058241 

. oooooo 

1 .980954 

.459905 

. 302158 

.oooooo. 

.OOOOOO 

1 .087180 

. 500000 

1 .48361 7 

20 

-4.068241 

. oooooo 

1 .981460 

.462358 

. 346609 

.oooooo 

.OOOOOO 

1 .081412 

. 500000 

1 .472312 

21 

-4.058241 

. oooooo 

1 .982730 

.465531 

.396219 

.oooooo 

.OOOOOO 

1 .074042 

.500000 

1 .458283 

22 

-4.058241 

. oooooo 

1 . 985921 

.469695 

. 452327 

.oooooo 

.OOOOOO 

1 . 064520 

. 500000 

1 .44021 5 

23 

-4.068241 

. oooooo 

1 .993937 

.47521 0 

.516112 

•OOOOOO 

.OOOOOO 

1 .052166 

.500000 

1 .416669 

24 

-4.068241 

.oooooo 

2.014071 

.482574 

. 588771 

.oooooo 

.oooooo 

1 .0361 10 

. 500000 

1 .386692 

25 

-4.068241 

. oooooo 

2.064645 

. 492499 

. 671603 

•OOOOOO 

.OOOOOO 

1 .015230 

. 500000 

1 .347728 

26 

-4 . 068241 

. oooooo 

2.1 91682 

.506037 

. 765064 

.oooooo 

.oooooo 

. 988069 

.500000 

1 .297621 

27 

-4.068241 

. oooooo 

2.510785 

.510204 

.791960 

.OOOOOO 

.OOOOOO 

.980000 

. 500000 

1 .282710 

26 

-4.068241 

. oooooo 

3.312336 

.51 0204 

. 791960 

.oooooo 

.oooooo 

. 980000 

. 500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-3. 280S40 

. oooooo 

.OOOOOO 

. 973886 

. 229440 

.oooooo 

.oooooo 

. 989471 

. 963632 

1 .OOOCOO 

2 

-3 . 230840 

. oooooo 

.666339 

.973886 

. 229440 

.oooooo 

-.005921 

.989471 

.963632 

1 .OOOCOO 

3 

-3.280840 

. oooooo 

1 . 059734 

.973886 

. 229440 

.oooooo 

-.009417 

.989471 

.963632 

1 .OOOCOO 

4 

-3 . 230840 

. oooooo 

1 .291988 

.973886 

. 229440 

.oooooo 

-.01 1481 

.969471 

.963632 

1 .OOOCOO 

5 

-3.230840 

. oooooo 

1 .4291 08 

.973886 

. 229440 

.oooooo 

-.01 2699 

.989471 

.963632 

1 .OOOCOO 

6 

-3.230840 

. oooooo 

1 .510060 

.973836 

. 229440 

.oooooo 

-.01 3418 

.989471 

.963632 

1 .OOOCOO 

7 

-3.230840 

.oooooo 

1 . 557854 

.973886 

.229440 

.oooooo 

-.01 3843 

.989471 

.963632 

1 .OOOCOO 

3 

-3.280840 

.oooooo 

1 .586070 

.973886 

. 229440 

.oooooo 

-.01 4094 

.989471 

.963632 

1 .OOOCOO 

9 

-3.280840 

.oooooo 

1 .602728 

.971145 

. 196663 

.oooooo 

-.01 2207 

.992265 

.963632 

1 .003654 

10 

-3.280840 

.oooooo 

1 .612563 

.968837 

. 163886 

.oooooo 

-.01 0235 

.994628 

.963632 

1 .007304 

1 1 

-3.280840 

. oooooo 

1 .613370 

.966957 

.131109 

.oooooo 

-.008218 

.996562 « 

. 963632 

1 .010C47 

12 

-3.280840 

.oooooo 

1 .621798 

.965500 

. 098331 

.oooooo 

-.006176 

.998066 - 

.963632 

1 .012182 

13 

-3.280840 

.oooooo 

1 .623822 

.964451 

.065554 

.oooooo 

-.004123 

.999141 

.963632 

1 .013707 

14 

-3 . 280840 

. oooooo 

1 .625016 

.963840 

.032777 

.oooooo 

-.002063 

.999785 

.963632 

1 .014623 

15 

-3.280840 

.oooooo 

1 . 625722 

.963632 

. OOOOOO 

.oooooo 

.OOOOOO 

1 .OOOOOO 

.963632 

1 .014628 

16 

-3.230840 

. oooooo 

1 .938270 

.454203 

.OOOOOO 

.oooooo 

.OOOOOO 

1 .105440 

.502094 

1 .515777 

17 

-3.280840 

.oooooo 

1 .938303 

.456233 

. 21 8045 

.oooooo 

.OOOOOO 

1 .095931 

.500000 

1 .500C60 

18 

-3.2B0840 

.oooooo 

1 .938386 

.457948 

.260884 

.oooooo 

.OOOOOO 

1.091828 

.500000 

1 .492203 

19 

-3.280840 

.oooooo 

1 .938594 

.459905 

.302158 

.oooooo 

.OOOOOO 

1 .087180 

.500000 

1 .483317 



20 -3.280840 

21 -3.230840 

22 -3.230840 

23 -3.230840 

24 -3.230840 

25 -3.280840 

26 -3.280840 

27 -3.280640 

28 -3.280840 

vJ= 7 K= 1 L X 

1 -2.650919 

2 -2.650919 

3 -2.650919 

4 -2.650919 

5 -2.650919 

6 -2.650919 

7 -2.650919 

8 -2.650919 

9 -2.650919 

10 -2.650919 

11 -2.650919 

12 -2.650919 

13 -2.650919 

14 -2.650919 

15 -2.650919 

16 -2.650919 

17 -2.650919 

18 -2.650919 

19 -2.650919 

20 -2.650919 

21 -2.650919 

22 -2.650919 

23 -2.650919 

24 -2.650919 

25 -2.650919 

26 -2.650919 

27 -2.650919 

28 -2.650919 

0= 8 K= 1 L X 

1 -2.204724 

2 -2.204724 

3 -2.204724 

4 -2.204724 

5 -2.204724 

6 -2.204724 

7 -2.204724 

8 -2.204724 

9 -2.204724 

10 -2.204724 

11 -2.204724 

12 -2.204724 

13 -2.204724 

14 -2.204724 

15 -2.204724 

16 -2.204724 

17 -2.204724 


. 000000 

1 .9391 16 

.462358 

.000000 

1 .940426 

.465531 

.000000 

1 .943719 

.469695 

.000000 

1 .951989 

.47521 0 

.000000 

1 .972764 

.482574 

.000000 

2.024948 

.492499 

. 000000 

2 . 1 56027 

.506037 

. 000000 

2.485283 

.510204 

. 000000 

3.312336 

.510204 

Y 

Z 

R/RREF 

.000000 

.000000 

.970077 

.000000 

.645038 

.970077 

.000000 

1 . 025858 

. 970077 

. 000000 

1 .250688 

.970077 

.000000 

1 .383424 

.970077 

.000000 

1 .461789 

.970077 

. 000000 

1 . 508055 

.970077 

. 000000 

1 . 535369 

.970077 

.000000 

1 .551495 

.966940 

. 000000 

1 .561016 

.964302 

.000000 

1 .566636 

.962154 

.000000 

1 .569955 

.960491 

. 000000 

1 .571914 

.959306 

.000000 

1 . 573070 

.958596 

. 000000 

1 .573753 

.958360 

.000000 

1 .887087 

.454203 

. 000000 

1.887121 

.456233 

.000000 

1 .887207 

.457948 

.000000 

1 .887422 

.459905 

. 000000 

1 .887963 

.462358 

. 000000 

1 .889323 

.465531 

.000000 

1 .892738 

.469695 

.000000 

1 .901317 

.47521 0 

.000000 

1 .922865 

.482574 

. 000000 

1 .976993 

.492499 

.000000 

2.1 12954 

.506037 

.000000 

2.454475 

.510204 

.000000 

3.312336 

.510204 

y 

Z 

R/RREF 

. 000000 

.000000 

.966063 

. 000000 

.626105 

.966063 

.000000 

.995746 

.966063 

.000000 

1 .213977 

.966063 

.000000 

1 .342817 

.966063 

. 000000 

1 .418881 

.966063 

. 000000 

1 .463789 

.966063 

.000000 

1 .490302 

. 966063 

. 000000 

1 .505954 

.962512 

.000000 

1 .515195 

.959527 

.000000 

1 .520651 

.957099 

.000000 

1 .523872 

.955219 

. 000000 

1.525774 

.953881 

.000000 

1 .526896 

.953080 

.000000 

1 .527559 

.952813 

.000000 

1 .841483 

.454203 

.000000 

1 .841518 

.456233 


. 346609 

.000000 

.000000 

.396219 

.000000 

.000000 

.452327 

.000000 

.000000 

.516112 

.000000 

.000000 

.588771 

.000000 

.000000 

.671603 

.000000 

.000000 

. 766064 

.000000 

.000000 

. 791960 

.000000 

.000000 

.791960 

.000000 

.000000 

U/AREF 

V/AREF 

W/AREF 

. 245749 

.000000 

.000000 

. 245749 

.000000 

-.009188 

. 245749 

.000000 

-.014613 

. 245749 

.000000 

-.01 7815 

. 245749 

.000000 

-.01 9706 

. 245749 

.000000 

-.020822 

. 245749 

.000000 

-.021481 

. 245749 

.000000 

-.021870 

.210642 

.000000 

-.01 8943 

. 175535 

.000000 

-.015883 

. 140428 

.000000 

-.01 2752 

. 1 05321 

.000000 

-.009584 

. 070214 

.000000 

-.006397 

.035107 

.000000 

-.003201 

. 000000 

.000000 

.000000 

. 000000 

.000000 

.000000 

.218045 

.000000 

.000000 

.260884 

.000000 

.000000 

.302158 

.000000 

.000000 

.346609 

.000000 

.000000 

.396219 

.000000 

.000000 

.452327 

.000000 

.000000 

.516112 . 

.000000 

.000000 

. 588771 

.000000 

.000000 

. 671603 

.000000 

.000000 

. 766064 

.000000 

.000000 

.791960 

.000000 

.000000 

.791960 

.000000 

.000000 

U/AREF 

V/AREF 

W/AREF 

.261874 

.000000 

.000000 

.261874 

.000000 

-.01 1876 

. 261874 

.000000 

-.01 8888 

.261874 

.000000 

-.023027 

. 261874 

.000000 

-.025471 

. 261874 

.000000 

-.026914 

.261874 

.000000 

-.027765 

.261874 

.000000 

-.028268 

. 224463 

.000000 

-.024485 

. 187053 

.000000 

-.020529 

. 149642 

.000000 

-.01 6482 

. 1 1 2232 

.000000 

-.01 2388 

. 074821 

.000000 

-.008269 

.037411 

.000000 

-.0041 38 

. 000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.218045 

.000000 

.000000 


1 .081412 

. 500000 

1 .472312 

1 .074042 

. 500000 

1 .458283 

1 .064520 

. 500000 

1 .440215 

1 .052166 

.500000 

1 .416£69 

1 .036110 

.500000 

1 .386692 

1 .015230 

.500000 

1 .347728 

.988069 

.500000 

1 .297E21 

.980000 

.500000 

1 .282710 

.980000 

.500000 

1 .28271 0 

T/TREF 

P/PREF 

ENT 

.987921 

. 958360 

1 .OOOCOO 

.987921 

.958360 

1 .OOOCOO 

.987921 

.958360 

1 .OOOCOO 

.987921 

.958360 

1 .OOOCOO 

.987921 

.958360 

1 .OOOCOO 

.987921 

. 958360 

1 .OOOCOO 

.987921 

. 958360 

1 .OOOCOO 

.987921 

. 958360 

1 .OOOCOO 

.991 126 

.958360 

1 .004=44 

.993837 

.958360 

1 .008394 

.996056 

.958360 

1 .01 1=46 

.997781 

.958360 

1 .014C01 

.959014 

. 958360 

1 .015755 

.989753 

.958360 

1 .016E07 

1 .000000 

.958360 

1 .017158 

1 .105440 

.502094 

1 .515777 

1 .085931 

.500000 

1 .500C60 

1 .091 828 

.500000 

1 .492203 

1 .087180 

.500000 

1 .48331 7 

1 .081412 

. 500000 

1 .472312 

1 .074042 

. 500000 

1 .458283 

1 .064520 

.500000 

1 .440215 

1 .052166 

.500000 

1 .416669 

1 .0361 10 

.500000 

1 .386692 

1 .015230 

.500000 

1.347728 

.988069 

.500000 

1 .297=21 

.980000 

.500000 

1 .282710 

.980000 

. 500000 

1 .282710 

T/TREF 

P/PREF 

ENT 

.986284 

.952813 

1 .OOOCOO 

.986284 

.952813 

1 .OOOCOO 

.986284 

.952813 

1 .OOOCOO 

.986284 

.952813 

1 .OOOCOO 

.986284 

.952813 

1 .OOOCOO 

. 986284 

.952813 

1 .OOOCOO 

.986284 

.952813 

1 .OOOCOO 

.986284 

. 952813 

1 .OOOCOO 

.989923 

.952813 

1 .005169 

.983002 

.952813 

1 .009649 

.995521 

. 952813 

1.013136 

.987481 

.952813 

1 .015629 

.958880 

.952813 

1 .017625 

.999720 

.952813 

1 .019123 

1 .000000 

.952813 

1 .019=23 

1 .105440 

.502094 

1 .515777 

1 .095931 

.500000 

1 .500C60 





18 

-2.204724 

.000000 

1 . 841607 

.457948 



19 

-2.204724 

.000000 

1 . 841829 

.459905 



20 

-2.204724 

.000000 

1 .842388 

.462358 



21 

-2.204724 

.000000 

1 .843791 

.465531 



22 

-2 . 204724 

. 000000 

1 .847315 

.469695 

' 


23 

-2.204724 

.000000 

1 .856168 

.475210 



24 

-2 .204724 

.000000 

1 .878406 

.482574 



25 

-2.204724 

.000000 

1 .934266 

.492499 



26 

-2.204724 

. 000000 

2.074578 

.506037 



27 

-2 .204724 

.000000 

2.427026 

.510204 



28 

-2.204724 

, 000000 

3.312336 

.510204 

d= 9 

K= 

1 L 

X 

Y 

Z 

R/RREF 



1 

-1 .837270 

.000000 

.000000 

.961581 



2 

-1 .837270 

. 000000 

.608139 

.961581 



3 

-1 .837270 

.000000 

. 9671 74 

.961581 



4 

-1 .837270 

. 000000 

1 . 1 79143 

.961581 



5 

-1 .837270 

. 000000 

1 . 304286 

.961581 



6 

-1 .837270 

. 000000 

1 .378168 

.961581 



7 

-1 .837270 ■ 

. 000000 

1 .421787 

.961581 



8 

-1 .837270 

. 000000 

1 .447539 

.961581 



9 

-1 .837270 

. 000000 

1 .462742 

.957569 



10 

-1 .837270 

. 000000 

1 .471718 

.954200 



1 1 

-1 .837270 

.000000 

1 .477017 

.951461 



12 

-1.837270 

.000000 

1 .4801 46 

.949342 



13 

-1 .837270 

. 000000 

1 .481993 

.947834 



14 

-1 .837270 

.000000 

1 . 483083 

. 946931 



15 

-1 .837270 

. 000000 

1 . 483727 

.946630 



16 

-1 .837270 

. 000000 

1 . 798071 

.454203 



17 

-1 .837270 

.000000 

1 .798107 

.456233 



18 

-1 .837270 

. 000000 

1 .798198 

.457948 



19 

-1 .837270 

. 000000 

1 . 798427 

.459905 



20 

-1 .837270 

. 000000 

1 . 799002 

.462358 



21 

-1 .837270 

. 000000 

1 . 800447 

. 465531 



22 

-1 .837270 

.000000 

1 .804075 

.469695 



23 

-1 .837270 

. 000000 

1 .813190 

.47521 0 



24 

-1 .837270 

. 000000 

1 . 836084 

.482574 



25 

-1 .837270 

.000000 

1 .893592 

.492499 



26 

“1 .837270 

.000000 

2.038046 

.506037 



27 

-1 .837270 

.000000 

2.400896 

.510204 



28 

-1 .837270 

.000000 

3.312336 

.510204 

0= 10 

K= 

1 L 

:< 

Y 

Z 

R/RREF 



1 

-1 .533333 

. 000000 

. 000000 

.954544 



2 

-1 .533333 

. 000000 

.584795 

.954544 



3 

-1 .533333 

. 000000 

.930048 

.954544 



4 

-1 .533333 

.000000 

1 .133879 

.954544 

, 


5 

-1 .533333 

.000000 

1 .254218 

.954544 

1 


6 

-1 .533333 

. 000000 

1 .325265 

.954544 

1 


7 

-1 .533333 

.000000 

1 .367209 

.954544 



8 

-1 .533333 

.000000 

1 .391972 

. 954544 



9 

-1 .533333 

. 000000 

1 .406592 

.94981 0 



10 

-1 .533333 

. 000000 

1 .415224 

.945842 



11 

-1 .533333 

.000000 

1 .420319 

.942620 



12 

-1 .533333 

. cooooo 

1 .423328 

.940129 



13 

-1 .533333 

. 000000 

1 .4251 04 

.938357 



14 

-1 .533333 

. 000000 

1 .4261 53 

.937298 



15 

-1 .533333 

.000000 

1 .426772 

.936945 


. 260884 

.000000 

.000000 

.302158 

.000000 

.000000 

.346609 

.000000 

. 000000 

. 396219 

.000000 

.000000 

.452327 

.000000 

.cooooo 

.516112 

.000000 

.000000 

.588771 

.000000 

.000000 

.671603 

.000000 

.000000 

. 766064 

.000000 

.000000 

. 791960 

.000000 

.cooooo 

.791960 

.000000 

.000000 

U/AREF 

V/AREF 

W/AREF 

.278822 

.000000 

.000000 

. 278822 

.000000 

-.017156 

. 278822 

.000000 

-.027284 

. 278822 

.000000 

-.033264 

. 278822 

.000000 

-.036794 

. 278822 

.000000 

-.038878 

. 278822 

.000000 

-.040109 

.278822 

.000000 

-.040835 

. 238990 

.000000 

- .035369 

. 199158 

.000000 

-.029655 

. 159327 

.000000 

-.023810 

. 1 1 9495 

.000000 

-.01 7895 

. 079663 

.000000 

-.01 1945 

. 039832 

.000000 

-.005977 

. 000000 

.000000 ' 

.COOOOO 

.000000 

.000000 

.000000 

.218045 

.000000 

.000000 

.260884 

.000000 

.000000 

.302158 

.000000 

.000000 

. 346609 

.000000 

.000000 

. 396219 

.000000 

.000000 

.452327 

.000000 

.000000 

.516112 

.000000 

.000000 

.588771 

.000000 

.000000 

.671603 

.000000 

.000000 

.766064 

.000000 

.000000 

.791960 

.000000 

.000000 

.791960 

.000000 

.000000 

U/AREf 

V/AREF 

W/AREF 

.303618 

.000000 

.000000 

.303618 

.000000 

-.038543 

.303618 

.000000 

-.061298 

.303618 

.000000 

-.074733 

. 303618 

.000000 

-.082664 

.303618 

.000000 

-.087347 

.303618 

.000000 

-.0901 1 1 

.303618 

.000000 

-.091743 

. 260244 

.000000 

-.079463 

.216870 

.000000 

-.066626 

.173496 

.000000 

-.053492 

. 130122 

.000000 

- .040204 

.086748 

.000000 

-.026836 

.043374 

.000000 

-.01 3428 

.000000 

.000000 

.COOOOO 


1 .091 828 

. 500000 

1 .492203 

1 .087180 

. 500000 

1 .48331 7 

1 .081412 

.500000 

1 .47231 2 

1 .074042 

. 500000 

1 .458283 

1 .064520 

. 500000 

1 .44021 5 

1 .052166 

. 500000 

1 .416E69 

1 .0361 1 0 

. 500000 

1 .386692 

1 .015230 

. 500000 

1 .347728 

.988069 

. 500000 

1 .297E21 

.980000 

. 500000 

1 .282710 

.980000 

.500000 

1 .282710 

T/TREF 

P/PREF 

ENT 

.984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

. 984452 

.946630 

1 .OOOCOO 

.984452 

.946630 

1 .OOOCOO 

.988577 

.946630 

1 .005671 

.992067 

.946630 

1 .010847 

. 994923 

.946630 

1 .014923 

.997144 

.946630 

1 .018C97 

.998731 

. 946630 

1 .020365 

. 999683 

. 946630 

1 .021727 

1 .000000 

. 946630 

1 .022181 

1 . 105440 

.502094 

1 .515777 

1 .095931 

. 500000 

1 .500C60 

1 .091 828 

.500000 

1 .492203 

1 . 087180 

.500000 

1 .483317 

1.081412 : 

.500000 

1 .47231 2 

1 . 074042 

. 500000 

1 .458283 

1 .064520 

.500000 

1 .44021 5 

1 . 052166 

.500000 

1 .416669 

1 .0361 1 0 

.500000 

1 .386692 

1 .015230 

.500000 

1 .347728 

.988069 

.500000 

1 .297521 

.980000 

.500000 

1 .282710 

.980000 

.500000 

1 .282710 

T/TREF 

P/PREF 

ENT 

.981 563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.981563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.981 563 

.936945 

1 .OOOCOO 

.986455 

. 936945 

1 .006983 

.990593 

.936945 

1 .012903 

.993980 

.936945 

1.017754 

.996614 

.936945 

1 .021532 

.998495 

.936945 

1 .024233 

.999624 

.936945 

1 .025654 

1 .000000 

.936945 

1 .026395 



16 

-1 .533333 

.000000 

1 .758147 

.454203 

. OOOOOO 

.OOOOOO 

.oooooo 

1 .105440 

.502094 

1 .515777 

17 

-1 .533333 

.000000 

1 .758184 

.456233 

.218045 

.oooooo 

.oooooo 

1 .095931 

.500000 

1 .500C60 

13 

-1 .533333 

. 000000 

1 .758278 

.457948 

. 260884 

.OOOOOO 

.oooooo 

1 .091 828 

.500000 

1 .492203 

19 

-1 .533333 

. 000000 

1 .758513 

.459905 

. 302158 

.000000 

.oooooo 

1 .087180 

.500000 

1 .48331 7 

20 

-1 .533333 

. 000000 

1 . 7591 03 

.462358 

. 346609 

.OOOOOO 

.oooooo 

1.061412 

.500000 

1 .47231 2 

21 

-1 .533333 

.000000 

1 .760586 

.465531 

.396219 

.OOOOOO 

.oooooo 

1 .074042 

. 500000 

1 .458283 

22 

-1 .533333 

. 000000 

1 .764310 

.469695 

. 452327 

.OOOOOO 

.oooooo 

1 .064520 

.500000 

1 .44021 5 

23 

-1 .533333 

.000000 

1 .773665 

.47521 0 

.516112 

.OOOOOO 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

-1 .533333 

.000000 

1 .797162 

.482574 

. 588771 

.OOOOOO 

.oooooo 

1 .0361 10 

.500000 

1 .386692 

25 

-1 .533333 

. oooooo 

1 .856187 

.492499 

. 671603 

.OOOOOO 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

-1 .533333 

.000000 

2.004449 

.506037 

. 766064 

.OOOOOO 

.oooooo 

.988069 

,500000 

1 .297521 

27 

-1 .533333 

.000000 

2.376866 

.510204 

.791960 

.OOOOOO 

.oooooo 

.980000 

.500000 

1 .282710 

28 

-1 .533333 

.000000 

3.312336 

.51 0204 

. 791960 

.OOOOOO 

.oooooo 

.980000 

.500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT , 

1 

-1 .300000 

.000000 

..OOOOOO 

.935875 

.361671 

.OOOOOO 

.oooooo 

.973839 

.91 1391 

1 .OOOCOO 

2 

-1 .300000 

. oooooo 

.539934 

.935875 

. 361671 

.OOOOOO 

-.070951 

.973839 

.911391 

1 .OOOCOO 

3 

-1 .300000 

. oooooo 

.858703 

.935875 

. 361671 

.OOOOOO 

-. 11 2840 

.973839 

.91 1391 

1 .OOOCOO 

4 

-1 .300000 

. oooooo 

1 .046899 

.935875 

. 361671 

.OOOOOO 

-. 137570 

.973839 

.91 1391 

1 .OOOCOO 

5 

-1 .300000 

. oooooo 

1 . 1 58006 

.935875 

.361671 

.OOOOOO 

-.152170 

.973839 

.91 1391 

1 .OOOCOO 

6 

-1 .300000 

. oooooo 

1 . 223602 

.935875 

. 361671 

.OOOOOO 

-.160790 

.973839 

.911391 

1 .OOOCOO 

7 

-1 .300000 

.oooooo 

1 .262329 

.935875 

.361671 

.OOOOOO 

-.165879 

.973839 

.911391 

1 .OOOCOO 

8 

-1 .300000 

. oooooo 

1 .285193 

.935875 

. 361671 

.OOOOOO 

-.168883 

.973839 

.911391 

1 .OOOCOO 

9 

-1 .300000 

.oooooo 

1 .298691 

.929252 

.310003 

.OOOOOO 

-.146278 

.960780 

.911391 

1 .009692 

10 

-1 .300000 

. oooooo 

1 .306661 

.923721 

. 258336 

.OOOOOO 

-.122646 

.966652 

.91 1391 

.1 .Q^8‘^69 

1 1 

-1 .300000 

. oooooo 

1 .311365 

.919244 

. 206669 

.OOOOOO 

-.098470 

.991458 

.91 1391 

1 .025'!20 

12 

-1 .300000 

. oooooo 

1 .314143 

.915792 

. 155002 

.OOOOOO 

-.074009 

.995195 

.91 1391 

1 .030836 

13 

-1 .300000 

. oooooo 

1 .315783 

.91 3342 

. 103334 

.OOOOOO 

-.049401 

.997864 

.91 1391 

1 .034709 

14 

-1 .300000 

. oooooo 

1 .316751 

.91 1878 

. 051667 

.OOOOOO 

-.024719 

.999466 

.91 1391 

1 .037C35 

15 

-1 .300000 

. oooooo 

1 .317323 

.911391 

. OOOOOO 

.OOOOOO 

.OOOOOO 

1 .OOOOOO 

.911391 

1 .03781 0 

16 

-1 .300000 

. oooooo 

1 .725018 

.454203 

. OOOOOO 

.oooooo 

.OOOOOO 

1 .105440 

.502094 

1 .515777 

17 

-1 .300000 

. oooooo 

1 . 725056 

.456233 

.218045 

.OOOOOO 

.OOOOOO 

1 .095931 

.500000 

1 .500G60 

18 

-1 .300000 

. oooooo 

1 . 7251 52 

.457948 

. 260884 

.oooooo 

.OOOOOO 

1 .091828 

.500000 

1 .492203 

19 

-1 .300000 

. oooooo 

1 .725392 

.459905 

.302158 

.OOOOOO 

.OOOOOO 

1 .067180 

.500000 

1 .48331 7 

20 

-1 .300000 

. oooooo 

1 .725995 

.462358 

. 346609 

.oooooo 

.OOOOOO 

1 .061412 

. 500000 

1 .47231 2 

21 

-1 .300000 

. oooooo 

1 .727509 

.465531 

.396219 

.000000 

.OOOOOO 

1 .074042 

.500000 

1 .458283 

22 

-i .300000 

. oooooo 

1 .731313 

.469695 

. 452327 

.oooooo 

.OOOOOO 

1 .064520 

.500000 

1 .440215 

23 

-1 .300000 

. oooooo 

1 .740867 

.475210 

.516112 

.oooooo 

.OOOOOO 

1.052166 

. 500000 

1 .416869 

24 

“1 .300000 

.oooooo 

1 .764865 

.482574 

. 588771 

.oooooo 

•OOOOOO 

1 .0361 10 

.500000 

1 .386692 

25 

-1 .300000 

. oooooo 

1 .825148 

.492499 

. 671603 

.oooooo 

.OOOOOO 

1 .015230 

.500000 

1 .347728 

26 

-1 .300000 

. oooooo 

1 .976570 

.506037 

. 766064 

.oooooo 

.OOOOOO 

.988069 

.500000 

1 .297521 

27 

-1 .300000 

. oooooo 

2.356926 

.510204 

. 791960 

.oooooo 

.OOOOOO 

.980000 

.500000 

1 .282710 

23 

-1 .300000 

. oooooo 

3.312336 

.510204 

. 791960 

.oooooo 

.OOOOOO 

.980000 

.500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

f/TREF 

P/PREF 

ENT 

1 

“1 . 056667 

. oooooo 

.OOOOOO 

.903706 

. 445484 

.oooooo 

.OOOOOO 

.960309 

.867837 

1 .OOOCOO 

2 

-1 .066667 

.oooooo 

.493246 

.903706 

.445484 

.oooooo 

-.075720 

.960309 

.867837 

1 .OOOCOO 

3 

-1 .066667 

. oooooo 

, .784450 

.903706 

. 445484 

.oooooo 

-.120424 

.960309 

.867837 

1 .OOOCOO 

4 

-1 .066667 

.oooooo 

.956372 

.903706 

. 445484 

.oooooo 

-.146817 

.960309 

.867837 

1 .OOOCOO 

5 

-1 .066667 

. oooooo 

1 .057872 

.903706 

.445484 

.oooooo 

-.162399 

.960309 

.867837 

1 .OOOCOO 

6 

-1 .066667 

. oooooo 

1 .1 17796 

.903706 

.445484 

.oooooo 

-.171598 

.960309 

.867837 

1 .OOOCOO 

7 

-1 .066667 

. oooooo 

1 . 1531 74 

.903706 

. 445484 

.oooooo 

-. 177029 

.960309 

.867837 

1 .OOOCOO 

8 

-1 .066667 

.oooooo 

1 . 1 74061 

.903706 

.445484 

.oooooo 

-.180235 

.960309 

.867837 

1 .OOOCOO 

9 

-1 .056667 

. oooooo 

1 .186392 

.893904 

.381843 

.oooooo 

-.1561 10 

.970839 

.867837 

1 .015385 

10 

-1 .056667 

.oooooo 

1 . 193672 

.885775 

. 318203 

.oooooo 

-. 130890 

.979749 

.867837 

1 .028'556 

1 1 

-1 .056667 

.oooooo 

1 . 197970 

.879232 

.254562 

.oooooo 

-.105089 

.987040 

.867837 

1 .039186 

12 

-1 .066667 

.oooooo 

1 .200507 

.874210 

. 190922 

.oooooo 

-.078984 

.962710 

.867837 

1 .047553 

1 3 

-1 .066667 

.oooooo 

1 .202005 

.870658 

. 127281 

.oooooo 

-.052722 

.996760 

.867837 

1 .053541 


7 


t 


14 

-1.066667 

. 000000 

1 .202890 

.868541 

15 

—1 . 036667 

.000000 

1 .203412 

.867837 

16 

-1 -0S66S7 

. 000000 

1 .689730 

.454203 

17 

-1 .066667 

.000000 

1 .689769 

.456233 

18 

-1 .056667 

.000000 

1 .689866 

.457948 

19 

—1 . 066667 

.000000 

1 .6901 12 

.459905 

20 

-1 .056667 

.000000 

1 .690728 

.462358 

21 

-1 .066667 

.000000 

1 .692276 

.465531 

22 

-1 .066667 

. 000000 

1 .6961 64 

.469635 

23 

-1 .066667 

.000000 

1 .705930 

.47521 0 

24 

-1 .066667 

. 000000 

1 . 730463 

.482574 

25 

-1 .066667 

. 000000 

1 .792085 

.492499 

26 

-1 .066667 

.000000 

1 .946874 

.506037 

27 

-1 .066667 

.000000 

2.335685 

.51 0204 

28 

-1 .066667 

.000000 

3.312336 

.510204 

L 

X 

Y 

Z 

R/RREF 

1 

-.800000 

.000000 

.000000 

.855761 

2 

-.800000 

.000000 

.454948 

.855761 

3 

-.800000 

.000000 

.723541 

.855761 

4 

-.800000 

.000000 

.8821 15 

.855761 

5 

-.800000 

.000000 

. 975734 

.855761 

6 

-.800000 

. 000000 

1 .031005 

.855761 

7 

-.800000 

.000000 

1 . 063636 

.855761 

3 

-.800000 

.000000 

1 . 082901 

.855761 

9 

-.800000 

.000000 

1 .094275 

.84141 0 

10 

-.800000 

.000000 

1 .100990 

.829638 

1 1 

-.800000 

.000000 

1 . 1 04954 

.820248 

12 

-.800000 

. 000000 

1 . 1 07295 

.813091 

13 

-.800000 

. 000000 

1 . 1 08676 

.808054 

14 

-.800000 

.000000 

1 . 1 09492 

.805062 

15 

-.800000 

.000000 

1 . 1 09974 

.804070 

16 

- . 800000 

.000000 

1 .646740 

.454203 

17 

-.800000 

.000000 

1 .646780 

.456233 

18 

-.800000 

. 000000 

1 .646880 

.457948 

19 

-.800000 

. 000000 

1 .6471 32 

. 459905 

20 

-.800000 

. 000000 

1 . 647765 

. 462358 

21 

-.800000 

. 000000 

1 .649354 

.465531 

22 

-.800000 

. 000000 

1 .653345 

.469695 

23 

-.800000 

. 000000 

1 .663370 

.47521 0 

24 

-.800000 

.000000 

1 .688552 

.482574 

25 

-.800000 

. 000000 

1 .751807 

. 492499 

26 

-.800000 

.000000 

1 .910697 

.506037 

27 

-.800000 

. 000000 

2.309810 

.51 0204 

28 

-.800000 

.000000 

3.312336 

.510204 

L 

X 

. Y 

Z 

R/RREF 

1 

-.533333 

.000000 ^ 

. 000000 

. 795286 

2 

-.533333 

.000000 

.429559 

.795286 

3 

-.533333 

.000000 

.6831 64 

.795286 

4 

-.533333 

. 000000 

.832888 

.795286 

5 

-.533333 

.000000 

.921283 

. 795286 

6 

-.533333 

.000000 

.973470 

.795286 

7 

-.533333 

.000000 

1.004280 

.795286 

8 

-.533333 

.000000 

1 . 022470 

.785286 

9 

-.533333 

.000000 

1 . 033209 

.775543 

10 

-.533333 

. 000000 

1 .039549 

.759588 

11 

-.533333 

.000000 

1 . 043292 

.747014 


•t f 


. 063641 
. 000000 
. 000000 
.218045 
. 260884 
.302158 
. 346609 
.396219 
. 452327 
.516112 
. 588771 
. 671603 
. 766064 
. 791960 
. 791 960 

U/AREF 
. 549564 
. 549564 
. 549564 
. 549564 
. 549564 
. 549564 
. 549564 
. 549564 
. 471055 
. 392546 
. 314037 
.235528 
. 157018 
. 078509 
. 000000 
. 000000 
. 218045 
. 260884 
. 302158 
. 346609 
. 396219 
. 452327 
.516112 
.588771 
.671603 
. 766064 
. 791960 
. 791 960 

U/AREF 
.661625 
. 661625 
.661 625 
. 661625 
. 661625 
.'661625 
. 661625 
. 661625 
.567107 
.472589 
.378072 


.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

V/AREF 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

V/AREF 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 


-.026380 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

.000000 

,000000 

.000000 

.000000 

.000000 

W/AREF 
.000000 
-.065624 
-. 104368 
-.127242 
-.140746 
-.148718 
-.153425 
-.156204 
-. 135296 
-. 11 3438 
-.091077 
-.068453 
-.045692 
-.022863 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 
.000000 

W/AREF 
.000000 
-.049779 
-.0791 68 
-.096518 
-.106762 
-.112809 
-.116380 
-.118488 
-.102628 
-.086048 
-. 069086 


.999 190 
1 . 000000 
1 .105440 
1 .095931 
1 .091828 
1 .087180 
1 .081412 
1 .074042 

1 . 064520 
1 .052166 
1 . 0361 1 0 
1 .015230 

.988069 

.980000 

.980000 

T/TREF 
.939596 
.939596 
.939596 
. 939596 
.939596 
.939596 
.939596 
. 939596 
.955621 
. 969182 
.980276 
.988905 
.995069 
.998767 
1 .000000 
1 . 105440 
1 .095931 
1 . 091 828 
1 .087180 
1.081412 
1 .074042 

1 .064520 
1 .052166 
1 .036110 
1 .015230 

.988069 

.980000 

.980000 

T/TREF 

.912450 

.912450 

.912450 

.912450 

.912450 

.912450 

.912450 

.912450 

.935678 

.955332 

.971412 


. 867837 
.867837 
. 502094 
. 500000 
. 500000 
. 500000 
. 500000 
. 500000 
. 500000 
.500000 
. 500000 
. 500000 
.500000 
.500000 
.500000 

P/PREF 
. 804070 
.804070 
.804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
. 804070 
, 502094 
. 500000 
. 500000 
. 500000 
. 500000 
. 500000 
. 500000 
.500000 
, 500000 
, 500000 
. 500000 
. 500000 
. 500000 

P/PREF 
. 725659 
. 725659 
.725659 
. 725659 
. 725659 
.725659 
. 725659 
.725659 
.725659 
.725659 
. 725659 


1 .057139 
1 .058339 
1 .515777 
1 .500C60 
1 .492203 
1 .48331 7 
1 .47231 2 
1 .458283 
1 .44021 5 
1 .416669 
1 .386692 
1 .347728 
1 .297521 

1 .28271 0 

1 .28271 0 


1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .023959 
1 .044359 
1.061134 
1 .074235 
1 .083620 
1 .089262 
1 .091 145 
1 .515777 
1 .500C60 
1 .492203 
1 .48331 7 
1 .47231 2 
1 .458283 
1 .44021 5 
1 .416669 
1 .386692 
1 .347728 
1 .297521 

1 .28271 0 

1 .28271 0 

ENT 

1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .OOOCOO 
1 .035619 
1 .066407 
1 .091622 


12 

-.533333 

. oooooo 

1 . 045502 

.73751 9 

. 283554 

.OOOOOO 

-.051924 

.98391 9 

. 725659 

1.11 1349 

13 

-.533333 

.000000 

1 .046806 

. 730882 

. 189036 

.oooooo 

-.034659 

.992853 

.725659 

1 .125E01 

14 

-.533333 

.000000 

1 .047577 

.726958 

. 094518 

.OOOOOO 

-.01 7342 

.958213 

.725659 

1 . 1 34C1 7 

15 

-.533333 

. oooooo 

1 .048031 

. 725659 

. OOOOOO 

.oooooo 

.oooooo 

1 .OOOOOO 

. 725659 

1 . 1 36660 

16 

-.533333 

. oooooo 

1 .600900 

.454203 

.OOOOOO 

,000000 

.oooooo 

1 .105440 

. 502094 

1 .515777 

17 

-.533333 

.oooooo 

1 .600941 

.456233 

.218045 

.000000 

.oooooo 

1 .095931 

. 500000 

1 .500C60 

18 

-.533333 

.oooooo 

1 .601044 

.457948 

. 260884 

.oooooo 

.oooooo 

1 .091828 

.500000 

1 .492203 

19 

-.533333 

. oooooo 

1 .601303 

.459905 

.302158 

.oooooo 

.oooooo 

1 .087180 

.500000 

1 .48331 7 

20 

- .533333 

.oooooo 

. 1 .601953 

.462358 

.346609 

.oooooo 

.oooooo 

1 .081412 

.500000 

1 .47231 2 

21 

-.533333 

. oooooo 

1 .603586 

.465531 

.396219 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

-.533333 

.oooooo 

1 .607687 

.469695 

. 452327 

.oooooo 

.oooooo 

1 .064520 

.500000 . 

1 .44021 5 

23 

-.533333 

.oooooo 

1 .617988 

.47521 0 

.516112 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

-.533333 

. oooooo 

1 .643863 

.482574 

. 588771 

.oooooo 

.oooooo 

1.036110 

.500000 

1 .386692 

25 

-.533333 

.oooooo 

1 .708859 

.492499 

.671603 

.oooooo 

.oooooo 

1 .015230 

. 500000 

1 ,347728 

26 

-.533333 

. oooooo 

1 . 8721 22 

.506037 

. 766064 

.oooooo 

.oooooo 

.988069 

. 500000 

1 -297E21 

27 

-.533333 

.oooooo 

2.282219 

.510204 

. 791960 

.oooooo 

.oooooo 

.980000 

.500000 

1 .28271 0 

28 

-.533333 

.oooooo 

3.312336 

.51 0204 

. 791960 

.oooooo 

.oooooo 

.980000 

. 500000 

1 .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

t/tref 

P/PREF 

ENT 

1 

-.256667 

. oooooo 

.OOOOOO 

.722505 

. 780755 

.oooooo 

.oooooo 

.878084 

.634420 

1 .OOOCOO 

2 

-.256667 

. oooooo 

.414821 

.722505 

. 780755 

.oooooo 

-.028820 

.878084 

.634420 

1 .OOOCOO 

3 

-.236667 

. oooooo 

.659725 

.722505 

. 780755 

.oooooo 

-.045835 

.878084 

.634420 

1 .OOOCOO 

4 

-.268667 

.oooooo 

.804312 

.722505 

. 780755 

.oooooo 

-.055880 

.878084 

.634420 

1 .OOOCOO 

5 

— . 236667 

.oooooo 

.889674 

. 722505 

. 780755 

.oooooo 

-.061810 

.878084 

.634420 

1 .OOOCOO 

6 

-.266667 

. oooooo 

.940070 

.722505 

. 780755 

.oooooo 

-.065312 

.878084 

.634420 

1 .OOOCOO 

7 

- . 256667 

.oooooo 

.969823 

.722505 

. 780755 

.oooooo 

-.067379 

.878084 

.634420 

1 .OOOCOO 

8 

-.256667 

. oooooo 

.987389 

.722505 

.780755 

.oooooo . 

-.068599 

.878084 

.634420 

1 .OOOCOO 

9 

-.266667 

.oooooo 

.997759 

.696836 

. 669218 

.oooooo 

-.059417 

.910429 

.634420 

1 .051947 

10 

-.266667 

. oooooo 

1 . 003882 

.676500 

.557682 

.oooooo 

-.049818 

.937798 

.634420 

1 .096^84 

1 1 

-.256667 

. oooooo 

1 .007497 

.660723 

.446145 

.oooooo 

-.039998 

.960191 

.634420 

1 .133313 

12 

-.266667 

.oooooo 

1 . 009631 

.648952 

. 334509 

.oooooo 

-.030062 

.977607 

.634420 

1 .162196 

13 

-.256667 

.oooooo 

1 .010891 

.640798 

. 223073 

.oooooo 

-.020066 

.990048 

.634420 

1 .182954 

14 

-.266667 

.oooooo 

1 .011634 

.636003 

.111 536 

.oooooo 

-.01 0040 

,99751 2 

.634420 

1 . 1 95^59 

15 

- . 266667 

. oooooo 

1 .012073 

.634420 

. OOOOOO 

.oooooo 

,000000 

1 .OOOOOO 

.634420 

1 .199635 

16 

-.286667 

. oooooo 

1 . 5521 94 

.454203 

. OOOOOO 

.oooooo 

. OOOOOO 

1 .105440 

. 502094 

1 .515777 

17 

-.266667 

.oooooo 

1 .552236 

.456233 

.218045 

.oooooo 

.OOOOOO 

1 .095931 

.500000 

1 .500C60 

18 

- . 236667 

. oooooo 

1 .552342 

.457948 

. 260884 

.oooooo 

.OOOOOO 

1 .091828 

.500000 

1 ,492203 

19 

-.266667 

. oooooo 

1 .552609 

.459905 

. 302158 

.oooooo 

.oooooo 

1 .087180 

.500000 

1 .48331 7 

20 

-.266667 

.oooooo 

1 .553277 

.462358 

. 346609 

.oooooo 

.oooooo 

1 .081412 

.500000 

1 .472312 

21 

-.266667 

. oooooo 

1 .554956 

.465531 

.396219 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

- .256667 

.oooooo 

1 .5591 74 

.469595 

.452327 

.oooooo 

.oooooo 

1 .064520 

.500000 

1 .44021 5 

23 

-.256667 

.oooooo 

1 .569768 

.47521 0 

.516112 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

-.256667 

. oooooo 

1 . 596380 

.482574 

. 588771 

.oooooo 

.oooooo 

1 .036110 

.500000 

1 .386692 

25 

— . 236667 

. oooooo 

1 .6632'26 

. 492499 

. 671503 

.oooooo 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

-.256667 

.oooooo 

1 .831134 

.506037 

.766064 

.oooooo 

.oooooo 

.988069 

. 500000 

1 .297521 

27 

-.266667 

.oooooo 

2.252902 

.510204 

. 791960 

,000000 

.oooooo 

.980000 

.500000 

1 .282710 

28 

-.236667 

.oooooo 

3.312336 

,510204 

.791960 

.oooooo 

- .oooooo 

.980000 

.500000 

1 .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

w/aref 

T/TREF 

P/PREF 

ENT 

1 

.000000 

. oooooo 

-OOOOOO 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

2 

.000000 

. oooooo 

.409873 

.633938 

. 912871 

.oooooo 

-.00821 2 

.833333 

.528282 

1 .OOOCOO 

3 

.000000 

.oooooo 

.651855 

.633938 

. 91 2871 

.oooooo 

-.013060 

.833333 

.528282 

1 .OOOCOO 

4 

.000000 

.oooooo 

. 794717 

.633938 

. 912871 

.oooooo 

-.01 5922 

.833333 

.528282 

1 .OOOCOO 

5 

.000000 

.oooooo 

.879060 

.633938 

.912871 

.oooooo 

-.01 761 1 

.833333 

.528282 

1 .OOOCOO 

6 

.000000 

.oooooo 

.928855 

.633938 

. 91 2871 

,000000 

-.018609 

.833333 

.528282 

1 .OOOCOO 

7 

.000000 

.oooooo 

.958254 

.633938 

.912871 

.oooooo 

-.01 9198 

.833333 

.528282 

1 .OOOCOO 

8 

.000000 

.oooooo 

.975610 

.633938 

.912871 

.oooooo 

-.019546 

.833333 

.528282 

1 .OOOCOO 

9 

.000000 

.oooooo 

.985857 

.601996 

.782461 

.oooooo 

-.016929 

.877551 

.528282 

1 .075C66 



10 .000000 

11 .000000 

12 .000000 

13 .000000 

14 .000000 

15 .000000 

16 .000000 

17 .000000 

18 .000000 

19 .000000 

20 .000000 

21 .000000 

22 .000000 

23 .000000 

24 .000000 

25 .000000 

26 .000000 

27 .000000 

28 .000000 

0= 17 K= 1 L X 

1 .233465 

2 .283465 

3 .233465 

4 .233465 

5 .233465 

6 .233465 

7 .233465 

8 .233465 

9 .283465 

10 .233465 

11 .283465 

12 .233465 

13 .283465 

14 .233465 

15 .233465 

16 .283465 

17 .233465 

18 .283465 

19 .233465 

20 .283465 

21 .233465 

22 .233465 

23 .233465 

24 .283465 

25 .233465 

26 .283465 

27 .233465 

28 .283465 

J= 18 K= 1 L X 

1 .569554 

2 .569554 

3 .569554 

4 .569554 

5 .569554 

6 .569554 

7 .569554 


.000000 

.991906 

.577379 

. 000000 

.995478 

.558686 

.000000 

.997586 

.544964 

. 000000 

. 998831 

.535568 

.000000 

.999566 

.530085 

. 000000 

1 . 000000 

.528282 

.000000 

1 . 500609 

.454203 

. 000000 

1 .500652 

.456233 

. 000000 

1 . 500761 

.457948 

.000000 

1 .501035 

.459905 

. 000000 

1 .501723 

.462358 

.000000 

1 .503452 

.465531 

.000000 

1 .507793 

.469695 

. 000000 

1 .518698 

.47521 0 

.000000 

1 .546089 

.482574 

.000000 

1 .614894 

.492499 

.000000 

1 .787724 

.506037 

.000000 

2.221853 

.510204 

.000000 

3.312336 

.510204 

Y 

Z 

R/RREF 

.000000 

. 000000 

.633938 

.000000 

. 409873 

.633938 

.000000 

.651855 

.633938 

.000000 

.794717 

. 633936 

.000000 

.879060 

.633938 

.000000 

.928855 

.633938 

. 000000 

.958254 

.633938 

.000000 

.975610 

. 633938 

.000000 

.985857 

.601996 

.000000 

.991906 

.577379 

.000000 

.995478 

.558686 

. 000000 

.997586 

.544964 

.000000 

. 9S8831 

. 535568 

. 000000 

.999566 

. 530085 

.000000 

1 . 000000 

.528282 

.000000 

1 .442593 

.454203 

. 000000 

1 .442638 

.456233 

. 000000 

1 . 442751 

. 457948 

. 000000 

1 . 443033 

.459905 

.000000 

1 . 443743 

.462358 

.000000 

1 .445527 

.465531 

.000000 

1 .450007 

.469695 

. 000000 

1.461261 

.47521 0 

.000000 

1 .489530 

.482574 

.000000 

1 . 560538 

.492499 

. 000000 

1 . 7 38903 

.506037 

. 000000 

2.186933 

.510204 

.000000 

3.312336 

.510204 

Y 

Z 

R/RREF 

.000000 

.000000 

.633938 

.000000 

.409873 

.633938 

. 000000 

.651855 

.633938 

. 000000 

.794717 

.633938 

.000000 

.879060 

,633938 

.000000 

.928855 

.633938 

.000000 

.958254 

.633938 


( 


. 652051 

.000000 

-.014194 

.914966 

. 528282 

1 .1 39779 

.521641 

.000000 

-.01 1396 

.945578 

.528282 

1 .193E21 

. 391230 

.000000 

-.008565 

.969388 

.528282 

1 .235606 

. 260820 

.000000 

-.005717 

.986395 

.528282 

1 .266565 

. 130410 

.000000 

-.002861 

.996599 

.528282 

1 .284642 

. 000000 

.000000 

.000000 

1 .000000 

.528282 

1 .290784 

. 000000 

.000000 

.000000 

1 . 105440 

.502094 

1 .515777 

.218045 

.000000 

.000000 

1 .095931 

. 500000 

1 .500C60 

. 260884 

.000000 

.000000 

1 .091 828 

.500000 

1 .492503 

.302158 

.000000 

.000000 

1 .087180 

. 500000 

1 .48331 7 

. 346609 

.000000 

. 000000 

1 .08141 2 

. 500000 

1 .47231 2 

.396219 

.000000 

.000000 

1 .074042 

. 500000 

1 .458583 

.452327 

.000000 

.000000 

1 ,064520 

. 500000 

1 .44051 5 

.516112 

.000000 

.000000 

1 .052166 

.500000 

1 .416669 

.588771 

.000000 

.000000 

1 .03611 0 

. 500000 

1 .386692 

.671603 

.000000 

.000000 

1 .015230 

. 500000 

1 .347728 

. 766064 

.000000 

.000000 

.©iaOgg 

, teoOoo 

i 

. 791960 

.000000 

.000000 

.980000 

.500000 

1 .282710 

.791960 

.000000 

. 000000 

. 980000 

. 500000 

1 .282710 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.912871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

. 91 2371 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

.912871 

.000000 

, .000000 

.833333 

.528282 

.\ .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

. 782461 

.000000 

.000000 

.877551 

.528282 

1 .075C66 

.652051 

.000000 

.000000 

.914966 

.528282 

1 .139779 

.521641 

.000000 

.000000 

.945578 

.528282 

1 .193521 

. 391230 

.000000 

.000000 

.969388 

.528282 

1 .235606 

. 260820 

.000000 

.000000 

.986395 

.528282 

1 .266565 

. 130410 

.000000 

.000000 

. 996599 

.528282 

1 .234642 

. 000000 

.000000 

.000000 

1 .000000 

.528282 

1 .290784 

. 000000 

.000000 

.000000 

1 . 105440 

.502094 

1 .515777 

.218045 

.000000 

.000000 

1 .095931 

.500000 

1 .500C60 

. 260884 

.000000 

.000000 

1 . 091 828 

. 500000 

1 .492503 

. 302158 

.000000 

.000000 

1 .087180 

. 500000 

1 .483317 

. 346609 

.000000 

.000000 

1 .081412 

.500000 

1 .47231 2 

. 396219 

.000000 

.000000 

1 .074042 

. 500000 

1 .458583 

. 452327 

.000000 

.000000 

1 .064520 

.500000 

1 .44051 5 

.5161 12 

.000000 

.000000 

1 .052166 

. 500000 

1 .416669 

. 588771 

.000000 

.000000 

1 .0361 10 

. 500000 

1 .386692 

. 671603 

.000000 

.000000 

1 .015230 

. 500000 

1 .347728 

. 766064 

.000000 

.000000 

.988069 

. 500000 

1 .297521 

.791960 

.000000 

.000000 

.980000 

.500000 

1 .282710 

. 791960 

.000000 

.000000 

.980000 

.500000 

1 .282710 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.912871 

,000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

. 91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

. 91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 




8 

.569554 

.000000 

.975610 

.633938 

9 

.569554 

.000000 

.985857 

.601996 

10 

.559554 

.000000 

.991906 

.577379 

1 1 

.569554 

.000000 

.995478 

.558686 

12 

, .569554 

.000000 

.997586 

.544964 

13 

. 569554 

. 000000 

. 998831 

.535568 

14 

.569554 

. 000000 

.999566 

.530085 

15 

.559554 

.000000 

1 . 000000 

.528282 

16 

.569554 

. 000000 

1 .380696 

.454203 

17 

.569554 

. 000000 

1 .380742 

.456233 

18 

.569554 

.000000 

1 .380858 

.457948 

19 

.569554 

. 000000 

1 .381150 

.459905 

20 

.569554 

.000000 

1 .381884 

.462358 

21 

.569554 

. 000000 

1 .383726 

.465531 

22 

.569554 

.000000 

1 .388355 

.469695 

23 

.569554 

. 000000 

1 .399982 

.47521 0 

24 

. 569554 

. 000000 

1 .4291 86 

.482574 

25 

.569554 

.000000 

1 . 502545 

.492499 

26 

.569554 

.000000 

1 . 686814 

.506037 

27 

.569554 

.000000 

2. 149677 

.510204 

28 

.569554 

.000000 

3.312336 

.510204 

L 

X 

Y 

Z 

R/RREF 

1 

.855643 

.000000 

.000000 

.633938 

2 

.855643 

.000000 

.409873 

.633938 

3 

.855643 

.000000 

.651855 

.633938 

4 

.855643 

.000000 

. 794717 

.633938 

5 

.355643 

.000000 

.879060 

.633938 

6 

.855643 

.000000 

.928855 

.633938 

n 

.855643 

.000000 

.958254 

.633938 

8 

. 855643 

.000000 

.975610 

.633938 

9 

.855643 

.000000 

.985857 

.601996 

10 

.355643 

.000000 

.991906 

.577379 

1 1 

.855643 

. 000000 

.995478 

.558686 

12 

.855643 

.000000 

. 997586 

.544964 

13 

.355643 

. 000000 

.998831 

.535568 

14 

.855643 

. 000000 

. 999566 

.530085 

15 

.855643 

. 000000 

1 . 000000 

.528282 

16 

.855643 

. 000000 

1 .315415 

.454203 

17 

.855643 

. 000000 

1 .315463 

.456233 

18 

.855643 

. 000000 

1 .315583 

.457948 

19 

.855643 

.000000 

1 .315885 

.459905 

20 

.855643 

. 000000 

1 .316643 

.452358 

21 

.855643 

. 000000 

1 .318548 

.465531 

22 

.855643 

.000000 

1 . 323333 

.469695 

23 

.855643 

.000000 

1 .335353 

.47521 0 

24 

.855643 

.000000 

1.365544 

.482574 

25 

.855643 

. 000000 

1 .441382 

.492499 

26 

. 855643 

.000000 

1 .631879 

.506037 

27 

.855643 

.000000 

2.1 10384 

.510204 

28 

.855643 

.000000 

3.312336 

.510204 

L 

X 

Y 

Z 

R/RREF 

1 

1 .141732 

.000000 

.000000 

.633938 

2 

1 .141732 

.000000 

.409873 

.633938 

3 

1 .141732 

.000000 

.651855 

.633938 

4 

1 .141732 

.000000 

.794717 

.633938 

5 

1 .141732 

.,000000 

.879060 

.633938 


.912871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

.782461 

.000000 

.000000 

,877551 

.528282 

1 .075C66 

.652051 

.000000 

.000000 

.914966 

.528282 

1 . 1 39779 

.521641 

.000000 

.000000 

,945578 

.528282 

1 . 1 93E21 

.391 230 

.000000 

.000000 

.969388 

. 528282 

1 .235606 

. 260820 

.000000 

.000000 

.986395 

.528282 

1 .266265 

. 130410 

.000000 

.000000 

.996599 

.528282 

1 .284642 

. 000000 

.000000 

.000000 

1 .000000 

.528282 

1 .290784 

.000000 

.000000 

.000000 

1 . 1 05440 

.502094 

1 .515777 

.218045 

.000000 

.000000 

1.095931 

.500000 

1 .500C60 

.260884 

.000000 

.000000 

1 .091 828 

.500000 

1 .492203 

.302158 

.000000 

.000000 

1 . 087180 

.500000 

1 .48331 7 

.346609 

.000000 

.000000 

1 .081 41 2 

. 500000 

1 .47231 2 

.396219 

.000000 

.000000 

1 . 074042 

.500000 

1 .458283 

.452327 

.000000 

.000000 

1 .064520 

. 500000 

1 .44021 5 

.516112 

.000000 

.000000 

1 .052166 

.500000 

1 .416669 

.588771 

.000000 

,000000 

1 .036110 

.500000 

1 .386692 

.671603 

.000000 

.000000 

1 .015230 

.500000 

1 .347728 

. 766064 

.000000 

.000000 

.988069 

.500000 

1 .297621 

. 791960 

.000000 

.000000 

.980000 

. 500000 

1.282710 

.791960 

.000000 

.000000 

,960000 

.500000 

1 .282710 

U/AREF 

V/AREF 

W/AREF 

T/7REF 

P/PREF 

ENT 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

,833333 

. 528282 

1 .OOOCOO 

.91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

. 91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

,000000 

.833333 

.528282 

1 .OOOCOO 

. 782461 

.000000 

.000000 

.877551 

.528282 

1 .075C66 

.652051 

.000000 

.000000 

.914966 

.528282 

1 .139779 

.521641 

.000000 

.000000 

.945578 

.528282 

1 .193621 

.391230 

.000000 

.000000 

.969388 

.528282 

1 .235606 

.260820 

.000000 

.000000 

.986395 

. 528282 

1 .266265 

. 130410 

.000000 

.000000 

.996599 

.528282 

1 .284642 

. 000000 

.000000 

.000000 

1 . 000000 

. 528282 

1 .290784 

. 000000 

.000000 

.000000 

1 .105440 

. 502094 

1 .515777 

.218045 

.000000 

.000000 

1 .095931 

.500000 

1 .500C80 

. 260884 

.000000 

.000000 

1 . 091828 

.500000 

1 .492203 

.302158 

.000000 

.000000 

1 .087180 

.500000 

1 .483317 

.346609 

.000000 

.000000 

1 .081 41 2 

.500000 

1 .472312 

.396219 

.000000 

.000000 

1 .074042 

.500000 

1 .458283 

.452327 

.000000 

.000000 

1 .064520 

.500000 

1 .440215 

.516112 

.000000 

.000000 

1 .052166 

.500000 

1 .416669 

.588771 

.000000 

.000000 

1 .03611 0 

.500000 

1 .386692 

.671603 

.000000 

.000000 

1 .015230 

.500000 

1 .347728 

. 766064 

.000000 

.000000 

.988069 

.500000 

1 .297621 

.791960 

.000000 

.000000 

.960000 

,500000 

1 .282710 

.791960 

.000000 

.000000 

.960000 

.500000 

1 .282710 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 


2 . 




6 

1 .141732 

. 000000 

.923355 

.633938 

.912871 

.000000 

.000000 

.833333 

. 528282 

1 .ooocoo 

7 

1 .141732 

.000000 

.953254 

.633938 

.912371 

.000000 

. 000000 

.833333 

.528282 

1 .ooocoo 

8 

1 .141732 

. 000000 

.975610 

.633938 

.912871 

.000000 

.000000 

.833333 

. 528282 

1 .ooocoo 

9 

1 .141732 

. 000000 

.985857 

.601996 

. 782461 

.000000 

.000000 

.877551 

. 528282 

1 .075C66 

10 

1 .141732 

. 000000 

.991906 

.577379 

.652051 

.000000 

.cooooo 

.914966 

. 528282 

1 .1 39779 

1 1 

1 . 141732 

. 000000 

. 995478 

.558686 

.521641 

.000000 

. cooooo 

.945578 

. 528282 

1 .193621 

12 

1 . 141732 

.000000 

.997586 

.544964 

. 391230 

.000000 

.000000 

.969388 

. 528282 

1 .235606 

13 

1 . 141732 

.000000 

.998331 

.535568 

.260820 

,000000 

.cooooo 

.966395 

.528282 

1 .266265 

14 

1 . 141732 

.000000 

.999566 

.530085 

. 130410 

.000000 

.cooooo 

.966599 

. 528282 

1 .284642 

15 

1 . 1 41 732 

.000000 

1 .000000 

.528282 

. 000000 

.000000 

.cooooo 

1 . 000000 

.528282 

1 .290784 

16 

1 .141732 

. 000000 

1 . 246724 

.454203 

. 000000 

.000000 

. cooooo 

1 . 105440 

. 502094 

1 .515777 

17 

1 .141732 

.000000 

1 .246774 

.456233 

.218045 

.000000 

.000000 

1 .055931 

. 500000 

1 .500C60 

18 

1 . 141 732 

.000000 

1 .246898 

.457948 

. 260884 

.000000 

.000000 

1 . 091 828 

. 500000 

1 .492203 

19 

1.141 732 

. 000000 

1 . 24721 1 

.459905 

. 302158 

.000000 

.000000 

1 .087180 

. 500000 

1 .48361 7 

20 

1 . 1 41 732 

.000000 

1 . 247995 

.462358 

. 346609 

.000000 

.000000 

1 .06141 2 

. 500000 

1 .47261 2 

21 

1.141 732 

.000000 

1 . 249966 

.465531 

. 396219 

.000000 

.cooooo 

1 .074042 

. 500000 

1 .458283 

22 

1 . 141 732 

. OGOOOO 

1 .254915 

.469695 

.452327 

.000000 

.000000 

1 .064520 

. 500000 

1 .44021 5 

23 

1 . 1 41 732 

. 000000 

1 . 267348 

.475210 

.5161 12 

.000000 

. 000000 

1 , 052166 

. 500000 

1 .416869 

24 

1 . 141 732 

.000000 

1 . 298578 

.482574 

. 588771 

.000000 

.000000 

1 .03611 0 

,500000 

1 .386692 

25 

1 . 1 41 732 

. 000000 

1 . 377025 

.492499 

.671603 

.000000 

.000000 

1 .015230 

. 500000 

1 .347728 

26 

1.141 732 

. 000000 

1 .574074 

.506037 

. 766064 

.000000 

.cooooo 

.968069 

, 500000 

1 .297621 

27 

1 . 141732 

.000000 

2 . 069039 

.510204 

. 791960 

.000000 

.000000 

.960000 

. 500000 

1 .28271 0 

28 

1 . 141 732 

. 000000 

3.312336 

.510204 

. 791960 

.000000 

.000000 

. 960000 

. 500000 

1 .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 .427822 

.000000 

.000000 

.633938 

.912871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

2 

1 .427822 

.000000 

.409873 

.633938 

.912871 

,000000 . 

.cooooo 

.833333 

.528282 

1 .OOOCOO 

3 

1 .427822 

. 000000 

.651855 

.633938 

.91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

4 

1 .427822 

. 000000 

. 794717 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

5 

1 .427822 

. 000000 

.879060 

.633938 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

6 

1 .427822 

. 000000 

.928855 

.633938 

.912871 

.000000 

.cooooo 

.833333 

.528282 

1 .OOOCOO 

7 

1 .427822 

. 000000 

.958254 

.633938 

.912871 

.000000 

.000000 

.833333 

.5128282 

1 .OOOCOO 

8 

1 .427822 

. 000000 

.975610 

.633938 

.912871 

.000000 

.cooooo 

.833333 

. 528282 

1 .OOOCOO 

9 

1 .427822 

. 000000 

.985857 

.601996 

. 782461 

.000000 

.000000 

.877551 

. 528282 

1 .075C66 

10 

1 .427822 

. 000000 

.991906 

.577379 

.652051 

.000000 

. cooooo 

.914966 

. 528282 

1 . 1 39779 

11 

1 .427822 

. 000000 

.995478 

.558586 

.521641 

.000000 

.000000 

.945578 

. 528282 

1 .193621 

12 

1 .427822 

. 000000 

.997586 

. 544964 

.391230 

.000000 

.000000 

.969388 

.528282 

1 .235606 

13 

1 .427822 

. 000000 

. 998831 

.535568 

. 260820 

.000000 

.000000 

.956395 

.528282 

1 .266265 

14 

1 .427822 

.000000 

.999566 

.530085 

. 130410 

.000000 

.000000 

.996599 

.528282 

1 .284642 

15 

1 .427822 

.000000 

1 .000000 

.528282 

.000000 

.000000 

.000000 

1 .000000 

.528282 

1 .290784 

16 

1 .427822 

. 000000 

1 . 1 74596 

.454203 

. 000000 

.000000 

.000000 

1 .105440 

.502094 

1 .515777 

17 

1 .427822 

. 000000 

1 . 1 74647 

.456233 

.218045 

.000000 

. 000000 

1 . 055931 

. 500000 

1 .500C60 

18 

1 .427822 

.000000 

1 . 1 74776 

.457948 

. 260884 

.000000 

.000000 

1 .051828 

. 500000 

1 .492203 

19 

1 .427822 

. 000000 

1 . 1 750'99 

.459905 

.302158 

.000000 

.000000 

1 .067180 

.500000 

1 .48361 7 

20 

1 .427922 

. 000000 

1 . 1 7531 1 

.462358 

.346609 

.000000 

.000000 

1 .061412 

.500000 

1 .47261 2 

21 

1 .427822 

. 000000 

1 . 1 77950 

.465531 

.396219 

.000000 

.cooooo 

1 .074042 

. 500000 

1 .458283 

22 

1 .427822 

. 000000 

1 . 1 83073 

.469695 

. 452327 

.000000 

. 000000 

1.064520 

. 500000 

1 .44021 5 

23 

1 .427822 

.000000 

1 . 1 95940 

.47521 0 

.516112 

.000000 

.cooooo 

1 .052166 

.500000 

1 .416669 

24 

1 .427822 

. 000000 

1 .228260 

.482574 

. 588771 

.000000 

.000000 

1 .0361 10 

. 500000 

1 .386692 

25 

1 .427822 

. 000000 

1 . 309446 

.492499 

.671603 

.000000 

.000000 

1 .015230 

.500000 

1 .347728 

26 

1 .427822 

.000000 

1 .513376 

.506037 

. 766064 

.000000 

.cooooo 

.968069 

.500000 

1 .297621 

27 

1 .427822 

. 000000 

2.025525 

.510204 

.791960 

.000000 

.000000 

.980000 

.500000 

1.282710 

28 

1 .427822 

.000000 

3.312336 

.510204 

.791960 

.000000 

.000000 

.980000 

.500000 

1 .28271 0 

t 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

1 .71391 1 

.000000 

.000000 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

2 

1 .71391 1 

.000000 

.409873 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

3 

1 .71391 1 

.000000 

.651855 

.633938 

.912871 

.000000 

.000000 

,833333 

.528282 

1 .OOOCOO 



4 

1 .71391 1 

.000000 

.794717 

.633938 

.912871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .ooocoo 

5 

1 .71391 1 

.000000 

.879060 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .ooocoo 

6 

1 .71391 1 

.Oooooo 

.928855 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .ooocoo 

7 

1 .71391 1 

.000000 

.958254 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .ooocoo 

8 

1 .71391 1 

.000000 

.975610 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .ooocoo 

9 

1 .71391 1 

.000000 

.985857 

.601996 

. 782461 

.oooooo 

.oooooo 

.877551 

.528282 

1 .075C66 

10 

1.713911 

.000000 

.991906 

.577379 

. 652051 

.oooooo 

.oooooo 

.914966 

.528282 

1 .139779 

11 

1 .71391 1 

.000000 

. 995478 

.558686 

.521641 

.oooooo 

.oooooo 

.945578 

.528282 

1 .193621 

12 

1.71391 1 

.000000 

.997586 

.544964 

. 391230 

.oooooo 

.oooooo 

.969388 

.528282 

1 .235606 

13 

1 .71391 1 

. oooooo 

.998831 

.535568 

. 260820 

.oooooo 

.oooooo 

.966395 

.528282 1 

1 .266265 

14 

1 .71391 1 

.000000 

.999566 

.530085 

. 130410 

.oooooo 

.oooooo 

.996599 

.528282 . 

1 .284642 

15 

1 .71391 1 

. oooooo 

1 .OOOOOO 

.528282 

.OOOOOO 

.oooooo 

.oooooo 

1 .oooooo 

.528282 

1 .290784 

16 

1 .71391 1 

.oooooo 

1 . 098997 

. 454203 

. OOOOOO 

.oooooo 

.oooooo 

1 .105440 

.502094 

1 .515777 

17 

1 .71391 1 

.oooooo 

1 . 099050 

.456233 

.218045 

.oooooo 

.oooooo 

1 .095931 

.500000 

1 .500C60 

18 

1 .71391 1 

.oooooo 

1 . 0991 84 

.457948 

. 260884 

.oooooo 

.oooooo 

1.091828 

.500000 

1 .492203 

19 

1 .71391 1 

.oooooo 

1.099518 

. 459905 

.302158 

.oooooo 

.oooooo 

1 .087180 

.500000 

1 .48331 7 

20 

1 .71391 1 

.oooooo 

1 . 1 00359 

.462358 

. 346609 

.OoCOOO 

.OOooOo 

1 .0S1412 


1 i 

21 

1 .71391 1 

.oooooo 

1 . 1 02470 

.465531 

.396219 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

1 .71391 1 

.oooooo 

1 . 1 07774 

.469695 

. 452327 

.oooooo 

.000000 

1 .064520, 

.500000 

1 .44021 5 

23 

1 .713911 

.oooooo 

1 . 1 21096 

.475210 

.516112 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

1 .71391 1 

. oooooo 

1 . 1 54560 

.482574 

.588771 

.oooooo 

.oooooo 

1 .036110 

,500000 

1 .386692 

25 

1 .713911 

.oooooo 

1 .23861 7 

.492499 

.671603 

.oooooo 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

1 .71391 1 

.oooooo 

1 .449758 

.506037 

. 766064 

.oooooo 

.oooooo 

.988069 

.500000 

1 .297621 

27 

1 .71391 1 

.oooooo 

1 .3801 22 

.510204 

.791960 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 

28 

1 .71391 1 

.oooooo 

3.312336 

.510204 

.791960 

.oooooo 

.oooooo 

.980000 

.500000 

. 1 .28271 0 

L 

X 

y 

Z 

r/rref 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2.000000 

.oooooo 

.OOOOOO 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

2 

2.000000 

.oooooo 

.409873 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

3 

2.000000 

.oooooo 

.651855 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

4 

2.000000 

.oooooo 

. 794717 

.633938 

. 91 2871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

5 

2.000000 

.oooooo 

.879060 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

6 

2.000000 

.oooooo 

.928855 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

7 

2.000000 

.oooooo 

.958254 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

8 

2.000000 

.oooooo 

.975510 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

9 

2.000000 

.oooooo 

.985857 

.601996 

. 782461 

.oooooo 

.oooooo 

.877551 

.528282 

1 .075C66 

10 

2.000000 

.oooooo 

.991906 

.577379 

.652051 

.oooooo 

.oooooo 

.914966 

.528282 

1 .139779 

1 1 

2.000000 

.oooooo 

.995478 

.558686 

.521641 

.oooooo 

.oooooo 

.945578 

.528282 

1 .193621 

12 

2.000000 

.oooooo 

.997586 

.544954 

.391230 

.oooooo 

.oooooo 

.969388 

.528282 

1 .235606 

13 

2.000000 

.oooooo 

. 998831 

.535568 

. 260820 

.oooooo 

.oooooo 

.986395 

.528282 

1 .266265 

14 

2.000000 

.oooooo 

.999566 

.530085 

. 130410 

.oooooo 

.oooooo 

.996599 

.528282 

1 .284642 

15 

2.000000 

.oooooo 

1 . OOOOOO 

.528282 

.OOOOOO 

.oooooo 

.oooooo 

1 .OOOOOO 

.528282 

1 .290784 

16 

2.000000 

. oooooo 

1 .000525 

. 454203 

.OOOOOO 

.oooooo 

.oooooo 

1 .105440 

.502094 

1 .515777 

17 

2.000000 

.oooooo 

1 .000580 

.456233 

.218045 

.oooooo 

.oooooo 

1 .095931 

.500000 

1 .500C60 

18 

2.000000 

.oooooo 

1 .000720 

.457948 

.260884 

.oooooo 

.oooooo 

1 .091 828 

. 500000 

1 .492203 

19 

2.000000 

.oooooo 

1 . 001069 

.459905 

.302158 

.oooooo 

.oooooo 

1 .087180 

.500000 

1 .483317 

20 

2.000000 

.oooooo 

1 .001947 

.462358 

. 346609 

.oooooo 

.oooooo 

1 .081412 

,500000 

1 .47231 2 

21 

2.000000 

.oooooo 

1 .004152 

.465531 

.396219 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

2.000000 

.oooooo 

1 . 009692 

.469695 

.452327 

.oooooo 

.oooooo 

1 .064520 

.500000 

1 .440215 

23 

2.000000 

.oooooo 

1 . 023607 

.475210 

.516112 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

2.000000 

.oooooo 

1 .058559 

.482574 

. 588771 

.oooooo 

.oooooo 

1 .03611 0 

.500000 

1 .386692 

25 

2.000000 

•OOOOOO 

1.146356 

.492499 

.671603 

.oooooo 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

2.000000 

•OOOOOO 

1 .366891 

.506037 

.766064 

.oooooo 

.oooooo 

.988069 

.500000 

1 .297621 

27 

2.000000 

•OOOOOO 

1 .920851 

.510204 

.791960 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 

28 

2.000000 

.OOOOOO 

3.312336 

.510204 

.791960 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

2.283465 

.OOOOOO 

.OOOOOO 

.633938 

.912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 




25 K = 


2 

2.233465 

.000000 

.409873 

.633938 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .ooocoo 

3 

2.233465 

. 000000' 

.651855 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

4 

2.233465 

.000000 

.794717 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

5 

2.283465 

. 000000 

. 879.060 

.633938 

. 912871 

.000000 

.000000 

. 833333 

. 528282 

1 .ooocoo 

6 

2.233465 

.000000 

.928855 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

7 

2 .233465 

.000000 

.958254 

.633938 

.912871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

8 

2.233465 

. 000000 

. 975610 

.633938 

. 91 2871 

.000000 

.000000 

.833333 

.528282 

1 .ooocoo 

9 

2.233465 

. 000000 

.985857 

.601996 

. 782461 

.000000 

.000000 

.877551 

.528282 

1 .075C66 

10 

2.233465 

.000000 

.991906 

.577379 

.652051 

.000000 

.000000 

.914966 

.528282 

1 .1 39779 

1 1 

2.283465 

.000000 

.995478 

.558686 

.521641 

.000000 

.000000 

.945578 

,528282 

1 .193621 

12 

2.283465 

. 000000 

.997586 

.544964 

. 391230 

.000000 

.000000 

.969388 

.528282 

1 .235E06 

13 

2.283465 

.000000 

.998831 

.535568 

.260820 

.000000 

.000000 

.986395 

.528282 

1 .266265 

14 

2.283465 

. 000000 

.999566 

.530085 

. 130410 

.000000 

.000000 

.996599 

.528282 

1 .284642 

15 

2.283465 

. 000000 

1 .000000 

.528282 

. 000000 

.000000 

.000000 

1 .000000 

,528282 

1 .290784 

16 

2.2S3'465 

. 000000 

1 . 000525 

.454203 

.000000 

.000000 

.000000 

1 .105440 

. 502094 

1 .51 5777 

17 

2.283465 

. 000000 

1 . 000580 

.456233 

.218045 

.000000 

.000000 

1 .095931 

. 500000 

1 .500C60 

18 

2.233465 

.000000 

1 .000720 

.457948 

. 260884 

.000000 

.000000 

1.091 828 

.500000 

1 .492203 

19 

2.283465 

.000000 

1 .001069 

.459905 

.302158 

.000000 

.000000 

1 . 087180 

.500000 

1 .48331 7 

20 

2.283465 

. 000000 

1 . 001947 

.462358 

. 346609 

.000000 

.000000 

1.081412 

.500000 

1 .47231 2 

21 

2.283465 

. 000000 

1 .004152 

.465531 

.396219 

.000000 

.000000 

1 .074042 

.500000 

1 .458283 

22 

2 .233465 

. 000000 

1 . 009692 

.469695 

. 452327 

.000000 

.000000 

1 .064520 

.500000 

1 .44021 5 

23 

2.283465 

. 000000 

1 .023607 

.47521 0 

.516112 

.000000 

.000000 

1 .052166 

.500000 

1 .416E69 

24 

2.233465 

.000000 

1 .058559 

.482574 

.588771 

.000000 

.000000 

1 .0361 10 

.500000 

1 .386692 

25 

2.283465 

.000000 

1 . 146356 

.492499 

. 671603 

.000000 

.000000 

1 .015230 

.500000 

1 .347728 

26 

2 .233465 

. 00000,0 

1 .366891 

.506037 

. 766064 

.000000 

.000000 

. 988069 

.500000 

1 .297621 

27 

2.233465 

.000000 

1 .920851 

.51 0204 

. 791960 

.000000 

.000000 

.980000 

.500000 

1 .28271 0 

28 

2 .233465 

.000000 

3.312336 

.510204 

. 731960 

.000000 

.000000 

.980000 

. 500000 

1 .28271 0 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2.624672 

.000000 

.000000 

.633938 

. 91 2871 

.000000 

.cooooo 

.833333 

, 528282 

1 .OOOCOO 

2 

2 .624672 

.000000 

.409873 

.633938 

.912871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

3 

2.624672 

. 000000 

.651855 

.633938 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

4 

2 . 6 2 4 C 7 2 

. 000000 

.794717 

.633938 

. 912871 

.000000 

.000000 

.333333 

.528282 

1 .OOOCOO 

5 

2 .624672 

. 000000 

.879060 

.633938 

.912871 

.000000 

.cooooo 

.833333 

. 528282 

1 .OOOCOO 

6 

2.624672 

. 000000 

.928855 

.633938 

. 91 2871 

.000000 

.000000 

.833333 

.528282 

1 .OOOCOO 

7 

2.624672 

. 000000 

.953254 

. 633938 

. 91 2871 

.000000 

.000000 

.833333 

. 528282 

1 .OOOCOO 

8 

2 .624672 

.000000 

.975610 

.633838 

.91 2871 

.000000 

.cooooo 

.833333 

. 528282 

1 .OOOCOO 

9 

2 .624672 

. 000000 

.985857 

.601996 

.782461 

.000000 

.cooooo 

.877551 

. 528282 

1 .075C66 

10 

2 .624672 

.000000 

.991906 

.577379 

. 652051 

.000000 

.000000 

.914966 

.528282 

1 . 1 39779 

1 1 

2.624672 

.000000 

.995478 

.558686 

. 521641 

.000000 

.000000 

.945578 

. 528282 

1 .193621 

12 

2.624672 

.000000 

.997586 

.544964 

. 391230 

.000000 

.000000 

.969388 

. 528282 

1 .235606 

13 

2 .624672 

.000000 

.998831 

.535568 

. 260820 

.000000 

.000000 

.986395 

.528282 

1 .266265 

14 

2.624672 

. 000000 

. 999566 

.530085 

. 130410 

.000000 

.000000 

.996599 

. 528282 

1 .284642 

15 

2 .624672 

.000000 

1 .000000 

. 528282 

. 000000 

.000000 

.000000 

1 .000000 

.528282 

1 .290784 

1 6 

2.624672 

.000000 

1 .000525 

.454203 

. 000000 

.000000 

.000000 

1 .105440 

. 502094 

1 .515777 

17 

2 .624672 

■ .000000 

1 . 000580 

.456233 

.218045 

.0000.00 

.000000 

1 .095931 

.500000 

1 .500C60 

18 

2.624672 

. 000000 

1 .000720 

.457348 

.260884 

.000000 

.000000 

1 .091828 

. 500000 

1 .492203 

iy 

2 .624672 

.000000 

1 .001069 

.459905 

.302158 

.000000 

.000000 

1 .087180 

.500000 

1 .48331 7 

20 

2.624672 

.000000 

1 .001947 

.462358 

. 346609 

,000000 

.000000 

1 .081412 

. 500000 

1 .47231 2 

21 

2.624672 

.000000 

1 .004152 

.465531 

.396219 

.000000 

.000000 

1 .074042 

.500000 

1 .458283 

22 

2.624672 

.000000 

1 . 009692 

.469695 

.452327 

.000000 

.000000 

1 .064520 

.500000 

1 .44021 5 

23 

2.624672 

.000000 

1 .023607 

.47521 0 

.516112 

.000000 

.000000 

1 .052166 

. 500000 

1 .41 6669 

24 

2.624672 

.000000 

1 .058559 

.482574 

. 588771 

.000000 

.000000 

1 .03611 0 

.500000 

1 .386692 

25 

2.624672 

.000000 

1.146356 

.492499 

.671603 

.000000 

.000000 

1 .015230 

. 500000 

1 .347728 

26 

2.624672 

.000000 

1.366891 

.506037 

. 766064 

.000000 

.000000 

.988069 

.500000 

1 .297621 

27 

2.524672 

.000000 

1 .920851 

.51 0204 

.791960 

.000000 

.000000 

.980000 

.500000 

1 .28271 0 

28 

2.624672 

.000000 

3.312336 

.510204 

.791960 

.000000 

.000000 

.980000 

.500000 

1 .282710 



L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.018373 

. 000000 

.oooooo 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

2 

3.018373 

. 000000 

.409873 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

3 

3.018373 

.000000 

.651855 

.633938 : 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

. 528282 

1 .OOOCOO 

4 

3.018373 

. 000000 

.794717 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

5 

3.018373 

. 000000 

.879060 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

. 528282 

1 .OOOCOO 

6 

3.018373 

. 000000 

.928855 

.633938 

. 912871 

.oooooo 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

7 

3.018373 

. 000000 

.958254 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

8 

3.018373 

. 000000 

.975610 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

9 

3.018373 

. 000000 

.985857 

.601996 

. 782461 

.OOOOOO 

.oooooo 

.877551 

.528282 

1 .075C66 

10 

3.018373 

. 000000 

.991906 

.577379 

. 652051 

.OOOOOO 

.oooooo 

.914966 

.528282 

1 .139779 

1 1 

3.018373 

. 000000 

.995478 

.558686 

.521641 

.OOOOOO 

.oooooo 

.945578 

.528282 

1 .193621 

12 

3.018373 

. 000000 

.997586 

.544964 

. 391230 

.OOOOOO 

.oooooo 

.969388 

.528282 

1 .235606 

13 

3.018373 

. 000000 

. 998831 

.535568 

. 260820 

.OOOOOO 

.oooooo 

.986395 

.528282 

1 .266265 

14 

3.018373 

.000000 

.999566 

.530085 

. 130410 

.OOOOOO 

.oooooo 

.996599 

. 528282 

1 .284642 

15 

3.018373 

. 000000 

1 .oooooo 

.528232 

. OOOOOO 

.OOOOOO 

.oooooo 

1 .oooooo 

.528282 

1 .290784 

16 

3.018373 

. 000000 

1 .000525 

.454203 

. OOOOOO 

.OOOOOO 

.oooooo 

1 .105440 

.502094 

1 .515777 

17 

3.018373 

. 000000 

1 .000580 

.456233 

.21 8045 

.OOOOOO 

.oooooo 

1 .095931 

. 500000 

1 .500C60 

18 

3.018373 

. 000000 

1 .000720 

.457948 

. 260884 

.OOOOOO 

.oooooo 

1 .091 828 

. 500000 

1 .492203 

19 

3.018373 

.000000 

1 .001069 

.459905 

.302158 

.OOOOOO 

.oooooo 

1 .087180 

. 500000 

1 .48331 7 

20 

3.018373 

. 000000 

1 .001947 

.462358 

. 346609 

.OOOOOO 

.oooooo 

1 .081 412 

.500000 

1 .472312 

21 

3.018373 

. 000000 

1 .004152 

.465531 

. 396219 

.OOOOOO 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

3.018373 

.000000 

1 .009692 

.469695 

. 452327 

.OOOOOO 

.oooooo 

1 .064520 

.500000 

1 .44021 5 

23 

3.018373 

. 000000 

1 .023607 

.475210 

.516112 

.OOOOOO 

.oooooo 

1 .052166 

.500000 

1 .416869 

24 

3.018373 

. 000000 

1 .058559 

.482574 

. 588771 

.OOOOOO 

.oooooo 

1 .0361 10 

.500000 

1 .386692 

25 

3.0I8373 

. 000000 

1 .146356 

.492499 

.671603 

.OOOOOO 

.oooooo 

1 .015230 

.500000 

1 .347728 

26 

3.018373 

. oooooo 

1 .366891 

.506037 

. 766064 

.OOOOOO 

.oooooo 

.988069 

.500000 

1 .297521 

27 

3.018373 

.000000 

1 .920851 

.510204 

.791960 

.OOOOOO 

.oooooo 

.980000 

.500000 

1 .282710 

28 

3.018373 

.000000 

3.312336 

.510204 

.791960 

.OOOOOO 

.oooooo 

.980000 

.500000 

1 .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF ■ 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

3.412074 

.000000 

. OOOOOO 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

. 528282 

1 .OOOCOO 

2 

3.412074 

. oooooo 

.409873 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

3 

3.412074 

. oooooo 

.651855 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

. 528282 

1 .OOOCOO 

4 

3.412074 

. oooooo 

.794717 

.633938 

. 91 2871 

•OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

5 

3.412074 

. oooooo 

. 879060 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

. 528282 

1 .OOOCOO 

6 

3.412074 

. oooooo 

.928855 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

7 

3.412074 

. oooooo 

.958254 

.633938 

.91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

8 

3.412074 

. oooooo 

.975610 

.633938 

. 91 2871 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOCOO 

9 

3.412074 

. oooooo 

.985857 

.601996 

. 782461 

.oooooo 

.oooooo 

.877551 

.528282 

1 .075C66 

10 

3.412074 

.oooooo 

.991906 

.577379 

.652051 

.OOOOOO 

.oooooo 

.914966 

.528282 

1 .139779 

11 

3.412074 

. oooooo 

.995478 

.558686 

.521641 

.oooooo 

.oooooo 

.945578 

.528282 

1 .193621 

12 

3.412074 

. oooooo 

. 997586 

.544964 

. 391230 

.OOOOOO 

.oooooo 

.969388 

.528282 

1 .235606 

13 

3.412074 

. oooooo 

.998831 

.535568 

. 260820 

.oooooo 

.oooooo 

.986395 

.528282 

1 .266265 

14 

3.412074 

. oooooo 

. 999566 

.530085 

. 130410 

.OOOOOO 

.oooooo 

.996599 

.528282 

1 .284642 

15 

3.412074 

.oooooo 

1 . OOOOOO 

.528282 

. OOOOOO 

.oooooo 

.oooooo 

1 .oooooo 

.528282 

1 .290784 

16 

3.412074 

. oooooo 

1 . 000525 

.454203 

. OOOOOO 

.000090 

.oooooo 

1 . 105440 

. 502094 

1 .515777 

17 

3.412074 

. oooooo 

1 . 000580 

.456233 

.218045 

.oooooo 

.oooooo 

1 .095931 

. 500000 

1 .500C60 

18 

3.412074 

. oooooo 

1 . 000720 

.457948 

. 260884 

.oooooo 

.oooooo 

1 .091 828 

.500000 

1 .492203 

19 

3.412074 

. oooooo 

1 .001069 

.459905 

. 302158 

.oooooo 

.oooooo 

1 .087180 

. 500000 

1 .483317 

20 

3.41 2074 

. oooooo 

1 .001947 

.462358 

. 346609 

.oooooo 

.oooooo 

1 .081412 

.500000 

1 .47231 2 

21 

3.412074 

. oooooo 

1 .004152 

.465531 

.396219 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

22 

3.41 2074 

. oooooo 

1 .009692 

.469395 

. 452327 

.oooooo 

.oooooo 

1 .064520 

.500000 

1 .440215 

23 

3.412074 

. oooooo 

1 .023607 

.475210 

.5161 12 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .416669 

24 

3.412074 

. oooooo 

1 .058559 

.482574 

.588771 

.oooooo 

.oooooo 

1 .036110 

.500000 

1 .386692 

25 

3.41 2074 

. oooooo 

1 . 146356 

.492499 

.671603 

.oooooo 

.oooooo 

1 .015230 

. 500000 

1 .347728 

26 

3.412074 

.oooooo 

1 .366891 

.506037 

.766064 

.oooooo 

.oooooo 

.988069 

.500000 

1 .297521 

27 

3.412074 

.oooooo 

1 .920851 

.510204 

.791960 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 


28 K= 


28 

3.412074 

.000000 

3.312336 

.510204 

. 791960 

L 

X 

Y 

z 

R/RREF 

U/AREF 

1 

3.805774 

.000000 

. oooooo 

.633938 

. 912871 

2 

3.805774 

. 000000 

.409873 

.633938 

.912871 

3 

3.805774 

.000000 

.651855 

.633938 

. 912871 

4 

3.805774 

.000000 

. 79471 7 

.633938 

.912871 

5 

3.805774 

. 000000 

. 879060 

.633938 

.912871 

6 

3.805774 

.000000 

.928855 

.633938 

.91 2871 

7 

3.805774 

. 000000 

.958254 

. 633938 

.912871 

8 

3.805774 

.000000 

.975610 

.633938 

.912871 

9 

3.805774 

. 000000 

. 985857 

.601996 

. 782461 

10 

3.805774 

.000000 

.991906 

.577379 

. 652051 

1 1 

3.805774 

. 000000 

.995478 

. 558686 

. 521641 

12 

3.805774 

. 000000 

.997586 

. 544964 

. 391230 

13 

3.805774 

. 000000 

. S98831 

.535568 

. 260820 

14 

3.805774 

.000000 

.999566 

.530085 

. 1 30410 

15 

3.805774 

. 000000 

1 . OOOOOO 

. 528282 

. OOOOOO 

16 

3.805774 

.000000 

1 .000525 

.454203 

. OOOOOO 

17 

3.805774 

. 000000 

1 . 000580 

.456233 

. 21 8045 

18 

3.805774 

.000000 

1 . 000720 

.457948 

. 260884 

19 

3.805774 

. 000000 

1 . 001069 

.459905 

.302158 

20 

3.805774 

.000000 

1 .001947 

.462358 

.346609 

21 

3.805774 

. 000000 

1 .0041 52 

.465531 

.396219 

22 

3.805774 

.000000 

1 .009692 

.469695 

.452327 

23 

3.805774 

.000000 

1 . 023607 

.47521 0 

.516112 

24 

3.805774 

.000000 

1 .058559 

.482574 

.588771 

25 

3.805774 

.000000 

1 .146356 

.492499 

.671603 

26 

3.805774 

.000000 

1 .366891 

.506037 

.766064 

27 

3.805774 

.000000 

1 .920851 

.510204 

. 791960 

28 

3.805774 

.000000 

3.312336 

.510204 

. 791960 


.OOOOOO 

.oooooo 

.980000 

.500000 

1 .282710 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

.OOOOOO 

. oooooo 

. 833333 

. 528282 

1 .OOOOOO 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOOOO 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOOOO 

.OOOOOO 

.oooooo 

.833333 

.528282 

1 .OOOOOO 

.oooooo 

. oooooo 

.833333 

. 528282 

1 .OOOOOO 

.oooooo 

.oooooo 

.833333 

.528282 

1 .oooooo 

.oooooo 

.oooooo 

.833333 

.528282 

1 .oooooo 

.oooooo 

.oooooo 

.833333 

.528282 

1 .oooooo 

.oooooo 

.oooooo 

.877551 

. 528282 

1 .075066 

.oooooo 

.oooooo 

.914966 

.528282 

1 . 1 39779 

.oooooo 

.oooooo 

.945578 

.528282 

1 .193E21 

.oooooo 

.oooooo 

.969388 

.528282 

1 .235606 

.oooooo 

.oooooo 

.986395 

.528282 

1 .266265 

.000000 

.000600 

. SgBsf 0 


1 ,20464? 

.oooooo 

.oooooo 

1 .OOOOOO 

.528282 

1 .290784 

.oooooo 

.oooooo 

1 . 1 05440 

.502094 

1 .515777 

.oooooo 

.oooooo 

1 .095931 

.500000 

1 .500060 

.oooooo 

.oooooo 

1 .091 828 

.500000 

1 .492203 

.oooooo 

.oooooo 

1 .087180 

.500000 

1 .483217 

.oooooo 

.oooooo 

1 .081412 

.500000 

1 .47221 2 

.oooooo 

.oooooo 

1 .074042 

.500000 

1 .458283 

.oooooo 

.oooooo 

1 .064520 

.500000 

«1 ,44021 5 

.oooooo 

.oooooo 

1 .052166 

.500000 

1 .41 6669 

.oooooo 

.oooooo 

1 .0361 1 0 

.500000 . 

1 .386E92 

.oooooo 

.oooooo 

1 .015230 

.500000 

1 .347728 

.oooooo 

.oooooo 

.988069 

.500000 

1 .297=21 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 

.oooooo 

.oooooo 

.980000 

.500000 

1 .282710 



FINAL FLOWFIELD OUTPUT FOR TEST CASE NO. 4 


TIMF- 77 9865 DT= 25008*00 MAXIMUM DELTAQ/Q=-5.866E-03AT J K,L.N=28. 3,22. 2 
GF»-kI572e'Si:3.4I51E*oI§ 35758*0^3.357^ CU= 1 ,08I3E*00 

CURRENT FLOW AT NC= 500 AS WRITTEN TO RESTART FILE 


L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT . 

I 

-9; 0551 18 

0 . 000000 

0 000000 

973876 

. 229486 

0 . 000000 

0.000000 

.989467 

.963618 

1.000000 

2 

-9.055118 

0 000000 

.691889 

.973688 

.230315 

0.000000 

0 . 000000 

.989391 

.963358 

I .000000 

3 

-9.0551 18 

0 000000 

1 . 100368 

.973126 

. 232784 

0 . 000-000 

0 . 000000 

.989162 

. 962579 

1 000000 

4 

-9.0551 18 

0 ocoooo 

1 341528 

. 972389 

.235979 

0.000000 

0 . 000000 

. 988863 

.961560 

I . 000000 

5 

-9.0551 18 

0 , 000000 

1 . 433905 

.971877 

.238176 

0 . 000000 

0 . cooooo 

. 988654 

.960851 

1 .000000 

S 

-9.055! 18 

0 ooooco 

1 567962 

.972177 

. 236890 

0.000000 

0 . 000000 

.988777 

.961266 

1 . 000000 

7 

-9.05S1 18 

0 . 000000 

1 617587 

974100 

.22849! 

0 . 000000 

0.000000 

.989558 

.963329 

1 .000000 

8 

-9.0551 18 

0 . 000000 

1 ,646886 

.977246 

.214062 

0 . 000000 

0.000000 

. 990835 

.968290 

I .000000 

9 

-9.055! 18 

0 . 000000 

1 664183 

974414 

. 186789 

0 . 000000 

0 000000 

. 993022 

.967615 

1 .003371 

10 

-9 055! 18 

0 , 000000 

1 674395 

. 97 1 296 

. 164753 

0 000000 

0 000000 

.994571 

.956024 

1 . 006225 

1 1 

-9.0551 18 

0 000000 

1 630424 

.968216 

. 148059 

0 . 000000 

0 000000 

.995616 

.963971 

1.008563 

12 

-9.0551 18 

0 000000 

1 .683983 

. 965383 

. 133237 

0 . 000000 

0.000000 . 

.996450 

. 962454 

1 .010382 

13 

-9.0551 IS 

0 000000 

1 . 686085 

.955179 

.113133 

0 . 000000 

0.000000 

.997440 

.962708 

1 .0! 1681 

14 

-9.0551 18 

0 . 000000 

1 .687325 

. 966627 

.077187 

0.000000 

0 . 000000 

.998808 

.965475 

1 .012462 

15 

-9.0551 18 

0 . 000000 

1 638058 

968890 

0.000000 

0 . 000000 

0 . 000000 

1 .000000 

.968890 

1 .012722 

16 

-9.0551 18 

0 000000 

2 000000 

452338 

0 . 000000 

0 . 000000 

0 . 000000 

1 . 105440 ■ 

.500033 

1 .518273 

17 

-9.055! 18 

0.000000 

2,000031 

. 456232 

.218015 

0 . 000000 

0 000000 

1 .095934 

. 500000 

1.500065 

18 

-9.055! 18 

0 . 000000 

2 000! 10 

,457947 

. 260869 

0 . 000000 

0 . 000000 

1 .091829 

. 500000 

1.492206 

19 

-9.0551 18 

0 . 000000 

2 000309 

. 459905 

.302153 

0 . 000000 

0.000000 

1 .08718! 

. 500000 

1.483318 

20 

-9.0551 18 

0 000000 

2 . 000807 

.462353 

. 346606 

0 000000 

O.OJOOOO 

1 .081413 

.500000 

1 .472313 

21 

-9.0551 18 

0 . 000000 

2 . 002059 

.465531 

.396217 

0 . 000000 

0 . 000000 

1 . 074042 

.500000 

I .458284 

22 

-9.055118 

0 000000 

2 005204 

, 469695 

. 452327 

0 . 000000 

0 . 000000 

1 .064520 

.500000 

1 .440215 

23 

-9.0551 IS 

0 . cooooo 

2,013103 

475210 

.5161 12 

0 . 000000 

0 . cooooo 

1 .052166 

.500000 

1 .416863 

24 

-9.055! 18 

0 000000 

2 032944 

,482574 

.583771 

0 . 000000 

0 . 000000 

1 .036110 

. 500000 

1.386692 

25 

-9.055! 18 

0 . 000000 

2 . 032783 

. 492499 

,671603 

0 . 000000 

0 . 000000 

1 .015230 

.500000 

1 . 347728 

26 

-9.0551 18 

0 . 000000 

2 207974 

. 506037 

, 766064 

0 . 000000 

0 . 000000 

. . 988069 

.500000 

1 .29752! 

27 

-9.055! 18 

0 . 000000 

2 , 522438 

.510204 

.791960 

0 . 000000 

0 . 000000 

. 980000 

.500000 

1 .282710 

28 

-9.055! 18 

0 . 000000 

3,312336 

.510204 

.791960 

0.000000 

0 . 000000 

. 980000 

.500000 

I .282710 

L 

X 

Y 

Z 

RXRREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

1 

-7.742782 

0 . 000000 

0 . 000000 

.972469 

. 229849 

0 . 000000 

0 . 000000 

.989458 

.962217 

1.000569 

2 

-7.742782 

0 . 000000 

. 69 1 889 

97256! 

. 230609 

0.000000 

- .000173 

.989435 

.962287 

1.000508 

3 

-7.742782 

•0 . 000000 

1 . 100368 

. 972839 

. 232888 

0 . 000000 

- . 0U(-303 

.989367 

.962495 

I .000325 

4 

-7.742782 

0 . 000000 

1 .341528 

973108 

. 235859 

0.000000 

- . 000270 

.989248 

.962645 

1 .000094 

5 

-7.742782 

0 . 000000 

' 483905 

.973251 

.237908 

0,000000 

-.000322 

.9891 15 

.962657 

.999900 

6 

-7,742782 

0 . 000000 

1 , 567962 

.973316 

. 236863 

0 . 000000 

-.000232 

.989151 

.362756 

.999911 

7 

-7.742782 

0 . ocoooo 

1 ,617587 

.972883 . 

.229571 

0.000000 

-.000235 

.989541 . 

.962708 

1 .000483 

8 

-7.742782 

0,000000 

1 , 646886 

.971838 

.21331 1 

0.000000 

-.000095 

.990691 

.962791 

: .002076 

9 

-7,742782 

0 cooooo 

1.664183 

. 969969 

. 188732 

,0.000000 

- , 000044 

.992530 

.962723 

r. 004709 

10 

-7,742782 

0 . 000000 

1 .674395 

.968430 

.165260 

0.000000 

- .000018 

.994184 

.962798 

1 .007024 

1 1 

-7,742782 

0.000000 

1 680424 

,967343 

. 148261 

0 . 000000 

- . 000008- 

.995229 

.962727 

1 .008535 

12 

-7.742782 

0 . 000000 

1 . 683983 

. 966628 

.133272 

0.000000 

-.000003 

.996039 

.962799 

1 .009654 

13 

-7.742782 

0 . 000000 

1 686085 

.965700 

. 113347 

0. cooooo ■ 

-'.000002 

.996923 

.962729 

1 .010939 

14 

-7.742782 

0 000000 

1 687325 

.964634 

.077104 

0.000000 

-.000000. 

.998098 

.962800 

1 .012578 

15 

-7.742782 

0 . 000000 

1 688058 

. 963702 

0.000000 

0 . 000000 

0.000000 

. 998990 

.962729 

1 .013874 

16 

-7.742782 

0.000000 

2 000000 

. 455575 

0 . 000000 

0.000000 

0.000000 

1 .098318 

.500365 

1 .504194 

17 

-7. 742782 

0 . 000000 

2 000031 

,454463 

.023953 

0 . 000000 

- . 000000 

1 . 098235 

.499107 

1 .505552 

18 

-7 742782 

0 000000 

2 000! 10 

. 455838 

,066152 

0 000000 

. 000008 

I .097686 

.500366 

I .502983 

19 

-7.742782 

0 000000 

2 000309 

. 456026 

. 161519 

0 . 000000 

.000021 

1 .094471 

. 499 1 07 

1 ; 498333 

20 

-7.742782 

0 . 000000 

2 000807 

.460617 

.275917 

0 . 000000 

.000051 

1 .086295 

.500366 

1 .481192 

21 

-7.742782 

0.000000 

2 . 002059 

.463213 

. 354565 

0.000000 

.000073 

1 .077492 

.499108 

1 .465892 

22 

-7.742782 

0 000000 

2 005204 

, 468048 

.415412 

0.000000 

.000153 

1 .069049 

.500366 

I .448377 



I 


23 

-7.742782 

0 

000000 

2 

013103 

.471694 

.480103 

0,000000 

,000261 

I .058138 

.499118 

1 ,429151 

24 

-7.742782 

0 

000000 

2 

032944 

.480827 

,569202 

0.000000 

.000768 

1 .040625 

,500361 

1 .394758 

25 

-7.742782 

0 

000000 

2 

032783 

492072 

.67239! 

0.000000 

.001046 

1 .014415 

.499165 

1 347113. 

26 

-7 . 742782 

0 

000000 

2 

207974 

504907 

757442 

0 000000 

.001218 

.990848 

.500286 

I . 302335 

27 

-7.742782 

0 

000000 

2 

522438 

,510097 

,793141 

0.000000 

. 002 1 99 

.979434 

499606 

; .282077 

28 

-7.742782 

0 

000000 

3 

312336 

510204 

,791960 

0 . 000000 

. 000577 

.980000 

.500000 

I .282710 

L 

X 


y 


2 

R/ftREF 

U/AREr 

V/AREE 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-6 . 430446 

0 

000000 

0 

000000 

37 I 087 

.231 166 

0 000000 

0.000000 

,9891 14 

.960516 

1 .000791 

2 

-6.430446 

0 

000000 


691889 

971270 

.231725 

0 . 000000 

- . 00 1 584 

.989103 

.960686 

1 .000704 

3 

-6.430446 

0 

ooooco 

J 

100368 

971820 

.23340! 

0.000000 

- .001761 

.989069 

.961197 

1 000443 

4 

-6.430446 

0 

OGGOOO 

1 

341528 

972039 

235923 

0 000000 

- 001364 

.988832 

.961 182 

1 .0001 13 

5 

-6 430446 

0 

000000 

1 

433905 

972251 

237238 

0 000000 

-.001069 

.988713 

.96 1277 

,999905 

6 

-6.430446 

0 

000000 

1 

567962 

972050 

. 234595 

0.000000 

- . 000755 

.988885 

.961245 

1 .000162 

7 

-6 430446 

0 

OOQOOO 

1 

617587 

971270 

.224486 

0 . 000000 

-.000436 

.989721 

,961287 

1 .001329 

8 

-6 430445 

0 

ooooco 

I 

646S86 

969742 

205440 

0 . 000000 

- . 000248 

.991239 

961246 

1 ,003497 

9 

-6.430446 

0 

ooooco 

t 

664183 

968142 

. 181565 

0 . 000000 

- .0001 12 

.992914 

.961282 

1 . 0058-: 7 

10 

-6.430446 

0 

000000 

1 

674395 

.966343 

159853 

0 . ocoooo 

- . OOOC50 

.994209 

.961244 

1 . 007709 

1 I 

-6.430446 

0 

000000 

1 

630424 

966076 

1 44025 

0 . 000000 

-.000028 

, 995035 

.961280 

1 . 008867 

12 

-6.430446 

0 

000000 

1 

683983 

965384 

. 1 29620 

0.000000 

- .00001 1 

.995711 

.961243 

1 .009841 

13 

-6.430446 

0 

000000 

1 

636085 

964625 

. 1 10065 

0 . 000000 

- . 000006 

.996531 

.961279 

1.010992 

14 

-6.430446 

0 

ococoo 

1 

687325 

963496 

.074410 

0 . 000000 

. 000000 

997661 

.961243 

1 .012612 

15 

-6.430446 

0 

000000 

1 

688058 

962695 

0.000000 

0 . cooooo 

0 . oooooo 

. 998528 

.961278 

1 .013829 

16 

-6.430446 

0 

000000 

2 

000000 

. 453850 

0 . 000000 

0 . 000000 

0.000000 

1 097429 

. 498069 

1 .505260 

17 

-6 430446 

0 

000000 

2 

000031 

.453475 

.022162 

0,000000 

, oooooo 

1 .097359 

. 497624 

1 .505662 

18 

-6.430446 

0 

000000 

2 

0001 10 

.454074 

.061370 

0,000000 

. oooooo 

1 . 096888 

. 498069 

1 .504221 

19 

-6.430446 

0 

000000 

2 

000309 

. 454835 

. 151615 

0 , ooooon 

oooooo 

1 .094076 

.497624 

1 . 499359 

20 

-6.430446 

0 

000000 

2 

000307 

.458424 

. 264639 

0,000000 

, 000002 

1 .086479 

.498069 

1 . 484275 

21 

-6.430446 

0 

000000 

2 

002059 

.461554 

.343165 

0.000000 

.000005 

1 .078152 

. 497625 

1 . 468896 

22 

-6 430446 

0 

000000 

2 

005204 

.465447 

.403707 

0 , ooooco 

.000020 

1 .070089 

.498069 

I .453020 

23 

-6,430446 

0 

000000 

2 

013103 

469500 

.467901 

0.000000 

.000044 

1 . 059920 

.497632 

1.434230 

24 

-6.430446 

0 

ocoooo 

2 

032944 

478017 

.561271 

0,000000 

000157 

I .041970 

.498080 

1 . 399838 

25 

-6,430446 

0 

ocoooo 

2 

032783 

490560 

.672768 

0 , 000000 

.000400 

1 .014585 

.497715 

1 . 348998 

26 

-6.430446 

0 

000000 

2 

207974 

502777 

. 756297 

0,000000 

.000285 

,990991 

. 498247 

1 . 304726 

27 

-6.430445 

0 

ocoooo 

2 

522438 

.509281 

.794933 

0 , 000000 

. 000464 

,978873 

. 498522 

1 282163 

28 

-6 430446 

0 

ocoooo 

3 

312336 

510204 

.791960 

0.000000 

-.00086! 

. 980000 

. 500000 

1 .282710 

L 

X 


Y 


2 

R/RREE 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-5 1 181 10 

0 

000000 

0 

000000 

. 970893 

.238917 

0 , 000000 

0 , oooooo 

.988189 

.959426 

999934 

2 

-5, 1181 10 

0 

000000 


691889 

97II82 

, 238202 

■ 0,000000 

- .00503! 

. 988324 

.959843 

.999952 

3 

-5. 1 181 10 

0 

000000 

1 

100368 

972050 

.236057 

0 . 000000 

- ,005801 

983730 

.961095 

1 . 000006 

4 

-5 1181 10 

0 

000000 

1 

341528 

.972038 

. 235369 

0 . 000000 

- .004938 

.988654 

.961009 

.999933 

5 

-5. 1181 10 

0 

000000 

1 

483905 

.972228 

.234000 

0 . 000000 

-.004255 

. 988784 

.961323 

.999987 

6 

-5 1 181 10 

0 

ooooco 

1 

567962 

971719 

.228164 

0 , 000000 

- . 003570 

.989239 

.961262 

1 000656 

7 

-5. 1 181 10 

0 

ocoooo 

I 

6 1 7587 

9706SS 

.214252 

0 000000 

- . 002959 

.990453 

.961420 

I .002310 

8 

-5 1 18110 

0 

000000 

1 

646385 

969010 

. 192952 

0. cooooo 

- .002388 

. 992069 

.961325 

1 . 00464 1 

9 

-5 1 18110 

0 

000000 

I 

664 1 83 

967643 

. 170131 

0.000000 

-.001962 

. 993586 

.961442 

1 .006743 

10 

-5. 1181 10 

0 

000000 

1 

674395 

966590 

. 152233 

0.000000 

- .001685 

.994566 

.961338 

1 .008176 

1 1 

-5, 1 181 10 

0 

ocoooo 

1 

680424 

966023 

. 1 38397 

0 . 000000 

-.001507 

.995261 

.961445 

1 .009118 

12 

-5.118110 

0 

OGOOOO 

1 

683983 

965297 

124171 

0.000000 

- .001333 

.995901 

. ')6 1 340 

1 .010071 

13 

-5, 1 181 10 

0 

ocoooo 

1 

6860S5 

. 964655 

. I049I5 

0 000000 

-.00! 121 

.996672 

.961445 

I .011122 

14 

-5. 1 181 10 

0 

cooooo 

1 

687325 

.963559 

070220 

0 . 000000 

- . 000745 

. 997698 

.961341 

1 .012623 

15 

-5. 1 181 10 

0 

ocoooo 

1 

588058 

962933 

0.000000 

0 . 000000 

0.000000 

.998454 

.961445 

1 .013654 

16 

-5 1 181 10 

0 

cooooo 

2 

000000 

450496 

0 000000 

0 . 000000 

0 OOOOOO 

1 .097857 

. 494580 

1 .510322 

17 

-5 1 18110 

0 

000000 

2 

0C0031 

4501 18 

. 022320 

0.00000.0 

- 000187 

1.097782 

.494132 

1.510726 

18 

-5. 1 181 10 

0 

000000 

2 

OQO! 10 

.45073! 

.063! 14 

0.000000 

-.000517 

1 .097284 

. 494580 

1 .509218 

19 

-5. 1 181 10 

0 

000000 

2 

000309 

.451538 

. 155261 

0.000000 

-.001273 

1 .094329 

.494132 

1.504077 

20 

-5. 1 181 10 

0 

000000 

2 

0OOSO7 

455206 

.269176 

0.000000 

-.002207 

1 . 086497 

.494580 

1 .483488 

21 

-5.1 181 10 

0 

000000 

2 

002059 

458388 

.348019 

0.000000 

- . 002860 

1 .077979 

.494132 

I .472710 

22 

-5, 1 18110 

0 

000000 

2 

005204 

. 462322 

. 408807 

0 . 000000 

-.003361 

1 .069777 

.494582 

1 .456516 

23 

-5, 1 18! 10 

0 

000000 

2 

013103 

466416 

.473261 

0 000000 

- . 003929 

1 .059451 

,494145 

1 .437379 

24 

-5. 1 181 10 

0 

000000 

2 

032944 

474962 

.566945 

0.000000 

-.004696 

1 .041385 

.494618 

1 . 402645 

25 

-5. 1 181 10 

0 

000000 

2 

082783 

. 487729 

.679692 

0.000000 

-.005619 

1 .013512 

.494319 

1 . 350696 

26 

-5. 118110 

0 

000000 

2 

207974 

.500360 

.76278! 

0 000000 

- . 006269 

.989710 

.495211 

1 . 305554 

27 

-5. 1 18! 10 

0 

000000 

2 

522438 

.507598 

.800277 

0.000000 

-.007244 

.977433 

.496143 

1 .281974 



28 

-5. II81I0 

0.000000 

3.312336 

.510204 

.791960 

0.000000 

- .006580 

.980000 

.500000 

1.282710 

L 

X 

Y 

z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

-4,068241 

0 . 000000 

0.000000 

.971818 

.256886 

0.000000 

0.000000 

.986197 

.95.8404 

.997538 

2 

-4.068241 

0 . 000000 

.681615 

. 972240 

. 253588 

0.000000 

- .010659 

.986682 

.959292 

.997856 

3 

-4.068241 

0 . ocoooo 

1 . 084029 

.973507 

.243696 

0.000000 

-.012736 

.983138 

.961959 

.998308 

4 

-4.068241 

0.000000 

1 .321608 

. 973066 . 

.236463 

0 000000 

-.011291 

.988621 

.961994 

.999477 

5 

-4.068241 

0.000000 

1 .461870 

,973142 

.230470 

o.oooood 

- .010048 

.989234 

.962665 

1 .000066 

6 

-4 068241 

0 . 000000 

1 544679 

972332 

. 220943 

0.000000 

- . 008766 

. 990006 

.962614 

I .001 180 

7 

-4,068241 

0 000000 

1 . 593563 

971208 

. 204095 

0 . oocooo 

- .00761 1 

.991474 

.962927 

I .003128 

8 

-4.068241 

0 000000 

I .622431 

96S496 

. 181843 

0 . 000000 

-.006481 

.993066 

.962773 

1 ,005449 

9 

-4.068241 

0.000000 

1 .639472 

.968357 

. 160365 

0.000000 

-.005594 

.994457 

.962990 

1 .007330 

10 

-4.06S241 

0 000000 

1 . 649532 

.967375 

. 1 44698 

0.000000 

-.004977 

.995280 

.962809 

1 .008573 

11 

-4.068241 

0 ocoooo 

1 .655472 

.966953 

. 132128 

0.000000 

-.004520 

.995909 

.963002 

1.009385 

12 

-4.068241 

0 000000 

1 .658978 

.966193 

. 1 18435 

0 , 000000 

-.004031 

,996507 

.962818 

I .010310 

13 

-4.068241 

0 . 000000 

1 661048 

, 965677 

.099749 

0.000000 

-.00339! 

.997233 

.963005 

I .011263 

14 

-4,068241 

0 . 000000 

1 662271 

. 964580 

.065063 

0 . 000000 

- . 002240 

.998175 

.962820 

I .012678 

15 

-4.068241 

0 , ocoooo 

1 . 662992 

.964119 

0 . 000000 

0 . 000000 

0 . oooooo 

. 998845 

. 963005 

I .013551 

16 

-4.068241 

0 , ocoooo 

1 930640 

. 444620 

0 . 000000 

0 . 000000 

0 . oooooo 

1 . 096863 

.487687 

1 .516900 

17 

-4,068241 

0 . 000000 

I 980672 

.443871 

. 023993 

0 . 000000 

- . 000806 

1 . 096780 

.486828 

I .517808 

18 

-4.068241 

0 . 000000 

1 . 980752 

,444376 

. 066335 

0.000000 

-.002228 

1 .096230 

487687 

I .515674 

19 

-4 068241 

0 . 000000 

1 . 880954 

,445407 

. 162434 

0 000000 

- . 005457 

I .092996 

. 486829 

1.510483 

20 

-4 068241 

0 , 000000 

1 .981460 

449599 

.278237 

0 . 000000 

-.009344 

1 .034715 

. 487687 

I . 493431 

21 

-4.068241 

0 . 000000 

1 982730 

.45252! 

. 357978 

0.000000 

-.012022 

1 . 075823 

. 486832 

1 .477356 

22 

-4.068241 

0 000000 

I .985921 

.456943 

.419674 

0. oocooo 

- .014065 

I .067306 

,487698 

1 .459972 

23 

-4.068241 

0 . ocoooo 

1 . 993936 

. 460827 

.48522! 

0 . 000000 

-.016246 

1 .056530 

.486877 

I . 440346 

24 

-4.068241 

0 . 000000 

2,014071 

. 469880 

. 579622 

0 . 000000 

-.019162 

1 .038190 

. 487824 

I . 404372 

25 

-4.068241 

0 . ocoooo 

2 064645 

. 43266 1 

.692710 

0 . 000000 

- . 022455 

1 . 009768 

.487376 

1.351340 

26 

-4 068241 

0 000000 

2. 191682 

. 496405 

. 774923 

0 . 000000 

-.023558 

. 985989 

.489450 

1.30478! 

27 

-4.068241 

0 . 000000 

2.510785 

. 505040 

. 809526 

0 . 000000 

- . 023204 

.974283 

.492051 

1 .280427 

28 

-4.068241 

0 . 000000 

3 312336 

.510204 

.791960 

0 . oooooo 

- .017499 

.980000 

.500000 

I .282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

-3.280840 

. 0. ocoooo 

0 . 000000 

.97331 1 

. 283906 

0 . oooooo 

0 . OOOOOO 

.983015 

.956780 

.993710 

2 

-3.280840 

. -0 . 000000 

666339 

.973712 

.277155 

0 . oooooo 

- .017151 

. 983973 

.958107 

.994515 

3 

-3.280840 

0 . 000000 

1 . 059734 

.974914 

. 256900 

0 . oooooo 

- . 020724 

. 936848 

.962092 

.996928 

4 

-3.280840 

0 , 000000 

1 .291988 

. 973597 

.240740 

0.000000 

-.018505 

.988152 

.962061 

.998785 

5 

-3.230840 

0 000000 

1 428108 

,973340 

. 228974 

0 . oooooo 

-.016522 

. 989362 

.962986 

1 .000113 

6 

-3.280840 

0.000000 

1.510060 

.972196 

.216136 

0 . oooooo 

-.014537 

. 990400 

.962863 

1 .001635 

7 

-3.280840 

0 000000 

1 . 557854 

.971 104 

. 198223 

0 . 0^3000 

-.012827 

.991961 

.963298 

1 .003664 

8 

-3.280340 

0 . 000000 

1 . 586070 

969432 

. 1 77080 

0 . oooooo 

-.011214 

.993419 

.963052 

1.005832 

9 

-3.280840 

0 . 000000 

1 . 602729 

.968496 

.157526 

0.000000 

- .009945 

,994702 

.963365 

1 .007521 

10 

-3.280840 

0.000000 

1 612563 

.967477 

. 1 42876 

0.000000 

■ -.009004 

. 995469 

.963093 

1 .008722 

II 

-3.280840 

0 . 000000 

1 .618370 

.967154 

. 1 30655 

0 . oooooo 

- . 008234 

. 996097 

.963379 

1 .009493 

12 

-3.280840 

0 000000 

1 621 798 

. 966309 

.117176 

0 . oooooo 

-.007377 

. 996682 

.963103 

1 .010439 

13 

-3.280840 

0 . 000000 

1 623822 

. 965887 

.098615 

0 . oooooo 

- . 006309 

. 997407 

.963382 

I .011351 

14 

-3.280840 

0 000000 

1 .625016 

.964717 

.065061 

0 . oooooo 

- . 004095 

.998330 

.963105 

1.012777 

15 

-3.280840 

0,000000 

1 , 625722 

.964357 

0 . 000000 

0.000000 

0.000000 

.998979 

.963382 

1 .013583 

16 

-3.280840 

0 000000 

1 938270 

.440361 

0 . 000000 

0 oooooo 

0 . OOOOOO 

I .095654 

. 482483 

I .521072 

17 

-3 280840 

0 000000 

I 938303 

43934 1 

,024748 

0 . oooooo 

- .001633 

1 .095565 

.481326 

1 .522361 

18 

-3.280840 

0 000000 

1 . 938386 

.440633 

.068418 

0 . oooooo 

- .004516 

1 .094978 

. 482483 

1 .519758 

19 

-3,230840 

0 . ocoooo 

1 . 938594 

. 440955 

. 166791 

0,000000 

-.011008 

1.091556 

.481327 

1 .514567 

20 

-3.280840 

0,000000 

1 .9391 16 

.445473 

,282308 

0.000000 

-.018624 

1 . 083082 

.482484 

1 .496694 

21 

-3.280840 

0.000000 

1 , 940426 

.443134 

,361659 

0.000000 

-.023845 

1.074082 

.481333 

1 .480725 

22 

-3.280840 

0 000000 

1.943719 

. 452868 

.423638 

0. oooooo 

-'.027856 

I .065434 

.482501 

1 .462641 

23 

-3.280840 

0.000000 

1.951989 

. 456565 

. 489922 

0.000000 

-.032088 

1 .054403 

.431403 

1 .442798 

24 

-3.280840 

0.000000 

1 . 972764 

, 466033 

.585730 

0.000000 

- . 037758 

I .035749 

.482693 

1 .405685 

25 

-3.280840 

0 . 000000 

2 . 024948 

.479002 

,700715 

0 . oooooo 

-.043904 

1 .006536 

.482133 

1 .351121' 

26 

-3.280840 

0.000000 

2, 156027 

. 493765 

. 784539 

0 . oooooo 

- . 045656 

.982274 

.485013 

1 . 302640 

27 

-3.280840 

0 . 000000 

2 . 485283 

. 503497 

.818172 

0.000000 

- . 042954 

.970869 

.438830 

1 .277503 

28 

-3.280340 

0 . 000000 

3.312336 

.510204 

,791960 

0.000000 

- . 030490 

.980000 

.500000 

1.282710 

L 

X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

-2.650919 

0.000000 

0.000000 

. 974584 

.316668 

0.000000 

0.000000 

.978942 

.954061 

.989075 

2 

-2.650919 

O.OO'OOOO 

. 645038 

. 974962 

. 306037 

0.000000 

-.023810 

.980473 

.955924 

.990468 





J= 8 


3 

-2.650919 

0,000000 

1 . 025858 

976096 

4 

-2.650919 

0 000000 

1 . 250688 

973900 

5 

-2.650919 

0 OGOOOO 

1 . 383424 

973293 

6 

-2.650919 

0 . 000000 

1 461789 

971918 

7 

-2.650919 

0 . ocoooo 

1 . 508055 

.971020 

8 

-2.650919 

0 . ocoooo 

1 535369 

.969561 

9 

-2.650919 

0 . 000000 

1 .551495 

968883 

10 

-2.650919 

0 . 000000 

1 .561016 

. 967805 

1 1 

-2.650919 

0 . ocoooo 

1 . 566636 

967441 

12 

-2.650919 

0.000000 

1 . 569955 

. 966483 

13 

-2.650919 

0,000000 

1 571914 

.966052 

14 

-2.650919 

0 . ocoooo 

1 573070 

, 964772 

15 

-2.650919 

0 . ocoooo 

1 573753 

.964421 

16 

-2.650919 

0 000000 

1 887087 

.440136 

17 

-2.650919 

0 . 000000 

1 ,887121 

. 438873 

18 

-2.650919 

0 ocoooo 

1 . 887207 

.440418 

19 

-2.650919 

0 . 000000 

1 837422 

.440531 

20 

-2,650919 

0 , 000000 

1 887963 

. 445272 

21 

-2.650919 

0 000.000 

1 889323 

.447631 

22 

-2 650919 

0 000000 

1 892733 

.452581 

23 

-2.650919 

0 000000 

1 901317 

. 456035 

24 

-2.650919 

0 . ocoooo 

1 . 922365 

. 465802 

25 

-2.650919 

0 cooooo 

1 .975993 

.47894! 

26 

-2.650919 

0 ocoooo 

2 1 12954 

.494364 

27 

-2.650919 

0 ocoooo 

2 454475 

.504030 

28 

-2.650919 

0 . 000000 

3 312336 

510204 

L 

X 

Y 

Z 

R/RREF 

1 

-2.204724 

0.000000 

0.000000 

973235 

2 

-2.204724 

0 000000 

626105 

973935 

3 

-2.204724 

0 cooooo 

, 995746 

.976035 

4 

-2.204724 

0 . 000000 

1 213977 

.973613 

5 

-2.204724 

0 000000 

1 342817 

.972917 

6 

-2.204724 

0 . 000000 

1 416381 

971537 

7 

-2.204724 

0 000000 

I .463739 

. 970S29 

8 

-2.204724 

0 . 000000 

1 490302 

.969528 

9 

-2 . 204724 

0 . 000000 

1 505954 

,969013 

10 

-2.204724 

0 . 000000 

1 515195 

. 967952 

1 1 

-2.204724 

0.000000 

I 520651 

. 967627 

12 

-2.204724 

0 . 000000 

1 523372 

966639 

13 

-2 . 204724 

0 000000 

1.525774 

.966231 

14 

-2.204724 

0 cooooo 

1 .526896 

964910 

15 

-2.204724 

0 . 000000 

1 527559 

. 964538 

16 

-2 204724 

0 . 000000 

1 841483 

439968 

17 

-2.204724 

0 000000 

1 841518 

. 433522 

18 

-2.204724 

0 . 000000 

1 841607 

. 440259 

19 

-2.204724 

0 , 000000 

1 841829 

440224 

20 

-2 . 204724 

0 . 000000 

1 . 842388 

445130 

21 

-2.204724 

0 . 000000 

1 843791 

447248 

22 

-2.204724 

0 . 000000 

1 847315 

452348 

23 

-2.204724 

0 ocoooo 

1 856168 

. 455583 

24 

-2.204724 

0 cooooo 

1 878406 

465541 

25 

-2,204724 

0 000000 

1 934266 

.478895 

26 

-2.204724 

0 , 000000 

2.074578 

495053 

27 

-2,204724 

0 . 000000 

2 427026 

,505052 

28 

-2,204724 

0.000000 

3 312336 

.510204 

L 

X 

Y 

2 

R/RREF 

1 

-1 837270 

0 , 000000 

0,000000 

968139 

2 

-1 837270 

0 . 000000 

.608139 

969554 

3 

- 1 . 337270 

0 000000 

967174 

. 973799 

4 

- 1 8372,70 

0 . ocoooo 

1 . 179143 

972000 

5 

- 1 . 837270 

0 . 000000 

1 . 304286 

97 1 785 

6 

-1 .837270 

0 . 000000 

1 373168 

. 970667 

7 

- 1 . 837270 

0 , 000000 

1 421787 

.970206 


,274143 

0.000000 

- . 028934 

.985065 

.961518 

.994644 

,247935 

0 000000 

- . 025763 

. 987424 

.961653 

. 997925 

.230118 

0.000000 

- . 022866 

. 989279 

. 952858 

1 . 000049 

.214721 

0 . 000000 

-.020215 

. 990569 

.962751 

1 .001920 

. 197816 

0 . 000000 

- .018144 

. 992034 

, 963285 

1 .003772 

. 180413 

0.000000 

-.016355 

. 993244 

. 9630 ! 1 

1 .005602 

. 16441 I 

0.000000 

-.014933 

,994324 

.963388 

1 . 006974 

.150227 

0,000000 

-.013665 

.995115 

.963078 

1 .008226 

. 1 36798 

0 . 000000 

- .012464 

995839 

.963415 

1 .009111 

. 1 22268 

0 . 000000 

- 011142 

. 996495 

. 963096 

1 .010177 

. 102848 

0 . 000000 

-.009378 

. 997278 

.963422 

1 .01 1 151 

.068009 

0.000000 . 

-.006201 

. 998268 

,963100 

1.012692 

0.000000 

0 . 000000 

0 . ooocoo 

. 998965 

,963423 

1 .013546 

0.000000 

0,000000 

0.000000 

1.096176 

. 482467 

1 .522107 

.025133 

0 000000 

- . 002260 

1 .096084 

.481042 

1 .523731 

. 06948 ! 

0 , ocoooo 

- ,006249 

1 , 095476 

. 482467 

1 .520746 

. 168614 

0 000000 

- .015164 

1,091960 

.481042 

1 .515710 

282172 

0 , cooooo 

- .025367 

1 . 083532 

. 482467 

1 . 497586 

. 360099 

0 , 000000 

- .032354 

1 .074651 

.481048 

1 .482174 

.421662 

0 000000 

- .037786 

1 . 066065 

.482481 

1 . 463878 

487960 

0,000000 

-.043549 

1 . 054987 

.481111 

1 . 444268 

.584903 

0 . 000000 

- .051370 

1 .036159 

. 482645 

1 .406519 

, 702779 

0.000000 

- .059930 

1 . 005950 

. 48179 ! 

1 . 350404 

. 789339 

0 . 000000 

- . 062524 

.980724 

. 484834 

I . 299955 

. 823546 

0 . 000000 

-.058742 

. 968792 

.488301 

1 . 274230 

,791960 

0 . 000000 

- .041022 

. 980000 

. 500000 

1.282710 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

,351021 

0.000000 

0 . 000000 

. 974230 

948155 

. 984859 

. 336430 

0 . 000000 

-.031293 

. 976404 

.950955 

. 986774 

. 292657 

0 . 000000 

-.038334 

. 982928 

.959373 

.992512 

.255943 

0 . 000000 

-.033704 

986443 

.960413 

. 99705 ! 

. 232298 

0.000000 

- . 029222 

. 988872 

.962091 

. 999792 

.214914 

0,000000 

- .025561 

.990341 

.962152 

1 .001846 

. 193439 

0.000000 

-.022859 

.991759 

. 962828 

1 . 003573 

. 182623 

. 0.000000 

-.020617 

. 99283 1 

.962578 

1 .005197 

. 167893 

0 . 000000 

- .018799 

.993810 

.363015 

1 . 006402 

. 153994 

0 . 000000 

-. 01714 ! 

.994563 

.962689 

1 . 007606 

.140281 

0 . 0,00000 

-.015578 

. 995284 

. 963064 

1 . 008472 

. 125300 

0 . 000000 

- .013882 

. 995945 

.962719 

1 . 009554 

. 105316 

0.000000 

- .01 1662 

. 996736 

. 963077 

1 .010527 

. 069553 

0 . 000000 

-.007693 

, 997737 

. 962727 

1 .012095 

0 , 000000 

0 . 000000 

0 , 000000 

.998435 

.963079 

1.012938 

0.000000 

0 . 000000 

0 .. 000000 

1 .096113 

. 482254 . 

1 . 522254 

. 025548 

0 . 000000 

- .002795 

1 . 0960 1 8 

. 480627 

1 .524128 

.070610 

0. 000000 

- . 007724 

1 . 035388 

.482254 

. 1 . 520844 

. 1 70504 

0.000000 

-.018651 

1.091781 

■ .480628 

1 .515885 

.282275 

0 . 000000 

- . 030866 

1 . 083402 

.482254 

1 .497597 

. 358850 

0 . 000000 

-.039215 

1 . 074647 

. 480634 

1.482676 

419939 

0.000000 

- .045764 

1 .066147 

482270 

1 . 464293 

. 485803 

0.000000 

- . 052707 

1.055131 

. 480705 

1 .445031 

,583262 

0 . cooooo 

- . 062220 

1 . 036320 

.482449 

1 . 407054 

. 703565 

0 . ooocoo 

- . 072653 

1 .005346 

.481455 

1 . 349644 

. 792893 

0.000000 

-.075515 

.979342 

. 484826 

1 . 297399 

. 827304 

0 , 000000 

-.069820 

.967300 

. 488537 . 

1 .271238 

.791960 

0.000000 

- . 048233 

.980000 

.500000 

1.282710 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

. 389308 

0 , 000000 

0.000000 

, 968642 

.937781 

.981270 

.370293 

0 . 000000 

- .041347 

.971553 

941973 

.983643 

.313246 

0 . 000000 

- .051587 

. 380284 

. 954600 

.990751 

, 2632S0 

0.000000 

-.045793 

.985029 

.957448 

. 996283 

.231578 

0 : 000000 

- . 039504 

. 988005 

.960128 

.999380 

.210565 

0.000000 

- , 034355 

.989631 

.960602 

1 .001487 

. 192702 

0 . 000000 

-.030466 

.991045 

.961518 

1 .003109 


J= 10 


8 

-1 

.837270 

0 . 000000 

1 . 447539 

.969051 

.176590 

0.000000 

-.027282 

.992042 

.961339 

1 .004596 

9 

-1 

.837270 

0 . 000000 

1 462742 

. 968685 

. 161910 

0 . 000000 

-.024701 

992945 

.961851 

1 .005663 

10 

-1 

. 837270 

0 . 000000 

1 471718 

. 967686 

. 148207 

0.000000 

- . 022423 

.993628 

.961520 

1 .006769 

11 

-1 

.837270 

0.000000 

1 .477017 

.967452 

. 1 34796 

0.000000 

- .020314 

. 994295 

.961933 

1 .007543 

12 

-1 

.837270 

0 . 000000 

1 .480146 

. 9664S3 

.120181 

0 . 000000 

-.018065 

.99491 1 

.961565 

1 .008571 

13 

-1 

.837270 

0.000000 

1 .481993 

.966139 

.100611 

0 . 000000 

-.015110 

. 995666 

.961952 

1 .009480 

14 

-1 

.837270 

0 . 000000 

1 . 483033 

.964841 

.065731 

0.000000 

-.009854 

.996615 

.961575 

1 .010986 

15 

-1 

.837270 

0 . 000000 

1 .483727 

. 964534 

0.000000 

0 .000000 

0.000000 

.997263 

.961954 

1 .01 1747 

16 

-1 

.837270 

0 . 000000 

1 798071 

.440040 

0 . 000000 

0 . 000000 

0 . 000000 

1 .096195 

. 482369 

1 .522268 

17 

-1 

.837270 

0 , 000000 

1 793107 

. 438660 

.026001 

0 . 000000 

- . 003227 

1 . 096096 

.480813 

1 524044 

18 

-1 

. 837270 

0 . 000000 

1 798198 

. 440342 

.071846 

0.000000 

-.008917 

1 . 09544 1 

. 482369 

1 .520803 

19 

-1 

. 837270 

0 . 000000 

1 . 798427 

.440412 

. 1 72589 

0 . 000000 

-.021420 

1 .091735 

.480814 

1 .515560 

20 

-1 

.837270 

0 . 000000 

1 . 799002 

.445248 

. 282765 

0 . 000000 

- . 035082 

1 . 033372 

. 482369 

1 . 497397 

21 

-1 

. 837270 

0 . 000000 

1 . 800447 

.447339 

.358116 

0 . 000000 

- .044402 

1 .074723 

. 480820 

1 . 482595 

22 

-1 

.837270 

0 . 000000 

1.804075 

. 452404 

.418795 

0 . 000000 

-.051794 

1 . 066266 

.482383 

1 .464384 

23 

-1 

. 837270 

. 0,000000 

1 .813190 

455668 

.484123 

0 . 000000 

-.059605 

1 . 055347 

. 480888 

1 . 445226 

24 

-1 

. 837270 

0 . 000000 

1 . 836084 

. 465564 

.581804 

0 . 000000 

-.070492 

1 .036487 

.482551 

1 .407253 

25 

-1 

.837270 

0 . 000000 

1 . 893592 

.479238 

. 703982 

0 . 000000 

-.082432 

1 . 004954 

.481612 

I .348732 

26 

-1 

.837270 

0 . ocoooo 

2 038046 

.495751 

. 796055 

0 . 000000 

-.085993 

.977987 

.484838 

1.294875 

27 

-1 

. 837270 

0 . 000000 

2 . 400896 

. 506057 

.830757 

0 . 000000 

-.078448 

.965916 

. 488809 

1 . 268409 

28 

-1 

.837270 

0 . 000000 

. 3.312336 

.510204 

.791960 

0,000000 

- . 053626 

.980000 

. 5000^0 

1 .282710 

L 


X 

Y 

Z 

R / P'.£F 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

.533333 

0 000000 

0 . 000000 

961689 

,439031 

0 . 000000 

0 . 000000 

. 960058 

.923277 

.975178 

2 

-1 

.533333 

0 000000 

584795 

.963232 

.415390 

0 , 000000 

- .054538 

. 964080 

• .928633 

. 978635 

3 

-1 

.533333 

0.000000 

,930048 

.967862 

.344468 

0.000000 

-.072219 

.976146 

. 944775 

. 98P384 

4 

-1 

. 533333 

0.000000 

I . 133879 

.967668 

. 280536 

0 . 000000 

-.070346 

.983072 

.951237 

.996081 

5 

-1 

.533333 

0 . 000000 

1.254218 

.969170 

.239252 

0.000000 

- . 065748 

.987057 

.956626 

.999499 

6 

-1 

.533333 

0 , 000000 

1 . 325265 

. 969203 

.213027 

0 . 000000 

-.061031 

.989170 

.958707 

1.001625 

7 

-1 

. 533333 

0 , 000000 

1 . 367209 

,969492 

. 192803 

0.000000 

- .056657 

.990823 

.960594 

1 .003179 

8 

-1 

.533333 

0.000000 

1.391972 

968692 

. 176044 

0 . 000000 

-.052575 

.991947 

.960891 

I .004649 

9 

-1 

.533333 

0.000000 

1 . 406592 

. 968583 

. 161765 

0,000000 

-.048877 

.992914 

.961719 

1 .005673 

10 

-1 

.533333 

0 . 000000 

1,41 5224 

.967649 

. 1 49058 

0.000000 

- .045441 

.993641 

.961495 

1.006798 

1 1 

-1 

.533333 

0.000000 

1 .420319 

.967482 

. 136877 

0 . 000000 

-.041965 

.994364 

.962029 

1.007600 

12 

-1 

.533333 

0 000000 

1 . 423328 

. 966432 

. 123498 

0,000000 

■ - .038042 

.995060 

.961658 

1 .008744 

13 

-I 

.533333 

0.000000 

1 .425104 

, 966029 

.105152 

0,000000 ■ 

-: 032457 

.995942 

.962109 

1 .009806 

14 

-1 

.533333 

0 . 000000 

1 .426153 

, 964468 

.071044 

0 , 000000 

-.021994 

.997124 

.961694 

1 .011659 

15 

-1 

.533333 

0.000000 

1 426772 

.964001 

0.000000 

0,000000 

0.000000 

. .998049 

.962121 

1 .012794 

16 

-1 

. 533333 

0 . 000000 

1 .758147 

. 439883 

0.000000 

0 . 000000 

0 . 000000 

1 . 096246 

.482220 

1 .522556 

17 

-1 

.533333 

0.000000 

1 .758184 

.438639 

.026536 

0 . 000000 

- . 003608 

1 .096143 

.480812 

1 .524138 

18 

-1 

. 533333 

0 . 000000 

1 . 758278 

.440199 

. 073302 

■ 0 . 000000 

- . 009966 

1 . 095459 

.482220 

1 .521026 

19 

-1 

, 533333 

0 000000 

1 .758513 

.440451 

. 175141 

0,000000 

- .02381 1 

1 .091635 

.480812 

I .515369 

20 

-I 

. 533333 

0 . 000000 

1 .759103 

.445160 

.284060 

0 , 000000 

- . 038605 

1 . 083253 

. 482220 

1 .497350 

21 

-1 

. 533333 

0 . 000000 

1 . 760586 

.447412 

. 358467 

0 , 000000 

- . 048684 

1 . 074666 

.480818 

1 . 482485 

22 

-1 

. 533333 

0 . 000000 

1 .764310 

. 452286 

.418842 

0 , 000000 

- . 056739 

1 .066219 

. 482236 

1 . 464472 

23 

-1 

. 533333 

0 . 000000 

1 . 773664 

. 455665 

.483787 

0.000000 

- . 065222 

1 .055362 

.480892 

1 . 445250 

24 

-1 

. 533333 

0 . 000000 

1 . 797162 

. 465456 

.581407 

0.000000 

-.077141 

1 . 036440 

.482417 

I .407321 

25 


. 533333 

0 000000 

1 856187 

.479486 

. 704906 

0.000000 

- . 090280 

1 .00451 1 

.481649 

1 . 347858 

26 

-1 

. 533333 

0 . 000000 

2 004449 

. 496340 

. 798987 

0 . 000000 

-.094218 

.976747 

.484799 

1 .292618 

27 

-1 

. 533333 

0 . 000000 

2 . 376866 

.506946 

. 833350 

0.000000 

- . 085067 

.964701 

.489051 

1 . 265925 

28 

-1 

.533333 

0 . 000000 

3.312336 

. 5 1 0204 

.791960 

0.000000 

- .057583 

; 980000 

.500000 

1 .282710 

L 


X 

Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 

. 300000 

0 . 000000 

0.000000 

. 964009 

.502179 

0 onnnon 

0 . ononoo 

. 947347 

.913251 

.961339 

2 

-I 

. 300000 

0 . 000000 

539934 

.962194 

. 4775.78 ... 

... 0.000000 

- .062654 

-.952118 

.916122 

.966910 

3 

- 1 

. 300000 

0 . 000000 

, 858703 

.956748 

.403774 

0 000000 

-.089891 

. 966432 

.924631 

. 983676 

4 

-I 

. 300000 

0 . 000000 

1 . 046839 

.953712 

.337454 

0 . 000000 

-.099320 

. 975639 

. 930479 

.994311 

5 

-1 

. 300000 

0 . 000000 

1 . 158006 

.955101 

.292963 

0 . 000000 

-.103470 

.981040 

.936992 

.999233 

6 

-1 

.300000 

0.000000 

1 223602 

.955554 

.264225 

0.000000 

-.104318 

.984066 

.940329 

I .002126 

7 

-1 

.300000 

0 . 000000 

1 262329 

956265 

.243349 

0 . 000000 

-.103188 

.986339 

.943201 

1 .004142 

8 

-1 

.300000 

0.000000 

1 285193 

.955612 

.227192 

0 . 000000 

- . 1 00889 

. 987936 

.944083 

1 .006042 

9 -. 

-I 

. 300000 

0 . 000000 

1 298691 

.955600 

.214365 

0 . 000000 

- . 098060 

989264 

.945341 

I .007399 

10 

>1 

. 300000 

0 . 000000 

1 306661 

, 954544 

.202957 

0 . 000000 

- . 094666 

. 990344 

.945328 

1 .008946 

1 1 

-1 

. 300000 

0 . 000000 

1 .311365 

.954168 

. 190946 

0 . 000000 

-.090054 

.991495 

.946053 

1 .010278 

12 

-1 

. 300000 

0 . 000000 

1 .314143 

. 952648 

. 176102 

0.000000 

-.083680 

. 992752 

.945743 

1 .012203 



13 

-1.300000 

0 

.000000 

1.315783 

.951647 

. 1 54570 

0.000000 

- . 073695 

.994379 

.946298 

1 .014288 

14 

-1 .300000 

0 

. 000000 

1 316751 

. 948900 

. 112163 

0 . OOOOOO 

- . 053659 

.996821 

.945884 

I .017956 

15 

-1.300000 

0 

. 000000 

1.317323 

. 947065 

0 . OOOOOO 

0.000000 

0.000000 

.999276 

. 946379 

1 .021253 

16 

- 1 . 300000 

0 

ooocoo 

1.725018 

.439832 

0 OOOOOO 

0 . OOOOOO 

0 . oooooo 

1 .096139 

.482117 

1 .522478 

17 

- 1 . 300000 

0 

000000 

1 . 725056 

.438673 

. 026855 

0 oooooo 

- , 003937 

1 . 096033 

.480806 

1 .523930 

18 

- 1 . 300000 

0 

. ooocoo 

1.725! 52 

.440157 

.074175 

0 . oooooo 

- .010874 

1 .095331 

.482117 

1 . 520906 

19 

- 1 . 300000 

0 

. 000000 

1 725392 

, 440526 

. 1 76550 

0 , oooooo 

- . 025879 

1 .091436 

. 480806 

1 .514989 

20 

- 1 . 300000 

0 

000000 

1 725995 

445138 

284324 

0 . oooooo 

- .04 1661 

1 083072 

.4821 17 

1 .497130 

21 

- 1 . 300000 

0 

oooooo 

1 .727509 

447454 

.357969 

0 oooooo 

- , 052406 

1 074554 

.480813 

1 . 482276 

22 

- 1 , 300000 

0 

000000 

1 .731313 

452228 

4I8I31 

0 oooooo 

- 061037 

1 .066130 

.482134 

1 464426 

23 

- 1 . 300000 

0 

oooooo 

1 .740867 

.455677 

.482835 

0 . oooooo 

- . 070078 

1 . 055328 

. 480889 

I 445189 

24 

- 1 . 300000 

0 

oooooo 

1 , 764865 

. 465380 

. 5804 1 4 

0 . oooooo 

- . 082785 

1 . 036405 

. 482322 

1 . 407363 

25 

- 1 . 300000 

0 

oooooo 

1 .825148 

,479691 

. 705366 

0 . ooocoo 

- . 036328 

1 .004107 

.481662 

1 . 347086 

26 

-1 .300000 

0 

oooooo 

1 .976570 

.496847 

.801324 

0 . oooooo 

- . 100735 

.975587 

.484767 

1 .290688 

27 

- 1 , 300000 

0 

oooooo 

2 356926 

,507727 

.836319 

0 oocooo 

- , 090029 

.963727 

.489310 

1 .263868 

28 

- 1 . 300000 

0 

ooocoo 

3.312336 

510204 

. 791960 

0 . 0.00000 

- . 060442 

.980000 

.500000 

! .28271,0 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

-1 066667 

0 

oooooo 

0 oooooo 

969692 

.569843 

0 . oooooo 

0 . oooooo 

.933631 

. 905335 

945196 

2 

- 1 . 066667 

0 

oooooo 

493246 

. 952606 

. 647638 

0 oooooo 

- . 05S203 

.938279 

.903193 

. 952693 

3 

- 1 . 066667 

0 

. oooooo 

. 784450 

.941348 

.481024 

0 oooooo 

- .087962 

. 952223 

. 896373 

. 975526 

4 

- 1 . 066667 

0 

oooooo 

.956372 

. 929925 

.425466 

0 . oooooo 

- . 1 05682 

.961323 

. 893959 

. 9B9669 

5 

- 1 . 066667 

0 

. oooooo 

1 .057872 

.926842 

.390631 

0.000000 

-.11855! 

.966190 

. °95506 

.996002 

6 

- 1 . 065667 

0 

. oooooo 

1 . 1 17796 

. 925077 

.365404 . 

0 . oooooo 

- . 1 26422 

.968838 

.806250 

. 999494 

7 

- 1 . 066657 

0 

oooooo 

1 . 153174 

.924479 

. 352699 

0.000000 

- , 1 3064 1 

.970858 

. 897538 

1 .001837 

8 

-1,066667 

0 

ooocoo 

1 . 174061 

923199 

.340729 

0 oooooo 

- . 132314 

.972364 

.897685 

1 .003947 

9 

- 1 . 066657 

0 

oooooo 

1 . 186392 

.922521 

. 330269 

0.000000 

1 31939 

.973887 

,893432 

1 .005815 

10 

-1.066667 

0 

oooooo 

1 . 193672 

920623 

.317313 

0.000000 

- . 128917 

. 975722 

.898277 

1 .008538 

1 1 

-1 .066667 

0 

oooooo 

1 197970 ■ 

9 1 896 1 

300112 

0 . oooooo 

- . 123066 

.978083 

898820 

1 01 171 1 
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0 IllliinilU 

= ,1 OLMJf) 1 

‘jH4nii 

. d'J'JU 1 4 

1 o,'lu-J4 

14 

- 1 . 06666/ 

0 

UOjOOOO 

1 2O2U90 

9u7o03 

. 1 00655 

0 . oooooo 

- .074886 

. 990 1 73 

: 898684 

1 .029326 

15 

-1 .066667 

0 

oooooo 

1 , 2034 12 

. 902368 

0.000000 

0,000000 

0 . OOOOOO 

.996390 

8991 n 

1 .038188 

16 

-1 066667 

0 

oooooo 

1 689730 

440422 

0 OOOOOO 

0 oooooo 

0 . OOOOOO 

1 096264 

482818 

1 521836 

17 

-1 066CC7 

0 

oooooo 

1 689769 

439,192 

02C'.)69 

0 oooooo 

- .004222 

1 ,096157 

.461643 

1 523112 

18 

-1.06666? 

0 

oooooo 

1 689866 

,440750 

074484 

0.000000 

-.01 1660 

1 095446 

.482818 

1 .520246 

19 

-1 .066667 

0 

oooooo 

1 ,690112 

. 44 1 254 

. 176700 

0.000000 

-.027658 . 

1 .091532 

.481643 

! .514122 

20 

- 1 . 066667 

0 

oooooo 

1 . 690728 

.445707 

. 282930 

0 . oooooo 

- .044266 

1 . 083264 

.482818 

1 .49663! 

21 

- 1 . 066667 

0 

oooooo 

I 692276 

. 448096 

. 355583 

0 . oocooo 

-.055574 

1 .0/-.378 

.481649 

1 .481872 

22 

- 1 . 066667 

0 

oooooo 

1 .696164 

.452717 

.415384 

0.000000 

- . 064709 

1 . 066523 

. 482833 

1 . 464332 

23 

- I . 066667 

0 

oooooo 

1 . 705930 

. 456252 

. 479820 

0 . oooooo 

- . 074232 

1 055815 

.481718 

1 .445127 

24 

- 1 . 066667 

0 

oooooo 

1 . 730463 

. 465848 

.577836 

0 . oooooo 

- . 087674 

1 .036821 

.483001 

1.407362 

25 

- 1 . 066667 

0 

oooooo 

1 . 792085 

.480427 

. 704399 

0 . oooooo 

- . 1 02668 

1 .004186 

. 482438 

1 . 346367 

26 

- 1 . 066667 

0 

oooooo 

1 946874 

.497793 

. 802806 

0 . oocooo 

-.107168 

. 974859 

. 485278 

1 .288612 

27 

- 1 . 066667 

0 

oooooo 

2 335685 

.508819 

. 838553 

0 . oooooo 

- .094886 

.96281 1 

. 489897 

1 .261583 

28 

- 1 . 066667 

0 

oooooo 

3 312336 

.510204 

.731960 

0.000000 

-.063119 

.980000 

,. 500000 

1 .282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- . 800000 

0 

. oooooo 

0 OOOOOO 

, 955090 

. 652324 

0 . oooooo 

0 . OOOOOO 

.914363 

.873299 

.931325 

2 

- . 800000 

0 

oooooo 

.454948 

.944961 

.6321 10 

0 . oooooo 

-.048237 

.919217 

.868624 

.940270 

3 

-.800000 

0 

oooooo 

. 723542 

.914576 

. 57 1 469 

0 . oooooo 

-.076575 

.933778 

.85401 1 

.967734 

4 

- . 800000 

0 

oooooo 

.8821 15 

. 89804 1 

. 524972 

0 . oooooo 

-.096576 ■ 

.943577 

.84737! 

.985051 

5 

- . 800000 

0 

oooooo 

.975734 

.890817 

. 499700 

0 . oooooo 

- . 1 10948 

, 948000 

.844495 

.992871 

6 

- . 800000 

0 

oooooo 

1 .031005 

.886691 

.484769 

0.000000 

-. 120316 

.950162 

.842501 

.996985 

7 

-.800000 

0 

oooooo 

I 063636 

.884275 

.474195 

0.000000 

-.125861 

.951826 

.841676 

.999822 

8 

-.800000 

0 

oooooo 

1 .08290! 

. 88 1 769 

. 463860 

0 oooooo 

- . 128133 

.953601 

. 840856 

1 ,002824 

9 

-.800000 

0 

oooooo 

I ,094275 

.87931 1 

.450574 

0 . oooooo 

-. 127513 

.956! 1 1 

.840719 

1 .006587 

10 

- . 800000 

0 

oooooo 

1 . 1 00990 

.875916 

.432331 

0 . oooooo 

-. 12414! 

. 959396 

.840350 

1 .011610 

1 1 

- . 800000 

0 

oooooo 

1 , 104954 

872443 

.409104 

0 . oooooo 

-.11 8469 

. 963372 

,840487 

1 .017417 

12 

- . 800000 

0 

oooooo 

1 . 107295 

. 867807 

.377783 

0 . oooooo 

-.109783 

.968316 

.840312 

1 .024821 

13 

- . 800000 

0 

oooooo 

1 . 1 08676 

. 862369 

332397 

0 . oooooo 

- . 096749 

.974667 

.840523 

1 .034140 

14 

- . 800000 

0 

oooooo 

1 . 109492 

.853849 

. 246499 

0.000000 

-.071 782 

.984215 

.840371 

1 .048425 

15 

- . 800000 

0 

oooooo 

1 109974 

.844739 

0.000000 

0 . oooooo 

0.000000 

.995079 

.840582 

1 .064555 

16 

- . 800000 

0 

oooooo 

.1 .646740 

441015 

0 OOOOOO 

0 . oooooo 

0.000000 

1 ,096422 

. 483539 

1 .521235 

17 

- . 800000 

0 

oooooo 

1 646780 

: 440205 

.026939 

0 oooooo 

-.004487 

1 .096314 

482604 

1 522204 



18 

-.800000 

0 

000000 

1.646830 

.441344 

.074393 

0.000000 

-.012390 

1 .095604 

.483538 

1 .519646 

19 

-.800000 

0 

000000 

1.647132 

442058 

. 1 7584 1 

0,000000 

-.029233 

1 .091721 

.482604 

1 .513283 

20 

-.800000 

0 

000000 

1 647765 

.446210 

279928 

0.000000 

- , 046602 

1 . 083656 

.483538 

1 . 496496 

21 

-.800000 

0 

000000 

1 649354 

. 44S720 

.351072 

0 . 000000 

- . 05S399 

1 .075522 

. 482609 

1 .481935 

22 

-.800000 

0 

000000 

1 653345 

.453037 

410121 

0.000000 

-.068055 

1 .067354 

.483551 

1 . 465059 

23 

-.800000 

0 

000000 

1 .663370 

456691 

. 473396 

0.000000 

-.078277 

1 . 056892 

.482673 

1 .446044 

24 

-.800000 

0 

000000 

1 . 688552 

.466198 

.573955 

0.000000 

-.093315 

1 .037583 

.483720 

1 . 407974 

25 

-.800000 

0 

000000 

I .751607 

.481458 

. 703807 

0.000000 

-.109257 

1 .004134 

.483448 

1 .345142 

26 

-.800000 

0 

000000 

1 910697 

.499100 

.804725 

0 . 000000 

-.11 3845 

. 973924 

.486086 

I .286026 

27 

-.800000 

0 

000000 

2 309810 

510252 

.840973 

0 000000 

- . 099653 

.961876 

. 490799 

1 .253941 

28 

- . 800000 

0 

000000 

3 312336 

.510204 

.791960 

0 . 000000 

- . 065626 

.980000 

.500000 

1 .282710 

L 

X 


Y 

z 

R/RREF 

U/AREf^ 

V/AREF . 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

- 533333 

0 

000000 

0 000000 

919410 

. 737747 

0.000000 

0 . 000000 

.890950 

.819148 

.921403 

2 

■ -.533333 

0 

000000 

429559 

.907164 

.■’20649 

0.000000 

- . 033824 

.895551 

.812412 

.931 142 

3 

-.533333 

0 

.000000 

683164 

. 870426 

. 669355 

0.000000 

- . 056970 

.909354 

.791526 

.961259 

4 

-.533333 

0 

000000 

832883 

848253 

.632515 

0.000000 

-.075392 

.919166 

. 780605 

.981248 

5 

-.533333 

0 

.000000 

921283 

838336 

.615383 

0 . oocooo 

- .088045 

923016 

. 773797 

.99047! 

6 

-.533333 

0 

000000 

973470 

832341 

606658 

0 000000 

- .096433 

. 924535 

. 769528 

.994954 

7 

-.533333 

0 

ooocoo 

1 004280 

. 828634 

.601057 

0 . 000000 

-.101615 

. 925594 

. 766979 

.997874 

8 

- 533333 

0 

000000 

1 022470 

825751 

594757 

0 . 000000 

-.104332 

.926942 

.765423 

1 .000721 

9 

-.533333 

0 

. 000000 

1 033203 

823177 

.586927 

0 . oocooo 

-.105300 

.928796 

. 764564 

1 .003975 

10 

- . 533333 

0 

ocoooo 

•1 03S549 

.819499 

.572290 

0 . ocoooo 

-.104168 

.932355 

. 764064 

1 .009629 

1 1 

-.533333 

0 

000000 

1 . 043292 

810297 

.527108 

0 . 000000 

- . 096566 

.942701 

. 763868 

1 .025454 

12 

-.533333 

0 

000000 

I 045502 

.798187 

. 452236 

0 , 000000 

- .082971 

.956887 

.763776 

1 .047174 

13 

- .533333 

0 

000000 

1 . 046806 

.788102 

. 372768 

0 000000 

-.068418 

969129 

. 763772 

1 . 065979 

14 

- 533333 

0 

000000 

1 047577 

777986 

263553 

0 000000 

- 048357 

.981717 

. 763762 

1 .085420 

15 

-.533333 

0 

000000 

1 048031 

.768881 

0.000000 

0 OUOOOO 

0 . 0000* '• 

.993387 

. 763796 

1 . 103506 

16 

-.533333 

0 

000000 

I 600900 

441979 

0,000000 

0 , 000000 

O.OOOOOO 

1 .096261 

. 484525 

1 .519685 

17 

-.533333 

0 

000000 

1 60094 1 

.441694 

. 028042 

0.000000 

-.004971 

I .096145 

.484161 

I .519915 

18 

-.533333 

0 

000000 

1 601044 

. 442338 

,077413 

0 000000 

-.013723 

1 .095371 

.484524 

1 .517956 

19 

-.533333 

0 

ooocoo 

1 O01303 

. 443683 

. 181384 

0.000000 

-.032151 

1 .091230 

.484161 

1 .510382 

20 

-.533333 

0 

000000 

1 601953 

.447414 

.284873 

0.000000 

- ,050486 

1 .082944 

. 484524 

1 . 493902 

2! 

-.533333 

0 

ooocoo 

I . 603586 

450519 

,355815 

0.000000 

- ,063019 

1.074680 

.484164 

1.478406 

22 

- .533333 

0 

000000 

1 607687 

454565 

.417361 

0 . 000000 

- 073797 

1 06593t 

. 484536 

1 461138 

23 

- . 533333 

0 

000000 

1 ,617988 

. 458708 

.479517 

0 . 000000 

- .084504 

1 ,055618 

.484221 

1.441757 

24 

-.533333 

0 

000000 

1 643863 

.467116 

.571270 

0 . 000000 

- . 099492 

1 .037651 

. 484703 

1 . 406959 

25 

-.533333 

0 

OOGOOO 

1 708859 

.482685 

. 700877 

0,000000 

-.1 16015 

1 . 004695 

.484952 

1.344523 

26 

- .533333 

0 000000 

1 872122 

. 500566 

. 805797 

0 000000 

-.120259 

.973079 

. 487090 

1 .28340.4 

27 

-.533333 

0 

000000 

2 282219 

.51 1916 

,843287 

0 . 000000 

- . 104043 

.960947 

.491924 

1.256088 

28 

- . 533333 

0 

000000 

3 312336 

.510204 

791960 

0 . 000000 

- 067692 

980000 

.500000 

1 .282710 

L 

X 


r 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

- . 266667 

0 

, 000000 

0 000000 

.871475 

.817290 

0 . 000000 

0 . 000000 

.865933 

.755515 

.915980 

2 

- . 266667 

0 

,000000 

414821 

. 858773 

.802821 

0.000000 

-.018126 

.871239 

.748196 

.925947 

3 

-.266667 

0 

000000 

659725 

.820666 

.759412 

0 . 000000 

- . 032892 

.884142 

.725585 

.956875 

4 

- . 266667 

0 

000000 

804312 

. 797099 

. 729605 

0.000000 

- . 045089 

.893809 

.712454 

.978679 

5 

- . 266667 

0 

000000 

889674 

.733816 

. 7 1 7956 

0 000000 

-.052739 

. 897073 

.703140 

.988876 

6 

- . 266667 

0 

000000 

940070 

. 776868 

.713234 

0 000000 

- . 057584 

.898070 

.697682 

.993508 

7 

- . 266667 

0 

000000 

.969823 

772187 

.710465 

0 . 000000 

- 060655 

.898613 

.693898 

.996515 

3 

- . 266667 

0 

000000 

.987389 

.768989 

. 705787 

0.000000 

-.062113 

.899894 

.692008 

.999593 

9 

-.266667 

0 

cooooo 

997759 

. 765548 

.698639 

0.000000 

-. 062899 

.901967 

.690499 

I .003695 

10 

-.266667 

0 

000000 

I . 003882 

. 758030 

.669952 

0 . 000000 

- . 060755 

.910298 

.690033 

1 .016972 

1 I 

-.266667 

0 

ocoooo 

1 007497 

.742712 

.596578 

0 . 000000 

- . 053934 

. 928305 

.689463 

1 .045593 

12 

- . 266667 

0 

000000 

I .009631 

728965 

.510164 

0.000000 

- 045992 

. 945949 

. 689563 

1 .073458 

13 

- . 266667 

0 

000000 

1 010891 

.718616 

. 432436 

0.000000 

- . 038944 

.959180 

.689282 

1 .094715 

14 

- . 266667 

0 

000000 

1 ,01 1634 

707930 

.321515 

0:000000 

- .028944 

.973971 

.689503 

1 . 1 18278 

15 

-.266667 

0 

000000 

1 .012073 

.695614 

0.000000 

0.000000 

0.000000 

.990891 

.689277 

1 . 145721 

16 

-.266667 

0.000000 

1 552194 

. 443934 

0.000000 

0.000000 

0 . 000000 

1 .096334 

.486701 

1 .517105 

17 

- . 266667 

0 

000000 

1 .552236 

. 443852 

.028678 

0.000000 

-.005430 

1 .096210 

.486556 

1 .517045 

18 

-.266667 

0 

000000 

1 552342 

.444318 

.079695 

0.000000 

-.014985 

1.095387 

.486700 

1 .515269 

19 

-.266667 

0 ocoooo 

1 552508 

. 445948 

. 185179 

0.000000 

-.034816 

1 .091059 

.486555 

1 .507074 

20 

-.266667 

0. 

000000 

1 553277 

.449518 

.287318 

0.000000 

-.054004 

1 .082713 

. 485700 

I .490783 

21 

-.266667 

0.000000 

1 554956 

. 452844 

.357517 

0.000000 

-.067135 

1 .074448 

.486557 

1 .475048 

22 

-.266667 

0 

000000 

1.559174 

. 456730 

.418968 

0.000000 

- . 078484 

1 .065642 

.48671 1 

1 .457966 



23 

-.266667 

0. 

000000 

I .569768 

461075 

480402 

0.000000 

- .089447 

I .055381 

.486610 

1 . 438470 

24 

- . 266667 

0 

000000 

1 596380 

468937 

567796 

0 . OOOOOO 

- . 104087 

1 . 038220 

. 486860 

1 .405541 

25 

- . 266667 

0 

000000 

1 663226 

434408 

.696867 

0.000000 

- 121468 

1 . 005666 

.487153 

I . 343906 

26 

- 266667 

0 

000000 

1 331134 

. 502602 

.806195 

0.000000 

-. 125728 

,972687 

.483875 

1 .280805 

27 

-.266667 

0 

000000 

2.252902 

.513947 

.845252 

0.000000 

-. 107440 

.960220 

,493503 

I. 253151 

28 

- . 266667 

0 

000000 

3.312336 

.510204 

.791960 

0.000000. 

-.069175 

.930000 

.500000 

I. 282710 

L 

X 


Y 

1 

R/RPEF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

0 000000 

0 

000000 

0 OOOQOO 

818919 

883451 

0.000000 

0 . oooooo 

. 844824 

.691842 

.915103 

2 

0 000000 

0 

000000 

409873 

808167 

869103 

0 oooooo 

- 003048 

. 849277 

. 686358 

924803 

3 

0 000000 

0 

000000 

651855 

775914 

826060 

0 oooooo 

- 008881 

.862638 

669333 

954780 

4 

0 000000 

0 

cooooo 

794717 

765287 

794317 

0 oooooo 

- .013950 

.873759 

. 659939 

. 977567 

5 

0 . 000000 

0 

000000 

. 879060 

743504 

780637 

0.000000 

- 016136 

877944 

.652755 

983447 

6 

0 OOOQOO 

0 

ooooco 

.928855 

737341 

774841 

0 , oooooo 

-.017343 

.879441 

.648888 

.993165 

7 

0.000000 

0 

. OOOGOO 

. 953254 

. 733997 

,771690 

0 . oooooo 

-.018098 

.880060 

.645961 

. 995943 

8 

0 . 000000 

0 

000000 

.975610 

' 731944 

769194 

0 . oooooo 

-.018442 

. 880800 

. 644696 

.997898 

9 

0 . 000000 

0 

000000 

985S57 

727612 

.758412 

0 oooooo 

-.018530 

884384 

.643488 

I .004340 

10 

0.000000 

0 

. 000000 

991906 

712662 

696678 

0 . oooooo 

-.016418 

.902614 

.643259 

1 .033590 

1 1 

0 . 000000 

0 

000000 

995478 

6941 15 

.599440 

0.000000 

- 013629 

925975 

. 642733 

1 .071585 

12 

0 . 000000 

0 

. 000000 

997586 

.681374 

.511515 

0 oooooo 

-.011382 

. 943550 

.642911 

1 . 100046 

13 

0.000000 

0 

000000 

893331 

.671703 

.433578 

0 . oooooo 

- 009608 

.956642 

.642580 

1 . 121705 

14 

0 . 000000 

0 

000000 

999566 

661526 

.318191 

0 . oooooo 

- . 006984 

971766 

. 642848 

1 .146418 

15 

0 000000 

0 

000000 

1 OOOOOO 

. 650342 

0 . OOOOOO 

0 . oooooo 

0 OOOOOO 

.988031 

.642558 

1 . 1 73583 

16 

0.000000 

0 

000000 

1 . 500609 

. 446364 

0 OOOOOO 

0 . oooooo 

0 . COOOOO 

1 096303 

.489350 

1 513753 

17 

0 . 000000 

0 

OOQOOO 

1 .500652 

446683 

.029143 

0 . oooooo 

- . 005806 

1 .096176 

. 489644 

I .513144 

18 

0.000000 

0 

000000 

1 500761 

. 446759 

. 0804 1 3 

0 oooooo 

-.016019 

1 095333 

. 489350 

I 511879 

19 

0 000000 

0 

000000 

1 501035 

.448814 

.185710 

0 . oooooo 

- . 036989 

1 .090971 

. 489643 

1 .503096 

20 

0.000000 

0 

000000 

1 501723 

.451948 

.285732 

0.000000 

-.056887 

1 .082755 

. 489349 

1.487630 

21 

0.000000 

0 

cooooo 

1 .503452 

,455621 

.354745 

0 oooooo 

- , 070530 

1 .074672 

. 489643 

1 471751 

22 

0 000000 

0 

000000 

1 507793 

.459073 

.415550 

0 , oooooo 

-.082352 

1 . 065958 

. 489358 

1 .455410 

23 

0 000000 

0 

000000 

1 51 8698 

463768 

,476571 

0 oooooo 

- .093644 

1 .055881 

. 489684 

1 . 435803 

24 

0 000000 

0 

000000 

1 546089 

.471072 

.561729 

0 , oooooo 

- . 1 08252 

1 .039114 

.489497 

1,4041 98 

25 

0.000000 

0 

000000 

1 .614894 

. 486730 

.691272 

0 . oooooo 

- . 126166 

1 . 006968 

.490121 

1 . 343076 

26 

0 . 000000 

0 

, 000000 

1 . 787724 

. 505092 

. 805036 

0 , oooooo 

-. 130682 

.972460 

,491182 

1 .277979 

27 

0 . 000000 

0 

000000 

2.221853 

.516441 

.846736 

0 , oooooo 

-.11 0288 

,'9596.18 

,495586 

1 .249943 

28 

0 , 000000 

0 

, 000000 

3.312336 

.510204 

.791960 

0.000000 

-.070055 

,980000 

.500000 

1 .282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

V/AREF 

T/TREF 

P/PREF 

ENT 

1 

. 283465 

0 

000000 

0 OOOOOO 

. 783903 

. 920696 

0.000000 

0 . COOOOO 

831006 

651428 

.916008 

2 

. 283465 

0 

000000 

409873 

776798 

. 904 1 75 

0 . oooooo 

0C4I27 

. 836384 

,649701 

. 925300 

3 

,283465 

0 

000000 

.651855 

. 755483 

,85461 1 

0 . oooooo 

.001348 

,852516 

.644061 

.953702 

4 

, 283465 

0 

000000 

.794717 

.741004 

.815392 

0 . oooooo 

- .001553 

. 866532 

.642104 

.976914 

5 

,283465 

0 

000000 

879060 

. 732933 

795710 

0 , oooooo 

-.001797 

.872918 

639791 

.988434 

6 

283465 

0 

000000 

. 928855 

. 729768 

. 786572 

0 , oooooo. 

- .002357 

. 875627 

.639005 

.993220 

7 

.283465 

0 

000000 

958254 

. 727650 

.781531 

0 , oooooo 

- . 002269 

.876891 

,638070 

.995811 

8 

,283465 

0 

oooooo 

.975610 

. 725633 

. 774964 

0 , oooooo 

- . 002660 

.879100 

.637904 

.999428 

9 

. 283465 

0 

ooooco 

. 985857 

.716253 

,740704 

0 . oooooo 

-.002016 

.889995 

.637461 

1 .017093 

10 

. 283465 

0 

cooooo 

991906 

697889 

.653344 

0.000000 

- . 000882 

.913516 

.637532 

1 .054877 

1 1 

. 283465 

0 

oooooo 

995473 

682470 

561957 

0.000000 

-.000314 

.933779 

.637276 

1.087955 

12 

. 283465 

0 

oooooo 

997586 

673759 

.497091 

0 . oooooo 

- . 000089 

.9461 1 1 

.637451 

1 . 108001 

13 

.283465 

0 

cooooo 

,996831 

665904 

431623 

0 . oooooo 

- . 000054 

.956950 

637237 

1 . 125964 

14 

283465 

0 

cooooo 

999566 

655363 

310494 

0 oooooo 

. 00000 1 

.972648 

,637437 

1 151763 

15 

283465 

0 

00'>000 

1 OOOOOO 

644833 

0 OOOOOO 

0 . oooooo 

0.000000 

. 988205 

. 637232 

1 . 177787 

16 

.283465 

0 

OOoOOO 

1 442593 

450297 

0 OOOOOO 

0 . oooooo 

0 OOOOOO 

1 .096553 

.493774 

1 .508795 

17 

.283465 

0 

oooooo 

I 442638 

450606 

.028763 

0 . oooooo 

- , 006056 

1 .096429 

. 494058 

1 .508209 

18 

. 283465 

0 

OOOOOO 

1.442751 

. 450686 

. 079386 

0 oooooo 

-.016712 

1 .095604 

.493774 

1 .506968 

19 

.283465 

0 

oooooo 

1 443033 

452697 

. 182673 

0.000000 

-.038448 

1 .091363 

. 494057 

1 . 498463 

20 

. 283465 

0 

oooooo 

1 443743 

455719 

279754 

0 oooooo 

- 058843 

1 .083501 

. 493772 

1 .483715 

21 

. 203465 

0 

oooooo 

1 445527 

459266 

.347019 

0.000000 

- . 072854 

1 .075749 

.494053 

1 .468538 

22 

. 283465 

0 

oooooo 

1 450007 

462629 

.407010 

0.000000 

- . 085093 

1 .067323 

.493774 

1 4r.''‘'90 

23 

. 283465 

0 

oooooo 

1 461 261 

467225 

.467-90 

0.000000 

-.096691 

1 .057478 

. 494080 

1 . 4; j8 

24 

. 283465 

0 

oooooo 

1 489530 

474338 

.552.31 

0 . ooooco 

-.111429 

1 041171 

. 493867 

1 .403094 

25 

. 283465 

0 

oooooo 

1 560538 

489890 

. 683240 

0,000000 

-. 129829 

1 .009125 

. 494360 

1 342473 

26 

.283465 

0, 

oooooo 

1 738902 

.508707 

.803244 

0.000000 

-.134183 

.97301 1 

.494978 

1.275060 

27 

. 283465 

0 

oooooo 

2 186933 

.519626 

.847814 

b. oooooo 

-.11 1520 

.959306 

498480 

1 .246467 



J* 18 K» 


J« 19 Ks 


J* 20 K= 


28 

.283465 

0 

000000 

3.312336 

.510204 

.791960 

0.000000 

-.070159 

.980000 

,500000 

1.282710 

L 

X 


Y 

z 

R/RREF 

U/AREF 

V/AREF 

U/AREF 

T/TREF 

P/PREF 

ENT 

I 

.569554 

0 

000000 

0 000000 

.773506 

, 929584 

0.000000 

0.000000 

.827518 

.640090 

.917048 

2 

. 569554 

0 

. 000000 

. 409873 

.768417 

.912394 

0.000000 

. 003785 

.833353 

.640362 

.925956 

3 

. 569554 

0 

.000000 

.651855 

.753148 

. 860527 

0.000000 

.000764 

.850858 

.640822 

.953026 

4 

.569554 

0 

. 000000 

.794717 

. 740869 

.817930 

0.000000 

-.001428 

.866022 

.641609 

.976410 

5 

.569554 

0 

000000 

.879060 

. 734023 

.795162 

0.000000 

-.00150! 

.873535 

.641195 

.988545 

6 

.569554 

0 

OOOQOO 

92SS55 

.731835 

. 784905 

0 000000 

-.001948 

.876701 

.641601 

.993313 

7 

.569554 

0 

000000 

. 958254 

. 730484 

.780167 

0.000000 

- 001914 

.877881 

.641278 

.995385 

3 

. 569554 

0 

000000 

975610 

. 727437 

.768142 

0.000000 

- .002143 

.882028 

,641620 

1 .001762 

9 

. 569554 

0 

. 000000 

985857 

.712754 

. 7095 1 4 

0 . 000000 

- .001 145 

.899764 

,641310 

1 . 030274 

10 

. 569554 

0 

000000 

.991906 

694271 

.611748 

0 000000 

- .000343 

.924161 

,641619 

1 .069390 

1 1 

. 569554 

0 

000000 

. 995478 

.681293 

.528913 

0.000000 

- .0001 14 

.941318 

,641313 

1 . 097496 

12 

. 569554 

0 

ooccoo 

. 997586 

. 674026 

.469958 

0 000000 

-.00005! 

.951922 

,641620 

I . 1 14630 

13 

. 569554 

0 

000000 

.998331 

656869 

.407651 

0 . 000000 

- 000022 

.961684 

.641317 

I . 130879 

14 

. 569554 

c 

. OQOOOO 

999566 

657534 

.291966 

0 . 000000 

. 000002 

.975798 

.641620 

1 . 153964 

15 

. 569554 

0 

000000 

1 000000 

648139 

0 000000 

■ 0 . 000000 

0 000000 

. 989474 

.641317 

1 . 1 76894 

16 

. 569554 

0 

000000 

1 330696 

455087 

0 000000 

0 . 000000 

0 000000 

1 .096789 

.499134 

1 . 502746 

17 

. 569554 

0 

000000 

1 380742 

.456212 

027376 

0 000000 

- . 006085 

1 .096676 

.500317 

1 .501107 

18 

. 569554 

0 

OGOOOO 

1 380858 

. 455446 

.075642 

0 . 000000 

-.016811 

1 . 095922 

.499133 

1 .501082 

19 

.569554 

0 

000000 

1 .381 150 

458146 

. 174355 

0 . occooo 

- . 038737 

1 . 092042 

.500315 

1 .492237 

20 

. 569554 

0 

ooocoo 

1 .381884 

.460127 

267537 

0 . 000000 

- . 059402 

1 .084767 

.499130 

1 . 479740 

21 

. 569554 

0 

000000 

1 . 383726 

464278 

.332479 

0 . 000000 

- 073632 

1 . 077604 

.500308 

1 . 464699 

22 

. 569554 

0 

000000 

1 388355 

466660 

.391248 

0 . 00.0000 

- 036186 

1 069569 

.499126 

1 .450803 

23 

. 569554 

0 

ooocoo 

1 399982 

471863 

.451012 

0 . 000000 

- 097933 

1 .060271 

.500303 

1 .431826 

24 

. 569554 

0 

000000 

1 429186 

.47808! 

.536052 

0 . 000000 

- . 1 1 3020 

1 .044091 

.49916! 

1 .402613 

25 

.569554 

0 

.000000 

1 . 502545 

.494331 

.670373 

0.000000 

-. 131322 

1 .012167 

.500345 

1 .341667 

26 

. 569554 

0 

. 000000 

1 .686814 

512922 

. 797922 

0.000000 

- . 1 36880 

. 973845 

. 499507 

1 .271947 

27 

.569554 

0 

000000 

2 149677 

523583 

.848163 

0 . 000000 

-.111809 

.959240 

.502242 

1 .242605 

28 

.569554 

0 

000000 

3 312336 

510204 

.791960 

0.000000 

- . 069267 

,980000 

.500000 

1.282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF . 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 


1 

,855643 

0 

000000 

0 000000 

770853 

.930627 

0 000000 

0 000000 ■ 

827297 

637724 

.918063 

2 

.855643 

0 

000000 

409873 

.765824 

914436 

0 000000 

003147 

. 832803 

.637781 

.926597 

3 

,855643 

0 

000000 

651855 

750737 

. 865862 

0 , 000000 

000626 

.849323 

.637618 

952527 

4 

,855643 

0 

000000 

794717 

737820 

.823490 

0 000000 

- , 000792 

. 864224 

.637642 

.975992 

5 

, 855643 

0 

000000 

679060 

. 730694 

. 799973 

0 . 000000 

-.001236 

.872020 

.637180 

.988626 

6 

.. 855643 

0 

000000 

928855 

. 728438 

790125 

0 . cooooo 

- .001437 

. 875085 

.637445 

.993330 

7 

, 855643 

0 

, 000000 

958254 

.726817 

.784575 

0.000000 

-001716 

. 876560 

.637098 

.99589! 

8 

.855643 

0 

000000 

.975610 

720678 

. 760894 

0 . 000000 

-.001423 

884459 

.637410 

1 .008281 

9 

, 855643 

0 

ooooco 

. 985S57 

703584 

. 687627 

0.000000 

- .000410 

,905481 

.637082 

1 .042205 

10 

.855643 

0 

000000 

991906 

687350 

.59916! 

0.000000 

.000032 

. 926628 

.637382 

1 .076237 

1 1 

855643 

0 

000000 

995478 

.677893 

.534980 

0.000000 

. 000069 

.939782 

.637072 

1 .097899 

12 

.855645 

0 

000000 

997586 

671243 

,481554 

0.000000 

.000023 

.949545 

.637375 

1.113689 

13 

.855643 

0 

000000 

99883! 

663615 

.416190 

0 , 000000 

.000011 

.960007 

637075 

1.131118 

14 

. 855643 

0 

000000 

999566 

653981 

, 299074 

0 . 000000 

-.000000 

. 974608 

.637375 

1 . 155058 

15 

. 855643 

0 

OGOOOO 

1 000000 

.644195 

0 . 000000 

0 000000 

0,000000 

. 988948 

.637075 

1 . 179144 

16 

. 355643 

0 

ocoooo 

1 315415 

. 462284 

0 000000 

0 000000 

0.000000 

1 .097386 

.507303 

1.494156 

17 

. 855643 

0 

, 000000 

I 315463 

. 463996 

0250 1 3 

0,000000 

- . 005856 

1 .097291 

.509139 

1.491819 

18 

. 855643 

0 

. 000000 

1.315583 

. 462590 

. 069228 

0 , 000000 

-.016207 

1 .096657 

.507302 

1 .492769 

19 

. 855643 

0 

cooooo 

1 315885 

. 465659 

. 160870 

0.000000 

- .037644 

1 . 093365 

.509135 

1 .484356 

20 

. 855643 

0 

000000 

1 316643 

466701 

. 249077 

0 , 000000 

-.058222 

1 .086985 

.507297 

1 .474376 

21 

. 855643 

0 

cooooo 

1 318543 

.471 1 13 

.31 1 101 

-0.000000 

-. .072495 

1 . 080677 

.5091'21 

1 .460312 

22 

.855643 

0 

000000 

1 323333 

.472598 

. 367673 

0 . 000000 

-.085089 ■ 

1.073396 

.507284 

1 .448650 

23 

855643 

0 

000000 

1 335353 

.478047 

. 427032 

0.000000 

- . 097034 

I .064894 

.509069 

1 .430599 

24 

.855643 

0 

000000 

1 . 365544 

. 483405 

.512162 

0 . 000000 

-.11 2047 

1 .049334 

.507253 

1.403425 

25 

.855643 

0 

000000 

I 441382 

, 499998 

. 654443 

0 . 000000 

-.131328 

1 .017372 

.508684 

1 .342432 

26 

. 855643 

0 

000000 

1 631879 

.519090 

.792416 

0.000000 

-.134717 

.976290 

.506783 

I .269059 

27 

.855643 

0 

000000 

2 1 10384 

528289 

.847207 

0.000000 

- . 109047 

.959780 

.507041 

1 .238862 

28 

. 855643 

0, 

000000 

3 312336 

510204 

.791960 

0.000000 

-.067273 

.980000 

.500000 

1 .282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

1 . 141732 

0 

000000 

0 000000 

. 764537 

.935429 

0.000000 

0,000000 

.825456 

.631092 

.919040 

2 

I . 141732 

0. 

000000 

409873 

.759514 

.920399 

0.000000 

.003510 

.830606 

.630857 

.927216 



J= 2\ K» 


J= 22 K= 




3 

1.141732 

0 

000000 

.651355 

.744443 

.875312 

0.000000 

.001541 

.846057 

.629341 

952067 

4 

1 . 141732 

0 

coocoo 

.794717 

.731539 

.833388 

0.000000 

.000087 

860830 

.629731 

.975490 

5 

1 . 141732 

0 

ocoooo 

879060 

.724337 

. 809400 

0 . OOOOOO 

-.000799 

.868886 

.629366 

.988522. 

6 

1 . 141732 

0 

000000 

.928855 

722022 

. 799896 

0 . OOOOOO 

-.001092 

.871906 

.629535 

.993229 

7 

1 . 141732 

0 

000000 

.958254 

.719806 

792267 

0 . OOOOOO 

- .001532 

.87426? 

. 629298 

.997133 

8 

1 . 141732 

0 

000000 

975610 

710768 

. 757687 

0. OOOOOO 

-.001042 

. 885674 

.629509 

1 .015273 

9 

1 .141732 

0 

000000 

.985857 

693285 

67842S 

0.000000 

-.000344 

. 907690 

.629288 

1 .050927 

10 

1 . 141732 

0 

000000 

991906 

.679241 

. 596775 

0 . OOOOOO 

-.000094 

. 926767 

.629499 

1 .081835 

11 

1 . 141732 

0 

cooooo 

. 995478 

670354 

.538131 

0 . OOOOOO 

-.000032 

.938740 

.629288 

1 . 101599 

12 

1 . 141732 

0 

000000 

. 997586 

.663861 

.486434 

0.000000 

-.000012 

.948236 

. 629497 

1 . 1 17083 

13 

1 . 141732 

0 

000000 

938831 

. 6{56305 

.420310 

0 . OOOOOO 

- ocooos 

. 958835 

.629288 

1 .134754 

14 

1.141732 

0 

000000 

. 999566 

646489 

. 302302 

0.000000 

. oooooo 

.973715 

. 629496 

1 . 159330 

15 

1 . 141732 

0 

OOOOQO 

1 . oooooo 

636653 

0.000000 

0 . oooooo 

0.000000 

.983433 

.629288 

1 . 184094 

16 

1 1 4 1 732 

0 

000000 

1 246724 

.471983 

0.000000 

0.000000 

0,000000 

1 . 096399 

.517482 

1 . 480465 

17 

1 .141732 

0 

000000 

1 246774 

. 473424 

.021246 

0 . oooooo 

-.005229 

1 . 096330 

.519029 

1 .478569 

18 

1 .141732 

0 

OOOCGO 

1 . 246893 

.472210 

.059055 

0 . oooooo 

- .014532 

I . 095868 

.517480 

1 .479463 

19 

1 . 141732 

0 

000000 

1 247211 

.47471 I 

. 1 39825 

0 . oooooo 

-.034382 

1 .093347 

5i9024 

I . 472944 

20 

1.141732 

0 

000000 

1 247995 

. 475557 

.222196 

0 . oooooo 

- .054537 

1 ,088136 

.517471 

I . 464880 

21 

1 . 141732 

0 

000000 

1 245965 

479231 

.279801 

0 . oooooo 

- .068381 

I . 082878 

.519003 

1 453260 

22 

1.141732 

0 

ocoooo 

1 .254915 

480562 

.334215 

0.000000 

-.080873 

1 .076720 

.517431 

1 443455 

23 

1.141732 

0 

000000 

1 267348 

485310 

, 39GS40 

0 . oooooo 

-.092334 

1 . 069238 

.518912 

1 .427798 

24 

1.141732 

0 

ocoooo 

i 29857S 

490342 

.478122 

0 . oooooo 

-. 107631 

1 .054823 

.517224 

1 . 402749 

25 

1.141732 

0 

000000 

1 377025 

5064 1 1 

.624141 

0 oooooo 

- 126916 

1 .023184 

.518152 

1 .343237 

26 

1.141732 

0 

000000 

1 574074 

525397 

779659 

0 oooooo 

- 1 34522 

978983 

.514355 

1 . 266426 

27 

1 . 141732 

0 

000000 

2 069039 

534 1 54 

. 846250 

0 . oooooo 

- 105071 

960328 

.512963 

1 .234107 

28 

1.141732 

0 

000000 

3 312336 

.510204 

.791960 

0 . oooooo 

- .064045 

. 980000 

.500000 

1 .282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

.T/TREF 

P/PREF 

ENT 

1 

1 . 427822 

0 

000000 

0 OOOOOO 

755136 

.944491 

0 . oooooo 

0.000000 

.822002 

.620723 

.919735 

2 

1 . 427822 

0 

000000 

. 409373 

. 750349 

■ 930I9fe 

0 . cooooo 

. 003946 

.826975 

. 620520 

.927656 

3 

1 . 427322 

0 

000000 

651855 

. 735990 

.887312 

0 , oooooo 

.002216 

,841892 

.619625 

.951717 

4 

1 .427822 

0 

oooooo 

794717 

.723347 

. 845956 

0,000000 

.000576 

.856617 

,619632 

.975097 

5 

1 , 427822 

0 

cooooo 

879050 

.716086 

.821903 

0.000000 

-.000457 

.864831 

.619293 

.988429 

6 

1 .427822 

0 

oooooo 

923355 

.713677 

.812444 

0 , oooooo 

-.00086! 

.867342 

.619430 

.993322 

7 

1 .427822 

0 

oooooo 

958254 

.710607 

.801676 

0 . oooooo 

- ,00127! 

.871396 

.619220 

,998996 

8 

1 427822 

0 

oooooo 

975610 

. 699739 

.757997 

0,000000 

-.000780 

.885170 

.619388 

1 .021062 

9 

1 .427822 

0 

oooooo 

.985857 

.682427 

.676163 

0,000000 

-.000285 

. 907355 

.613203 

1 .057194 

10 

1 .427822 

0 

oooooo 

991906 

668947 

597608 

0 , oooooo 

-.0001 00 

. 925900 

.619378 

1 .087445 

1 1 

1 .427822 

0 

oooooo 

995478 

660269 

. 540904 

0 oooooo 

-.000043 

. 937804 

619203 

1 . 107194 

12 

1 .427822 

0 

oooooo 

9975S6 

653710 

.489774 

0,000000 

-.000014 

.947478 

.619376 

1 . 123032 

13 

1 . 427822 

0 

oooooo 

598331 

646073 

423859 

0.000000 

-.000007 

. 958409 

,619202 

1 .141401 

14 

1 . 427822 

0 

00.0000 

.999566 

. 636090 

. 304972 

0.000000 

. 000002 

. 973724 

.619376 

1 . 165886 

1 5 

1 . 427822 

0 

oooooo 

1 . OOOOOO 

.626186 

0 OOOOOO 

0 . cooooo 

0 . OOOOOO 

. 988846 

.619202 

1 . 1 92470 

16 

1 427822 

0 

oooooo 

1 174596 

.481874 

0 . OOOOOO 

0.000000 

0,000000 

1 . 100683 

. 530390 

1 .473971 

17 

1 . 427822 

0 

oooooo 

1 174647 

487581 

.015249 

0.000000 

- ,003937 

1 . 100646 

.536654 

1 .466996 

18 

1 . 427822 

0 

oooooo 

1 174776 

482008 

.042598 

0 , oooooo 

- 010993 

1 . 100376 

. 530390 

1 473396 

19 

1 . 427822 

0 

oooooo 

1 1 75099 

4S8352 

. 104851 

0 . oooooo 

-.027020 

1 . 098837 

. 536649 

1 . 463739 

20 

1 . 427822 

0 000000 

1 17591 1 

484476 

. I 78864 

0 , oooooo 

- . 045898 

I .094763 

.530387 

1 . 462889 

21 

1 . 427822 

0 

oooooo 

1 1 77950 

. 492085 

. 23-(6S5 

0 , oooooo 

- . 059527 

1 .090510 

, 536623 

1 .448150 

22 

1 . 427822 

0 

oooooo 

1 183073 

. 489050 

.289035 

0 . oooooo 

-.072085 

1 ,084494 

.530372 

1 . 443730 

23 

1 .427822 

0 

oooooo 

I 1 95940 

497371 

.346421 

0 , oooooo 

-.082651 

1 .078603 

.536465 

1 426230 

24 

1 . 427822 

0 

cooooo 

1 228260 

. 498304 

.435888 

0.000000 

- . 096920 

I .064014 

.530202 

1 .405885 

25 

1 . 427822 

0 

oooooo 

1 309446 

.5181 18 

.601557 

0 . oooooo 

- . 1 12449 

I .032519 

. 534367 

1.3431 56 

26 

1 . 427822 

0 

cooooo 

1 513376 


.768443 

0 . oooooo 

-.119942 

. 983972 

.526522 

1 .263600 

27 

1 .427822 

0 

oooooo 

2 Dr5-'0‘= 

5/0306 

. 842660 

0 .oooooo 

-.096734 

. 962027 

.519789 

1 .23064! 

28 

1 . 427822 

0 

oooooo 

3 c 

5IC.V’4 

.791960 

0 . oooooo 

-.059379 

.980000 

.500000 

1 .282710 

L 

X 


Y 


/RRt' 

U/AREF 

V/AREF 

W/AREF 

T/TREF . 

P/PREF 

ENT 

1 

1 .71391 1 

0 

oooooo 

0 OCCvO' 

. ■■ - -3 

!-i5!95 

0.000000 

0.000000 

.817829 

.608207 

.920676 

2 

1.713911 

0 

oooooo 

4058/3 

7392 7 b 

9417:7 

0. oooooo 

.004172 

.822586 

.608078 

.928260 

3 

1 .713911 

0 

oooooo 

(-.'51955 

«•’> •' 

.301284 

0.000000 

.002891 

.836854 

.607436 

.951282 

4 

1 .71391 1 

0 

oooooo 

7947- ■ 

/Vjt- . 

So ! 00 I 

0.000000 

.001334 

.851322 

.607392 

.974414 

5 

1 .71391 1 

0 

oooooo 

. 8790C0 

7G8’ .1 

.836853 

0.000000 

.000176 

.859676 

.607062 

.388043 

6 

1 .71391 1 

0 

oooooo 

92SS55 

. 70 bo 10 

.827207 

0.000000 

-.000322 

,862938 

.607172 

.993223 

7 

1 .71391 1 

0 

oooooo 

.958254 

.699712 

.813606 

0.000000 

-.000741 

. 867474 

.606982 

1 .000666 


8 

1.713911 

0 

OOOOOO 

975610 

.686527 

.762861 

0.000000 

-.000190 

. 884349 

,607130 

I . 027924 

9 

1.71391 1 

0 

OOOOOO 

985857 

.667901 

.679355 

0.000000 

.000037 

908766 

. 605966 

1 .067990 

10 

1.713911 

0 

OOOOOO 

.991906 

.654471 

. 603069 

0 . OOOOOO 

000016 

,927652 

.607122 

1 . 099079 

n 

1 .713911 

0 

OOOOOO 

995478 

.646176 

.547460 

0 . OOOOOO 

. 000003 

.939321 

.606966 

1 . 1 18598 

12 

1 .713911 

0 

OOOOOO 

997586 

.639929 

.49631-6 

0 . OOOOOO 

-.000007 

.948729 

.6071 19 

1 . 134199 

13 

1 .713911 

0 

OOOOOO 

.998831 

.632676 

. 429539 

0 . OOOOOO 

-.000002 

. 959363 

.606966 

1 . 152154 

14 

1 .71391 1 

0 

OOOOOO 

. 999566 

.623212 

.308866 

0.000000 

-.00001 1 

. 974 1 76 

.607118 

1 . 177018 

15 

1 .713911 

0 

OOOOOO 

1 OOOOOO 

.614218 

0.000000 

0 . OOOOOO 

0.000000 

.988196 

.606968 

1 .200919 

16 

1 .71391 1 

0 

OOOOOO 

1 . 098997 

.183811 

0.000000 

0.000000 

0.000000 

1 . 10885! 

.536474 

I .482529 

17 

1 .71391 1 

0 

OOOOOO 

1 099050 

488564 

- . 000543 

0 . OOOOOO 

.000165 

1 . 108847 

. 54 1 742 

1 . 476737 

18 

1 .71391 1 

0 

OOOOOO 

1.093184 

. 483834 

- . 000749 

0 . OOOOOO 

.000234 

1 , 108792 

. 536472 

1 . 482420 

19 

1 .71391 1 

0 

OOOOOO 

1 0995 18 

.468701 

. 003882 

0.000000 

- .001 128 

1 . 108510 

. 54 1 729 

1 .476123 

20 

1 7I3S1 1 

0 

OOOOOO 

1 100359 

485033 

.036317 

0 OOOOOO 

- .010745 

1 . 106016 

. 536454 

I . 477246 

21 

1 71391 1 

0 

OOOOOO 

1 102470 

. 492098 

. 1 13048 

0 . OOOOOO 

- .033194 

1 , 100710 

.541657 

1.461680 

22 

1 .71391 1 

0 

OOOOOO 

1 . 107774 

490447 

. 1 79753 

C . OOOOOO 

-.051476 

1 .093714 

.536408 

I . 454344 

23 

1 .71391 1 

0 

OOOOOO 

1 121096 

. 497724 

.247542 

0 . OOOOOO 

-.066527 

1 .087788 

.541418 

1 . 437966 

24 

I .713911 

0 

OOOOOO 

1 154560 

. 498453 

.334317 

0.000000 

- . 080573 

1 .0761 19 

.536395 

1.421708 

25 

1 .71391 1 

0 

OOOOOO 

1 238617 

.516485 

.537674 

0.000000 

-. 108844 

1 .044725 

,539585 

1 . 360752 

26 

1 .71391 1 

0 

OOOOOO 

1 449758 

540987 

. 754290 

0.000000 

-.111620 

. 988088 

.534543 

1 .263342 

27 

1 .71391 1 

0 

OOOOOO 

1 980122 

648040 

. 842632 

0 . ooouoo 

-.086186 

.962351 

. 527407 

1 . 224077 

28 

1 .71391 1 

0 

OOOOOO 

3 312336 

510204 

791960 

0 . OOOOOO 

- . 053583 

.980000 

. 500000 

1 .282710 

L 

X 


Y 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

1 

2 . 000000 

0 

OOOOOO 

0 OOOOOO 

.730778 

.969129 

0.000000 

0 . OOOOOO 

.812359 

.593654 

.920946 

2 

2 . 000000 

0 

OOOOOO 

409373 

. 726387 

. 956346 

0 OOOOOO 

. 004260 

: 81 6973 

. 593439 

.928412 

3 

2 . 000000 

0 

OOOOOO 

.651855 

713214 

917998 

0 . OOOOOO 

. 003086 

.830816 

.592550 

,951080 

4 

2 . 000000 

0 

OOOOOO 

794717 

700668 

.879551 

0 . OOOOOO 

.001545 

. 844944 

.592025 

.974143 

5 

2.000000 

0 

OOOOOO 

. 879060 

.693440 

. 856040 

0.000000 

. 000228 

.853291 

.591706 

.987856 

6 

2,000000 

0 

OOOOOO 

. 928855 

690510 

. 846480 

0.000000 

-.000529 

.856661 

.591533 

.993439 

7 

2 ooonoo 

0 

OOOOOO 

950254 

685316 

. 828385 

0 OOOOOO 

- 000907 

.863035 

591452 

1 . 003857 

8 

2 000000 

0 

OOOOOO 

9756 1 0 

671487 

773278 

0 OOOOOO 

- 000073 

.880702 

591380 

1 . 032794 

9 

2 000000 

0 

OOOOOO 

985057 

650450 

697765 

0 OOOOOO 

- . 0000 1 4 

.898171 

.591400 

1 ,061573 

10 

2 000000 

0 

OOOOOO 

991906 

649430 

.623770 

0 , OOOOOO 

- . 000406 

.910593 

.591366 

1 .082210 

1 1 

2.000000 

0 

OOOOOO 

.995478 

.643479 

.565! 19 

0.000000 

- .000187 

.919042 

.591384 

1.096280 

12 

2.000000 

0 

OOOOOO 

. 397586 

638607 

.511027 

0.000000 

,000155 

.926026 

.591367 

1 . 107974 

13 

2.000000 

0 

OOOOOO 

.998831 

633524 

.443160 

0 . OOOOOO 

,000150 

,933449 

,591362 

1 . 120431 

14 

2.000000 

0 

OOOOOO 

999566 

.627361 

.319666 

0.000000 

. 000235 

.942626 

.591367 

1,135879 

15 

2 000000 

0 

OOOOOO 

1 OOOOOO 

627361 

0 OOOOOO 

0 , OOOOOO 

0 , OOOOOO 

. 942626 

.591367 

1 . 135879 

16 

2 000000 

0 

OOOOOO 

I 000525 

500482 

0.000000 

0,000000 

0.000000 

1 .121598 

.561340 

1 . 479387 

17 

2,000000 

0 

OOOOOO 

I . 000580 

. 500482 

- .006750 

0 , OOOOOO 

,003278 

I . 121598 

.561340 

1 . 479387 

18 

2 000000 

0 

OOOOOO 

! 000719 

500469 

- 017695 

0 OOOOOO 

,00292! 

1 121372 

.561212 

1 .479105 

19 

2 OOOOOO 

0 

OOOOOO 

1 001069 

50 1 390 

- 037440 

0 , OOOOOO 

. 006239 

1 . 1 19661 

,56138$ 

1.475762 

20 

2 OOOOOO 

0 

OOOOOO 

1 001947 

503352 

- 02.3644 

0 OOOOOO 

0C3135 

I . 114830 

,561152 

1.467102 

21 

2 . OOOOOO 

0 

OOOOOO 

1 004152 

506334 

034395 

,0 , OOOOOO 

- .005916 

1 , 108637 

.56134! 

1 . 455508 

22 

2 , OOOOOO 

0 

OOOOOO 

1 009692 

. 508236 

.089146 

0 . OOOOOO 

- .01878! 

1 . 103587 

560883 

1 . 446707 

23 

2 . OOOOOO 

0 

OOOOOO 

1 . 023607 

.51 1231 

; 161554 

0 . OOOOOO 

-.031200 

1 .097231 

.560938 

1 . 434998 

24 

2,000000 

0 

OOOOOO 

I 058559 

.514482 

.257418 

0 , OOOOOO 

- . 049505 

1 .087529 

.559514 

1 .418707 

25 

2 . OOOOOO 

0 

OOOOOO 

1 146356 

526941 

.469537 

0 , OOOOOO 

-.081862 

1 .057750 

.557372 

1 .366716 

26 

2 OOOOOO 

0 

OOOOOO 

1 366891 

5506 1 4 

725260 

0 OOOOOO 

- , 100063 

. 995580 

.548181 

1 . 263972 

27 

2 OOOOOO 

0 

OOOOOO 

1 920851 

555972 

840347 

0.000000 

- .072849 

. 963530 

,535696 

1 ,218553 

28 

2 . OOOOOO 

0 

OOOOOO 

3 312336 

.510204 

.791960 

0.000000 

-.046231 

. 980000 

.500000 

1 .282710 

L 

X 


r 

Z 

R/RREF 

U/AREF 

V/AREF 

W/AREF 

T/TRCF 

P/PREF 

ENT 

1 

2 283465 

0 

OOOOOO 

0 OOOOOO 

. 712804 

9II9325 

0 OOOOOO 

0 OOOOOO 

, 804659 

.573564 

921348 

2 

2 28J465 

0 

OOOOOO 

409873 

708351 

977557 

0 . OOOOOO 

005272 

809010 

.573063 

.928655 

3 

2 , 283465 

0 

OOOOOO 

651855 

.694993 

. 942254 

0 . OOOOOO 

.005345 

,822062 

.571327 

.950851 

4 

2.283465 

0 

OOOOOO 

794717 

.682379 

. 905782 

0 . OOOOOO 

.004004 

.835726 

.570282 

.973764 

5 

2 283465 

0 

OOOOOO 

879060 

675035 

883367 

0.000000 

003096 

.843990 

.569723 

.987659 

6 

2 2034G5 

0 

OOOOOO 

9?8655 

671752 

873069 

0 OOOOOO 

002361 

.047424 

,569253 

,993613 

7 

2 2UJ465 

0 

OOOOOO 

953254 

666785 

856937 

0 . OOOOOO 

.002158 

.853507 

.569106 

1,003721 

8 

2 . 283465 

0 

OOOOOO 

,975610 

.652831 

. 800268 

0.000000 

.001809 

.871420 

.568890 

1.033492 

9 

2 283465 

0 

OOOOOO 

985857 

.630578 

697524 

0 OOOOOO 

002202 

. 902206 

.568911 

1 ,084951 

10 

2 283465 

0 

OOOOOO 

991906 

607676 

.5981 12 

0 OOOOOO 

002639 

936005 

,568788 

1 . 142377 

1 1 

2 283465 

0 

OOOOOO 

995478 

589463 

.521333 

0.000000 

,00298! 

.965054 

,568864 

1 . 192255 

12 

2.283465 

0 

OOOOOO 

997586 

.576166 

.466122 

0.000000 

.003139 

.987142 

.568757 

1 .230724 



13 

2.283465 

0 . 000000 

.998831 

. 567530 

.429515 

0.000000 

.003186 

I .002315 

.568844 

1 .257213 

14 

2.283465 

0 . 000000 

. 999566 

.561953 

. 40675 1 

0,000000 

.003092 

1 .012044 

.558721 

1 .274440 

15 

2 . 283465 

0 . 000000 

1 . 000000 

. 553037 

. 390264 

0.000000 

. 002922 

I .019296 

. 568805 

1 .287168 

16 

2.283465 

0 . 000000 

1 000525 

. 554994 

. 379267 

0.000000 

.002331 

1.024311 

. 568485 

1 ,296332 

17 

2.283465 

0 . 000000 

1 .000580 

.554653 

. 375320 

0.000000 

.002429 

1 .026259 

.569217 

I .299117 

18 

2 . 283465 

0 000000 

1 000719 

.552496 

.371561 

0.000000 

.002165 

1 ,0281 14 

. 568028 

1 . 303496 

19 

2 . 283465 

0 000000 

1 001069 

551416 

.362213 

0.000000 

.001996 

I .032742 

.569470 

1 .310388 

20 

2.283465 

0 000000 

1 001947 

543944 

.339521. 

: 0 . 000000 

.001029 

1 . 044085 

, 567924 

1 332030 

21 

2.283465 

0 000000 

1 .004152 

532070 

.283032 

0 000000 

-.000757 

1 . 070389 

. 569522 

1 . 377698 

22 

2.283465 

0 000000 

1 009692 

. 5266 1 2 

.279714 

0.000000 

- . 004860 

I .076471 

. 566383 

I .391253 

23 

2 . 283465 

0 . 000000 

1 023607 

,526136 

. 280073 

0 . 000000 

- .01187! 

I ,080233 

. 568376 

I . 396685 

24 

2 . 283465 

0 . 000000 

1 053559 

.525277 

.344393 

0 , 000000 

- . 026024 

1 .080377 

. 567497 

I .397718 

25 

2.283465 

0 . 000000 

I 146356 

.537736 

.516586 

0.000000 

-.046510 

1 . 052788 

.566122 

1 349314 

26 

2.283465 

0 000000 

1 36689 1 

. 556852 

. 729568 

0.000000 

-.069185 

. 997595 

.555513 

1 .260835 

27 

2.283465 

0 000000 

1 920851 

.557697 

.837805 

0 . 000000 

- . 053999 

. 965 1 67 

.538271 

1 .2191 1 1 

28 

2.283465 

0.000000 

3 312336 

.510204 

.791960 

0.000000 

-.037644 

. 980000 

.500000 

1 .282710 

L 

X 

Y 

Z 

R/RREr 

U/AREF 

V/AREF 

W/AREF 

T/TREF 

P/PREF 

ENT 

I 

2 624C72 

0 000000 

0 000000 

690313 

1 013853 

0 000000 

0 OOOOOO 

. 794794 

540656 

.921799 

2 

2.624C72 

0 000000 

409873 

,686:342 

1 .002406 

0 000000 

006827 

. 799073 

.548437 

. 928902 

3 

2.624672 

0 . 000000 

651855 

,674431 

. 968303 

0 000000 

.007452 

.811909 

.547577 

, 950456 

4 
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